主题：[求助]外部数据源服务器密码登陆的问题

 写到程序里面去

在beforeOpenproject事件，加入代码

shell("net use \\192.168.1.211\共享的文件夹名  密码 /user:用户名", 0)

开始->运行->cmd

然后输入 net use \\192.168.1.211\共享的文件夹名  密码 /user:用户名

得到什么结果？

加上空格

 Glcxb2015 /user:adminstrator

看9楼之余，你可以在服务器那里设置everyone或guest用户，它们进入是不需要密码的

 下面代码写到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.1.211\共享的文件夹名  密码 /user:用户名")
p.StandardInput.WriteLine("exit")
Dim strRst As String = p.StandardOutput.ReadToEnd()

msgbox(strRst)