try{ADOConnection1-> BeginTrans(); //一連串的處理程序ADOConnection1->Execute(“select * from Tabel1 where name=’David’”,cmdText, eoAsyncExecute);.}Catch(…){//若有任何閃失就回覆前狀態ADOConnection1-> RollbackTrans();Return;}ADOConnection1->CommitTrans();
□以上是ODBC的設定部分,連接上以後就已經大功告成一半了,接下來就是TADOConnection中ConnectionString 屬性進行設定,可選擇Use Data Link File從MS資料連結檔案 .udl進行連結或Use Connection String設定連結資訊,但充其量就是把Use Connection String存成檔案就是Use Data Link File且副檔名必須為.udl,但使用上就有點不同了,Use Connection String是直接以字串的形式寫在執行檔中,Use Data Link File是把它們給分離開另行一個檔案進行儲存,而後者的好處在於改變伺服器的位址時並不需要重新編譯執行檔,只需修改該.udl檔案即可,相當的便利所以筆者也建議使用者使用這種方式進行設定。但要如何產生.udl檔呢?其實在BCB中就有現成的.udl供使用者使用,依下列位址尋找: C:\Program Files\Common Files\SYSTEM\ole db\Data Links\BCDEMOS.udl 此檔案就是現成的,接下來copy一份來使用,並Rename成SQLDB.udl,雙擊打開檔案(Windows會自動開啟)進行編輯,依序將下列項目一一設定: 1.提供者選擇ODBC中新增的資料庫 2.連接設定伺服器或資料庫名稱以及使用者名稱帳號與密碼 3.進階與全部先不要動然後進行測試連接
若這裡的設定與ODBC設定一樣應該也會成功,然後按下確定關閉(會自動Save)。接下設定ConnectionString屬性選擇Use Data Link File選取該檔SQLDB.udl即可,或於Use Connection String按下 Build…鍵也會看到檔案編輯的畫面一樣畫葫蘆,確定後會轉成字串如下: Provider=SQLOLEDB.1; Password=mypasswd; Persist Security Info=True; User ID=sa;Initial Catalog=DBName; Data Source=ServerName; Use Procedure for Prepare=1; Auto Translate=True; Packet Size=4096; Workstation ID=ComputerName 裡面的項目分別代表編輯中的各項設定值,有設定才有沒設定就不會顯示出來。 若要於程式中動態的設定如下:
檔案輸入 ADOConnection1->ConnectionString= “FILE NAME=C:\Program Files\Common Files\SYSTEM\ole db\Data Links\SQLDB.udl” 字串輸入 ADOConnection1->ConnectionString= “Provider=SQLOLEDB.1; Password=mypasswd; Persist Security Info=True; User ID=sa; Initial Catalog=DBName; Data Source=ServerName; Use Procedure for Prepare=1; Auto Translate=True;Packet Size=4096; Workstation ID=ComputerName”