Foxtable(狐表)用户栏目专家坐堂 → 关于 BeforeConnectOuterDataSource


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

主题:关于 BeforeConnectOuterDataSource

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


加好友 发短信
等级:二尾狐 帖子:573 积分:5447 威望:0 精华:0 注册:2020/5/7 13:05:00
关于 BeforeConnectOuterDataSource  发帖心情 Post By:2020/7/28 11:44:00 [只看该作者]

请教老师,测试了如下代码,在登陆窗口的服务器IP的值实现不了修改数据源的 127.0.0.1

If e.Name = "二维码" Then
    Dim IP As String = e.User.ExtendedValues("服务器IP") '获得用户输入的IP
    If IP > "" '如果用户自己输入了IP
        '则用用户输入的IP替换原来的IP
        e.ConnectionString = e.ConnectionString.Replace("127.0.0.1", IP)
    End If
End If

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


加好友 发短信
等级:超级版主 帖子:110738 积分:563610 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/7/28 11:51:00 [只看该作者]

调试技巧:http://www.foxtable.com/webhelp/scr/1485.htm

msgbox(e.Name)
If e.Name = "二维码" Then
    Dim IP As String = e.User.ExtendedValues("服务器IP") '获得用户输入的IP
msgbox(IP)
    If IP > "" '如果用户自己输入了IP
        '则用用户输入的IP替换原来的IP
msgbox(e.ConnectionString)
        e.ConnectionString = e.ConnectionString.Replace("127.0.0.1", IP)
msgbox(e.ConnectionString)
    End If
End If

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


加好友 发短信
等级:二尾狐 帖子:573 积分:5447 威望:0 精华:0 注册:2020/5/7 13:05:00
  发帖心情 Post By:2020/7/28 12:03:00 [只看该作者]

测试了messagebox.show(e.name),有两个数据源,我用如下还是不行

If e.Name = "二维码" Or  e.Name = "快递单" Then
    Dim IP As String = e.User.ExtendedValues("服务器IP") '获得用户输入的IP
    If IP > "" '如果用户自己输入了IP
        '则用用户输入的IP替换原来的IP
        e.ConnectionString = e.ConnectionString.Replace("127.0.0.1", IP)
    End If
End If


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


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

所有msgbox都弹出什么内容?

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


加好友 发短信
等级:二尾狐 帖子:573 积分:5447 威望:0 精华:0 注册:2020/5/7 13:05:00
  发帖心情 Post By:2020/7/29 9:29:00 [只看该作者]

msgbox(e.Name)
If e.Name = "预算执行管理" Then
    Dim IP As String = e.User.ExtendedValues("服务器IP") '获得用户输入的IP
msgbox(IP)
    If IP > "" '如果用户自己输入了IP
        '则用用户输入的IP替换原来的IP
msgbox(e.ConnectionString)
        e.ConnectionString = e.ConnectionString.Replace("172.16.20.18", IP)
msgbox(e.ConnectionString)
    End If
End If

图片点击可在新窗口打开查看此主题相关图片如下:qq截图20200729092729.jpg
图片点击可在新窗口打开查看
奇怪,e.name名是对应的,怎么不往下执行




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


加好友 发短信
等级:超级版主 帖子:110738 积分:563610 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/7/29 9:43:00 [只看该作者]

其它msgbox弹出什么内容?

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


加好友 发短信
等级:二尾狐 帖子:573 积分:5447 威望:0 精华:0 注册:2020/5/7 13:05:00
  发帖心情 Post By:2020/7/29 10:07:00 [只看该作者]

没往下运作,没有弹出提示

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


加好友 发短信
等级:超级版主 帖子:110738 积分:563610 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/7/29 10:21:00 [只看该作者]

不是使用的内置登录窗口,自定义的登录窗口?

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


加好友 发短信
等级:二尾狐 帖子:573 积分:5447 威望:0 精华:0 注册:2020/5/7 13:05:00
  发帖心情 Post By:2020/7/29 10:39:00 [只看该作者]

弹出第一个e.name窗口后,就弹出系统的用户登陆窗口

图片点击可在新窗口打开查看此主题相关图片如下:qq截图20200729092729.jpg
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下:qq截图20200729103320.jpg
图片点击可在新窗口打开查看

[此贴子已经被作者于2020/7/29 10:39:49编辑过]

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


加好友 发短信
等级:超级版主 帖子:110738 积分:563610 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/7/29 10:55:00 [只看该作者]

不对。内置登录窗口肯定是比BeforeConnectOuterDataSource 事件先弹出来的。不可能比BeforeConnectOuterDataSource 事件晚。

使用的是什么版本的foxtable?请上传实例看看

 回到顶部
总数 12 1 2 下一页