以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  窗体sqltables数据筛选不成功……  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=176772)

--  作者:cnsjroom
--  发布时间:2022/4/26 14:14:00
--  窗体sqltables数据筛选不成功……

MessageBox.Show(vars("会议主题uuid"))可以得到值  且有数据行

 
图片点击可在新窗口打开查看此主题相关图片如下:1.png
图片点击可在新窗口打开查看
会议议题对应内容行为:

 
图片点击可在新窗口打开查看此主题相关图片如下:2.png
图片点击可在新窗口打开查看

 

主题窗体有sqltable1.2.3

主题窗体打开后事件代码如下:

\'Tables(e.form.name & "_table1").Filter="uuid=\'" & ("会议主题uuid") & "\'"    取消注释后,会议议题这个区域显示为空了

Dim zs1 As Integer = Tables(e.form.name & "_table1").Count
If zs1 >0 Then
    If Tables(e.form.name & "_table1").Current("uuid")<>"" Then
        vars("议题uuid")=Tables(e.form.name & "_table1").Current("uuid")
        vars("议题标题")=Tables(e.form.name & "_table1").Current("议题标题")
        Tables(e.form.name & "_table2").Filter="uuid=\'" & Tables(e.form.name & "_table1").Current("uuid") &"\'and 会议主题=\'" & Tables(e.form.name & "_table1").Current("议题标题") &"\'"
    Else
        Tables(e.form.name & "_table2").Filter="uuid=\'XXXXXXX\'and 会议主题=\'" & Tables(e.form.name & "_table1").Current("议题标题") &"\'"
        vars("议题uuid")=""
        vars("议题标题")=""
    End If
Else
    Tables(e.form.name & "_table2").Filter="uuid=\'XXXXXXX\' and 会议主题=\'" & Tables(e.form.name & "_table1").Current("议题标题") &"\'"
End If

 

 

 

主题窗体打开后会议议题显示了全部的议题      怎么修正为窗体加载后  会议议题显示uuid=会议主题uuid的值数据行呢?


图片点击可在新窗口打开查看此主题相关图片如下:3.png
图片点击可在新窗口打开查看
[此贴子已经被作者于2022/4/26 14:27:58编辑过]

--  作者:有点蓝
--  发布时间:2022/4/26 14:21:00
--  
"会议主题uuid"是个什么东西?哪个表是会议主题?
--  作者:cnsjroom
--  发布时间:2022/4/26 14:29:00
--  回复:(有点蓝)"会议主题uuid"是个什么东西?哪个表...

会议主题  就是会议状态里面的uuid字段值

这个是可以准确得到的


--  作者:有点蓝
--  发布时间:2022/4/26 14:34:00
--  
Tables(e.form.name & "_table1").Filter="uuid=\'" & Tables("会议状态").Current("uuid") & "\'"