step1..BDE-alias為綱路磁碟機(WIN2000),當Ttable.active=true的時候, 就出現EDBEngineError 'Invalid file name.'的錯誤. step2..但是,到網路芳鄰開起放DB的檔案夾,出現[連線到XXX]的視窗, 輸入使用者名稱=Administrator後,開起DB的檔案夾. step3..再回到程式Ttable.active=true,才不會出現錯誤. 請問如何不做step2程式不會出現錯誤?

試試這個函數 function ConnectRemoteServer(SvrName, UserName, PassWD:string):Boolean; var lpNetResource: _NETRESOURCE; begin Result := False; lpNetResource.dwType := RESOURCETYPE_ANY; lpNetResource.lpLocalName := Nil; lpNetResource.lpRemoteName := PChar(SvrName); lpNetResource.lpProvider := Nil; case WNetAddConnection2(lpNetResource, PChar(PassWD), PChar(UserName), 0) of NO_ERROR: begin Result := True; end; end; end; 在Ttable.active=true之前加上這一行 ConnectRemoteServer('\\Server Name','administrator','')