Foxtable(狐表)用户栏目专家坐堂 → [求助]怎样自动连接共享文件夹


  共有2073人关注过本帖树形打印复制链接

主题:[求助]怎样自动连接共享文件夹

帅哥哟,离线,有人找我吗?
wldhj
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:368 积分:4209 威望:0 精华:0 注册:2013/12/26 18:44:00
[求助]怎样自动连接共享文件夹  发帖心情 Post By:2016/2/2 17:39:00 [只看该作者]

照片上传到局域网共享文件里,每次都要手动输入服务器用户名、密码连接一次共享文件夹,能不能在程序里设置自动连接呢?

 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2016/2/2 18:19:00 [只看该作者]

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()

 回到顶部