用高级开发2016版开发的软件,局域网内在线升级,路径为:10.17.48.203\update,update文件夹已设共享。在项目升级路径设为\\10.17.48.203\update;'''///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 \\10.17.48.203\ Ctrl /user:Administrator")
p.StandardInput.WriteLine("exit")
如果先在电脑上通过文件夹地址栏登录10.17.48.203这台电脑,输入密码后,我开发的软件能正常用升级,若在没有通过文件夹地址栏登录这台电脑,升级时会提示“未知的用户名或用户密码”,什么原因?是"net use \\10.17.48.203\ Ctrl /user:Administrator"这句输入有问题?