ADO连接代码？ |
|
答題得分者是：Chance36
|
|
sl@cableplus.com.cn
高階會員   發表：168 回覆：359 積分：130 註冊：2004-03-26 發送簡訊給我 |
|
|
Chance36
版主  發表：31 回覆：1033 積分：792 註冊：2002-12-31 發送簡訊給我 |
引言: 怎样手写ADO连接数据库的代码，请指教，谢谢sl@cableplus.com.cn 你好 先利用ADoConnection或AdoDataSet等的ConnectString在設計時期之Builder設定你要的資訊，並確定連結成功後，在Connectionstrin的屬性欄中將內容複製出來,然後在程式中需要的地方依複製的字串內容直接指定給ConnectString即可，而連結字串也可依需求修改。如下程式碼 AdoConnection1.ConnectioString :=' Provider=SQLOLEDB.1;Password=YourPassword;Persist Security Info=True;User ID=YourAccount;Data Source=ServerName';//複製出來的內容 |
|
sl@cableplus.com.cn
高階會員 發表：168 回覆：359 積分：130 註冊：2004-03-26 發送簡訊給我 |
按楼上方法运行后说连接字符串属性无效：代码如下：AdoConnection1.Close;
AdoConnection1.LoginPrompt := False;
AdoConnection1.ConnectionString := 'Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=FDatabaseName;Data Source=FServerName;Passward=FPassword';
AdoConnection1.Connected := True; 其中FDatabaseName,FServerName,FPassword都为变量
请问是和错误？
|
|
Chance36
版主 發表：31 回覆：1033 積分：792 註冊：2002-12-31 發送簡訊給我 |
sl@cableplus.com.cn 你好 因為ConnectString的內容正確的寫出，不是那麼的容易，變數很多，所以才建議你用AdoConnection，在ConnectionString屬性欄的右方不是有個按鈕可以開啟ConnectString的設定視窗,先在此設定精靈中設定相關內容，並測試連結成功，按確定後，再看ConnectString屬性，就會秀出連結字串內容，此時你把它複製出來,然後在程式中需要的地方依複製的字串內容直接指定給ConnectString即可，而連結字串也可依需求修改。如下程式碼 AdoConnection1.ConnectioString :=' Provider=SQLOLEDB.1;Password=YourPassword;Persist Security Info=True;User ID=YourAccount;Data Source=ServerName';//複製出來的內容 以上不是真正可以執行的程式碼(紅色是你要以真正的值代入的，況且這個字串只適合連結SQLServer，若使用其他的資料庫會有不同的內容)，它只是一個代表性的範例，其內容須視你實際的狀況來修改，所以前面才會利用AdoConnection的ConnectString建立精靈產生正確的ConnectionString後再複製應用。
|
|
sl@cableplus.com.cn
高階會員 發表：168 回覆：359 積分：130 註冊：2004-03-26 發送簡訊給我 |
AdoConnection1.close;
AdoConnection1.LoginPrompt := False;
AdoConnection1.ConnectionString := quotedstr('Provider=SQLOLEDB.1;Passward=' FPassword ';Persist Security Info=True;User ID=HMERP;Initial Catalog=' FServerName ';Data Source=' FDatabaseName);
AdoConnection1.Connected := True; 就是在执行Connected 的时候出错,错误为“连接字符串属性无效”
|
|
Chance36
版主 發表：31 回覆：1033 積分：792 註冊：2002-12-31 發送簡訊給我 |
引言: AdoConnection1.close; AdoConnection1.LoginPrompt := False; AdoConnection1.ConnectionString := quotedstr('Provider=SQLOLEDB.1;Passward=' FPassword ';Persist Security Info=True;User ID=HMERP;Initial Catalog=' FServerName ';Data Source=' FDatabaseName); AdoConnection1.Connected := True;ServerName與database好像放反了 AdoConnection1.ConnectionString := quotedstr('Provider=SQLOLEDB.1;Passward=' FPassword ';Persist Security Info=True;User ID=HMERP;Initial Catalog=' FDatabaseName ';Data Source=' FServerName); |
|
sl@cableplus.com.cn
高階會員 發表：168 回覆：359 積分：130 註冊：2004-03-26 發送簡訊給我 |
|
|
Chance36
版主 發表：31 回覆：1033 積分：792 註冊：2002-12-31 發送簡訊給我 |
發表時間：2004-04-07 18:15:09
IP:218.80.xxx.xxx 未訂閱
系統時間：2024-11-23 3:54:31
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |