Foxtable(狐表) → 用户栏目 → 专家坐堂 → 数据源 动态 配合


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

主题：数据源 动态 配合
帅哥哟，离线，有人找我吗？
yifan3429
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：九尾狐 帖子：2482 积分：22932 威望：0 精华：0 注册：2011/3/29 17:14:00 		数据源 动态 配合  发帖心情 Post By：2015/11/27 1:10:00 [显示全部帖子]

If e.Name = "STD数据库" Then
    Dim IP As String = e.User.ExtendedValues("IP") '获得用户输入的IP
    If IP > "" '如果用户自己输入了IP
        '则用用户输入的IP替换原来的IP
        e.ConnectionString = e.ConnectionString.Replace("192.168.0.188", IP)
    End If
End If


上面的代码是需要客户自我输入IP  如何配合我下面的外部数据库的链接地址使用



外部数据原地址

Provider=Microsoft.Jet.OLEDB.4.0;Data Source=\\192.168.0.188\新建文件夹\琢玥网站\STD数据库.mdb;Persist Security Info=False
 回到顶部
帅哥哟，离线，有人找我吗？
yifan3429
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：九尾狐 帖子：2482 积分：22932 威望：0 精华：0 注册：2011/3/29 17:14:00 		  发帖心情 Post By：2015/11/27 1:19:00 [显示全部帖子]

If e.Name = "STD数据库" Then
    Dim IP As String = e.User.ExtendedValues("IP") '获得用户输入的IP
    If IP > "" '如果用户自己输入了IP
        '则用用户输入的IP替换原来的IP
        e.ConnectionString = e.ConnectionString.Replace("192.168.0.188", IP)
    End If
End If


这句会弹出没有实例对象的错误
 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.03906 秒, 5 次数据查询