Foxtable(狐表)用户栏目专家坐堂 → [求助]关于外部数据库连接的问题Access


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

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

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


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/2/6 13:30:00 [显示全部帖子]

 你可以在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")


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


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/2/6 14:50:00 [显示全部帖子]

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

 回到顶部
帅哥哟,离线,有人找我吗?
有点色
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/2/6 15:04:00 [显示全部帖子]

代码没问题。肯定是你账号密码没写对。

 回到顶部
帅哥哟,离线,有人找我吗?
有点色
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/2/6 15:08:00 [显示全部帖子]

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

 

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


 回到顶部
帅哥哟,离线,有人找我吗?
有点色
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/2/6 15:17:00 [显示全部帖子]

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

 

或者试试

 

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

[此贴子已经被作者于2017/2/6 15:25:00编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
有点色
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/2/6 15:24:00 [显示全部帖子]

哦,你多写了一个\,试试

 

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


 回到顶部