以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  关联表的加载设置问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=27796)

--  作者:superman430
--  发布时间:2013/1/10 13:02:00
--  关联表的加载设置问题

If DataTables("业务表").DataRows.Count = 0 Then \'如果订单表没有数据
DataTables(
"费用表").LoadFilter = "业务编号 Is Null" \'不加载订单明细
Else
Dim
ids As String
For Each
dr As DataRow In DataTables("业务表").DataRows
ids = ids & "," & dr("业务编号")
Next
ids= ids.Trim(",")
DataTables(
"费用表").LoadFilter = "业务编号 In (" & ids & ")"
End If
DataTables(
"费用表").Load()

 

按照这个范例,只改写具体的表明和关联列名,但总提示“至少一个参数没有被指定值。”

 

有遇见过这个情况么

 

是不是因为业务编号 不是纯数字? 我的业务编号是用代码编辑的 如 RJ120001


--  作者:狐狸爸爸
--  发布时间:2013/1/10 13:15:00
--  

If DataTables("业务表").DataRows.Count = 0 Then \'如果订单表没有数据
    DataTables("费用表").LoadFilter = "业务编号 Is Null" \'不加载订单明细
Else
    Dim ids As String
    For Each dr As DataRow In DataTables("业务表").DataRows
        ids = ids & ",\'" & dr("业务编号") & "\'"
    Next
    ids= ids.Trim(",")
    DataTables("费用表").LoadFilter = "业务编号 In (" & ids & ")"
End If

 

表达式中的字符型,要用单引号括起来:

http://www.foxtable.com/help/topics/0102.htm

 

 


--  作者:superman430
--  发布时间:2013/1/10 13:48:00
--  

你的意思 因为我的业务编号 是字符型 所以应该加上引号么?


--  作者:lin_hailun
--  发布时间:2013/1/10 14:19:00
--  
以下是引用superman430在2013-1-10 13:48:00的发言:

你的意思 因为我的业务编号 是字符型 所以应该加上引号么?


嗯嗯,是的。