Foxtable(狐表)用户栏目专家坐堂 → 指定表收索


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

主题:指定表收索

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


加好友 发短信
等级:超级版主 帖子:107783 积分:548260 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2017/5/6 10:02:00 [显示全部帖子]

dim tn() as string = {"表A","表B"}
dim value as string = e.form.controls("Textbox1").Text
for each name as string in tn
    tables(name).filter = "某列 = '" & value & "'"
next

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


加好友 发短信
等级:超级版主 帖子:107783 积分:548260 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2017/5/6 11:36:00 [显示全部帖子]

dim tn() as string = {"表A","表B"}
dim cn() as string = {"表A的列","表B的列"}
dim value as string = e.form.controls("Textbox1").Text
for I as integer = 0 to tn.length - 1
    tables(tn(i)).filter = cn(I) & " = '" & value & "'"
next

 回到顶部