以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]根据多值字段值动态加载数据不执行  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=190002)

--  作者:洮沙
--  发布时间:2024/1/10 13:28:00
--  [求助]根据多值字段值动态加载数据不执行
老师,有以下表:

图片点击可在新窗口打开查看此主题相关图片如下:微信截图_20240110132412.png
图片点击可在新窗口打开查看
代码如下:
Dim dt As DataTable = DataTables("凭证序时簿")
Dim pzdt As DataTable = DataTables("新增凭证记录")
Dim pzdr As DataRow = pzdt.Find("登录用户名=\'管理员\'")
Dim filter As String
If pzdr IsNot Nothing Then
    If pzdr("新增凭证ID") > "" Then
        Dim nms() As String = pzdr("新增凭证ID").Split(",") \'将新增凭证ID列内容拆分成数组
       Filter = "_Identify In (\'" & String.Join("\',\'", nms) & "\')"
    End If 
End If 
If Filter > "" Then
    dt.loadFilter = Filter
    dt.load()
End If
测试不执行,问题应该出在Filter = "_Identify In (\'" & String.Join("\',\'", nms) & "\')"这句了,_Identify是整数型,如何能从字符型中判断?麻烦帮忙指点一下,谢谢!

[此贴子已经被作者于2024/1/10 13:29:54编辑过]

--  作者:有点蓝
--  发布时间:2024/1/10 13:36:00
--  
Filter = "[_Identify] In (" & String.Join(",", nms) & ")"
--  作者:洮沙
--  发布时间:2024/1/10 13:47:00
--  
合适了,谢谢老师!