以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  排序字符串包含一个不在 IBindingList 中的属性  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=161380)

--  作者:季朝龙
--  发布时间:2021/3/15 19:51:00
--  排序字符串包含一个不在 IBindingList 中的属性
出现“排序字符串包含一个不在 IBindingList 中的属性”错误提示,运行代码如下,老师帮忙看看哪里出问题了?

DataTables("产品表").LoadFilter = "[SKU] = \'" & e.Form.Controls("SKU1").text & "\'"
DataTables("产品表").Load
Dim dr As DataRow
Dim po As Integer
dr = DataTables("产品表").SQLFind("SKU = \'" & e.Form.Controls("SKU1").text & "\'")
po = Tables("产品表").FindRow(dr)\'找出该DataRow在Table中的位置
If po >= 0 Then \'如果找到
    e.Form.Controls("编号1").Select
Else
    MessageBox.Show("不存在此SKU!")
    e.Form.Controls("SKU1").text = ""
    e.Form.Controls("SKU1").Select
End If
DataTables("产品明细").LoadFilter = "[SKU] = \'" & e.Form.Controls("SKU1").text & "\'"
DataTables("产品明细").Load

--  作者:有点蓝
--  发布时间:2021/3/15 20:31:00
--  
dr = DataTables("产品表").Find("SKU = \'" & e.Form.Controls("SKU1").text & "\'")

SQLFind出来的结果是一个独立的行,和原表没有什么关系的,不能用到Tables("产品表").FindRow(dr)