第1步.通过ODBC导入在SQL服务器中所需的链接表

第2步.在启动窗体的加载代码中加入

此代码:

Private Sub Form_Load()
On Error GoTo ae
    DoCmd.TransferDatabase acLink, "ODBC", "ODBC;DRIVER=SQL Server;SERVER=SERVER\yde;UID=sa;PWD=a123;DATABASE=daad", acTable, "", "", True
ae:
    Exit Function
End Sub

说明：
"SERVER\yde" 为SQL服务器
sa     SQL连接用户名
a123   SQL连接密码
daad   所要连联的数据库

为保证不出现出错信息,请将出错处理的代码加上.