主题：[求助]关于外部数据库连接的问题Access

 你可以在beforeOpenProject执行代码

Dim p As new Process()
p.StartInfo.FileName = "cmd.exe"
p.StartInfo.UseShellExecute = False '关闭Shell的使用
p.StartInfo.RedirectStandardInput = True '重定向标准输入
p.StartInfo.RedirectStandardOutput = True '重定向标准输出
p.StartInfo.RedirectStandardError = True '重定向错误输出
p.StartInfo.CreateNoWindow = True '设置不显示窗口
p.Start()
p.StandardInput.WriteLine( "net use  \\192.168.44.202\ 密码 /user:用户名")
p.StandardInput.WriteLine("exit")

 认认真真看上了代码，代码没问题。

 要不，你就在cmd窗口执行net use语句看提示什么

ip地址换成域名或者计算机名。

或者试试

p.StandardInput.WriteLine( "net use  \\192.168.130.99 p@ssw0rd /user:administrator")