請教各位,如題上的問題 我在貴站有看過有關DELPHI連結AS400的資料,但是都無法解答我的問題 己用ODBC連結至資料庫,再用ADOCONNECT去連結ODBC,這一段都OK ,但是當用ADOQUERY去連結ADOCONNECT後, 在ADOQUERY.SQL=SELECT * FROM PEK00 WHERE PRVUEK>'20041200' ADOQUERY.ACTIVE=TRUE時,就會出現 "CWBDB0001-連線處理試圖與伺服器(系統XXX.XX.XX.XX)連絡時失效.. 這是為什麼,還是語法有誤?麻煩各位了,謝謝

我剛測試用ODBC連AS400沒問題說 請先確認您的ODBC連線是否正常 如果正常，在delphi中，ADOConnect 請先設為Active=True測試看看 另外附上我測試的ConnectionString Provider=MSDASQL.1;Password=測試密碼;Persist Security Info=True;User ID=測試帳號;Data Source=AS400;Extended Properties="DSN=AS400;UID=test;PWD=測試密碼;";Initial Catalog=主機名稱 另外也可以試試用OLE DB連連看

------
我將在茫茫人海中尋訪我唯一之靈魂伴侶。
得之；我幸。不得；我命。

shinjle:抱歉,我的法就是使用OLE DB,但無法連結. ,ADO要如何使用ODBC的方法連結,能否請你教我? 還是還有其它的辦法,謝謝

OLE DB ADOConnection->ConnectionString->Build->IBM AS400 OLE DB Provider Data Source:AS400的IP 然後測試連線，會要您輸入帳號密碼 ODBC 在控制台->系統管理工具->資料來源 (ODBC) 建立系統來源->Client Access ODBC Driver 資料來源名稱：要取的別名 AS/400系統：AS400的IP SQL預設檔案資料庫：你的Data Libary ADOConnection->ConnectionString->Build->Microsoft OLE DB Provider for ODBC Driver Data Source：上面取的別名 其他設定請自行測試

------
我將在茫茫人海中尋訪我唯一之靈魂伴侶。
得之；我幸。不得；我命。

SHINJLE你好 你的方法我己經試過 1.OLE_DB:ADOCONNECT連結AS400是OK,可是當我用ADOQUYER下指令時,就會出現 CWBDB0001-連線處理試圖與伺服器(系統WAVEDLIB)連絡時失效.. 2.ODBC:ADOCONNECT是連結AS400亦是OK,ADOQUYER下指令時,就會出現 CWBDB0001-連線處理試圖與伺服器(系統WAVEDLIB)連絡時失效.. 但如果是使用BDE的DATABASE連結AS400,然後用QUERY去下SQL指令時, 資料即可正確無誤的出現,這是為什麼呢?由於使用BDE去連結,須在使用者的 電腦安裝BDE,所以公司仍然希望能使用ADO來做連結..請你指教,謝謝

看起來是妳的ADO ConnectionString 有問題。 可以請妳Mail給我，我幫妳看看。 或是請妳再試試看， 在執行Query之前才將ADOConnection.Connected:=True; 發表人 - shinjie 於 2004/12/28 16:08:30

------
我將在茫茫人海中尋訪我唯一之靈魂伴侶。
得之；我幸。不得；我命。

SHINJLE你好: 謝謝你大力的幫忙,看過你的程式後,終於試出來了..非常的感謝你.以下是我 測出的CONNECTSTRING,提供給大家參考.. 1.ODBC: Provider=MSDASQL.1;Password=ABCD;Persist Security Info=True;User ID=N12345;Data Source=WADB;Extended Properties="DSN=WADB;UID=N12345;PWD=ABCD;";Initial Catalog=H8CM 2:OLE_DB Provider=IBMDA400.DataSource.1;Password="ABCD";User ID=N12345;Data Source=10.200.1.1;Transport Product=Client Access;SSL=DEFAULT