以文本方式查看主题
- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 关于外部数据库连接的问题 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=51068)
|
-- 作者:晕了快扶我
-- 发布时间:2014/5/19 10:56:00
-- 关于外部数据库连接的问题
两台服务器主机,一台不通时自动转另一台,都是内网的主机
If e.Name = "ERP" Then If Network.Ping("TESTSERVER",1000) = False Then \'如果第一个IP无法接通 e.ConnectionString = e.ConnectionString.Replace("TESTSERVER", "BOSS-PC") End If End If If e.Name = "URP" Then If Network.Ping("TESTSERVER",1000) = False Then \'如果第一个IP无法接通 e.ConnectionString = e.ConnectionString.Replace("TESTSERVER", "BOSS-PC") End If End If
刚做测试,TESTSERVER 关闭,出现错误,这是啥原因呢?
此主题相关图片如下:qq图片20140519105447.jpg

[此贴子已经被作者于2014-5-19 10:56:16编辑过]
|
-- 作者:Bin
-- 发布时间:2014/5/19 10:57:00
--
哪有 TESTSERVER 这种玩意
要用IP 或者域名
|
-- 作者:晕了快扶我
-- 发布时间:2014/5/19 10:58:00
--
以下是引用Bin在2014-5-19 10:57:00的发言: 哪有 TESTSERVER 这种玩意
要用IP 或者域名
是内网的主机啊,用机器名不可以吗?另外,这两台都是SQL服务器
|
-- 作者:Bin
-- 发布时间:2014/5/19 10:58:00
--
内网主机,用局域网IP
|
-- 作者:晕了快扶我
-- 发布时间:2014/5/19 11:15:00
--
还是不行啊,依然无法跳转第二个服务器?是不是因为是SQL服务器的原因?我总觉得修改连接字窜这里怪怪的
|
-- 作者:晕了快扶我
-- 发布时间:2014/5/19 11:16:00
--
If e.Name = "ERP" Then If Network.Ping("192.168.1.109",1000) = False Then \'如果第一个IP无法接通 e.ConnectionString = e.ConnectionString.Replace("192.168.1.109", "192.168.1.106") End If End If If e.Name = "URP" Then If Network.Ping("192.168.1.109",1000) = False Then \'如果第一个IP无法接通 e.ConnectionString = e.ConnectionString.Replace("192.168.1.109", "192.168.1.106") End If End If
|
-- 作者:Bin
-- 发布时间:2014/5/19 11:17:00
--
你改成什么样了? 提示什么.发出来看看
|
-- 作者:晕了快扶我
-- 发布时间:2014/5/19 13:46:00
--
If e.Name = "ERP" Then If Network.Ping("192.168.1.109",1000) = False Then \'如果第一个IP无法接通 e.ConnectionString = e.ConnectionString.Replace("192.168.1.109", "192.168.1.106") End If End If If e.Name = "URP" Then If Network.Ping("192.168.1.109",1000) = False Then \'如果第一个IP无法接通 e.ConnectionString = e.ConnectionString.Replace("192.168.1.109", "192.168.1.106") End If End If
直接就跳无法连接,要求改字窜
|
-- 作者:Bin
-- 发布时间:2014/5/19 14:03:00
--
在代码最后加入messagebox.show( e.ConnectionString) 看看连接字符串是否正确 如果正确,看看服务器是否能连通
|
-- 作者:晕了快扶我
-- 发布时间:2014/5/19 14:04:00
--
以下是引用Bin在2014-5-19 14:03:00的发言:在代码最后加入
messagebox.show( e.ConnectionString) 看看连接字符串是否正确
如果正确,看看服务器是否能连通
好吧,我回公司再试...
|