Dim tbl As Table = Tables(e.Form.name & "_Table1")
If txt > "" AndAlso e.KeyCode = Keys.Enter Then
Dim sql As String = "Select a.*,( SELECT TOP 1 规格 FROM 产品编码 WHERE 产品编码 = a.产品编码) AS 规格 from 库存货位表 a "
sql = sql & "LEFT JOIN 产品编码 b ON a.产品编码 = b.产品编码 WHERE b.规格 LIKE '%" & txt & "%'"
tbl.Fill(sql, Mydata, False)
End if
库存货位表中只有产品编码,没有规格等信息,现在想fill库存货位表中的数据出来进行修改,要能保存,但fill时要求能按规格筛选,
用了left join后就提示 对于多个基表不支持动态 SQL 生成
这种情况要如何实现用规格筛选?
谢谢!