以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]两个服务器  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=99602)

--  作者:dj68301367
--  发布时间:2017/4/22 9:51:00
--  [求助]两个服务器
公司新增了一台服务器,原来是办公情形生产车间共用一台服务器的,
这样我的升级文件和共享文件就可以放在其中一个文件夹里就可以了,可是现在分开了,

就碰到了这么一个问题,就是没办法登录两个服务器;是在服务器上做镜像文件好,还是在软件上处理好一些呢?

--  作者:有点蓝
--  发布时间:2017/4/22 10:34:00
--  
2台服务器都是做什么用的?是不是都在一个局域网中?
--  作者:dj68301367
--  发布时间:2017/4/26 15:29:00
--  
是在同一个局域网,这也是公司领导决策上的问题,由于之前第一个服务器的硬盘容量不够,后来新增了一个服务器,
--  作者:有点色
--  发布时间:2017/4/26 15:34:00
--  

 在同一个服务器上,只要在同一个网段里,都是能访问共享文件夹的。

 

 连不上服务器的电脑能否ping服务器的ip地址?


--  作者:dj68301367
--  发布时间:2017/4/27 10:47:00
--  
不是连不上,因为需要连接服务器,需要输入帐号和密码,这样比较麻烦,他们需要登录两次帐号和密码
有没办法在软件上实现自动登录服务器,在已知的帐号和密码情况下

--  作者:有点色
--  发布时间:2017/4/27 11:03: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")

[此贴子已经被作者于2017/4/27 11:03:49编辑过]

--  作者:kevin129
--  发布时间:2017/5/20 19:27:00
--  
同样的问题