Foxtable(狐表)用户栏目专家坐堂 → 双数据源的情况下,在项目属性中怎么设置?


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

主题:双数据源的情况下,在项目属性中怎么设置?

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


加好友 发短信
等级:七尾狐 帖子:1692 积分:15736 威望:0 精华:0 注册:2017/6/1 23:12:00
双数据源的情况下,在项目属性中怎么设置?  发帖心情 Post By:2020/12/2 12:12:00 [只看该作者]

 双数据源的情况下,在项目属性中怎么设置?一个是access一个是sql

 

BeforeConnectOuterDataSource

这个事件的代码

 

 

e.C & e.ProjectPath & "data\cqj.mdb;Persist Security Info=False;Jet OLEDB:Database Password=liming@93422lm88.."
Dim ipFile As String = e.ProjectPath & "server.txt"
If e.Name ="sql" Then                     '' e.Name = "sqlgcgl" 这个是数据源名称
    If Filesys.FileExists(ipFile) Then
        Dim str As String = FileSys.ReadAllText(ipFile)
        If Connections.TryConnect(str) = False Then
            canConnect = False
            str = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & e.ProjectPath & "temp.MDB;Persist Security Info=False"
        Else
            canConnect = True
        End If
        e.ConnectionString = str
    Else
        canConnect = False
        Dim st As String
        st = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & e.ProjectPath & "temp.MDB;Persist Security Info=False"
        e.ConnectionString = st
    End If
End If

 

,sql数据源用不了,报错

 

Dim cmd As new sqlcommand
cmd.C
cmd.Parameters.Clear
cmd.CommandText="s  elect mbno as 会员编号,mbname as 会员姓名,mbtel as 电话,mbmobile as 手机,mbspellname as id from {pos_mbInfo}"
Tables("会员查找下拉_table1").DataSource=cmd.ExecuteReader

这个语句报错,提示access数据源不存在这个表,我明明指定了,还不行

 

[此贴子已经被作者于2020/12/2 12:34:48编辑过]

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


加好友 发短信
等级:超级版主 帖子:105926 积分:538693 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/12/2 13:31:00 [只看该作者]

If e.Name ="数据源名称1" Then 
数据源1的处理
elseIf e.Name ="数据源名称2" Then 
数据源2的处理
end if

 回到顶部