想寫一個遠端連接access，可是下面run時會有問題，是否是我寫錯了，請高手幫幫我，對了，請問這個有辦法跨ROUTER嗎?如果不行，可否教如何跨的方法。 procedure TForm1.Button1Click(Sender: TObject); begin adoConnection1.ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0; Data Source=\\***.***.***\a$\dept.mdb;Persist Security Info=False'; //遠端的c槽底下a資料夾，dept.mdb adoConnection1.LoginPrompt:=false; adoConnection1.Connected:=true; adoquery1.Connection:=adoconnection1; adoquery1.Close; adoquery1.sql.Text:='Select * from employee'; //Tadoquery.SQL是以一個TStringList來儲存sql指令的 adoquery1.Active:=true; datasource1.DataSet:=adoquery1; Edit1.Text:=adoquery1.FieldByName('department').AsString; Edit2.Text:=adoquery1.FieldByName('code').AsString; Edit3.Text:=adoquery1.FieldByName('name').AsString; end;

引言: procedure TForm1.Button1Click(Sender: TObject); begin adoConnection1.ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0; Data Source=\\***.***.***\a$\dept.mdb;Persist Security Info=False'; //遠端的c槽底下a資料夾，dept.mdb

如依据您的说明，似乎a$应该是c$\a 否则a$应该是c:\a的shareFolder name 还有当然就是发出访问的用户是否具有远程电脑访问权的问题了。 这种方式当然可以跨router，但如果中间有firewall就不一定行了，因为以共享文件夹方式访问需要通过137/138/139端口建立网路连接和传输数据。 Justin Shen ================================= 如果能帮到您,我会很开心;如果能得到您的帮助，是我的荣幸 =================================

就您的作法 小弟愚見 有錯請指正 不明白您的錯誤點出在那裡，或許您可先試試

adoConnection1.Connected:=true;

if Not adoConnection1.connected then showmessage('連接失敗')    adoquery1.Connection:=adoconnection1;

以判斷資料庫是否有正確連接，如 JustinShen兄所言，遠端連接上可能要確認權限問題及相關之PORT是否有開放。 ========================= 讀萬卷書~不如來K.TOP走一遭 =========================

procedure TForm1.Button1Click(Sender: TObject); begin adoConnection1.ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0; Data Source=\\210.70.81.104\c$\a\dept.mdb;Persist Security Info=False'; //遠端的c槽底下a資料夾，dept.mdb adoConnection1.LoginPrompt:=false; adoConnection1.Connected:=true; adoquery1.Connection:=adoconnection1; adoquery1.Close; adoquery1.sql.Text:='Select * from employee'; //Tadoquery.SQL是以一個TStringList來儲存sql指令的 adoquery1.Active:=true; datasource1.DataSet:=adoquery1; Edit1.Text:=adoquery1.FieldByName('department').AsString; Edit2.Text:=adoquery1.FieldByName('code').AsString; Edit3.Text:=adoquery1.FieldByName('name').AsString; end; 我也把對方的資料庫用成共用了，firewall也關了，可是卻發現整個程式當了，不知道是我寫錯，還是說怎麼了，因為我的電腦很慢

現在變成這個錯誤，是上面我貼的那個程式，可否請高手跟我說說，我是放在c槽a資料夾，dept.mdb

資料庫引擎無法開啟\\210.70.81.106\c$\a\dept.mdb檔案，它已經被其他的使用者獨佔地開啟，或者您需要有檢視資料的權案 連自已的ip就可以，但連別人的，可會出現以上的錯誤。請高手幫我解答謝謝

確認ADOCONNECT1.Conneted是否預先已設為True？如是煩請改設為FALSE， 又或者可能該檔案已早被開啟？ 再則確認連遠端是否該權限有開放？ 試試看，有問題再提出 ========================= 讀萬卷書~不如來K.TOP走一遭 =========================

資料庫引擎無法開啟\\210.70.81.106\c$\a\dept.mdb檔案，它已經被其他的使用者獨佔地開啟，或者您需要有檢視資料的權案 又或者可能該檔案已早被開啟？ 再則確認連遠端是否該權限有開放？ 遠端已權限全開啟了，但還是不知道哪還有錯呢，在程式方面如果在 ADOCONNECT1.Conneted:=FALSE 會有錯，所以在程式方面我還是改為原來一開始貼的，請高手在幫我看看

你將網路路徑「\\210.70.81.104\c$\a\」設為分享資料夾，然後將此分享資料夾 設為本機的網路磁碟機，如設為「K:」，然後ADOConnection的來源路徑再改為 「k:\dept.mdb」