以文本方式查看主题

-  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=68030)

--  作者:fanjq8686
--  发布时间:2015/5/8 11:26:00
--  外部数据源

请教老师:

为了便于编程,我建立了二个名称不同的数据源,一个在本机,另一个在局域网服务器上,为结构相同的SQL数据库,如何做到在发布前不必定向到服务器上的数据源,发布后的程序由程序自动判断后连接到服务器上?


--  作者:Bin
--  发布时间:2015/5/8 11:28:00
--  
IF判断根据情况连接对应数据源在BeforeConnectOuterDataSource事件

If ProjectPath.EndsWith("Project") Then
   \'发布后
Else
   \'发布前
End If



--  作者:fanjq8686
--  发布时间:2015/5/8 11:35:00
--  
这一段我试了,没有成功,只能判断出当前的数据源,不知道用什么方法从当前源改变为另一个数据源
--  作者:Bin
--  发布时间:2015/5/8 11:36:00
--  
看2楼帮助连接..更改连接字符串啊.
--  作者:fanjq8686
--  发布时间:2015/5/8 11:44:00
--  

是更改:

e.ConnectionString = "XXX“

就可以了么?


--  作者:fanjq8686
--  发布时间:2015/5/8 11:44:00
--  
与数据源的名称有无关系?
--  作者:Bin
--  发布时间:2015/5/8 11:45:00
--  
你别设置两个数据源啊.就一个数据源可以了.更改连接字符串,连接到不同的数据源即可.
--  作者:fanjq8686
--  发布时间:2015/5/8 11:51:00
--  
那在”外部数据源“窗口里的数据源名称及连接字符设成哪一个呢?
--  作者:Bin
--  发布时间:2015/5/8 11:52:00
--  
随便.那个也没影响
--  作者:fanjq8686
--  发布时间:2015/5/8 12:09:00
--  

成功:

If e.ProjectPath.EndsWith("管理项目2") Then

    ‘发布前

    If e.name = "我的SQL本机数据库" Then

        Dim s As String = ""

        e.ConnectionString = s

    End If

Else

    ’发布后

    If e.name = "我的SQL本机数据库" Then

        Dim s As String = ""

        e.ConnectionString = s

    End If

End If

[此贴子已经被作者于2015/5/8 13:17:28编辑过]