以下是引用有点甜在2013-11-20 20:29:00的发言: 试试这样
Dim txt As String = e.Form.Controls("txtMingcheng").Text
Dim tbl As DataTable = Tables("窗口产品销售_tblChanpin").DataTable
If txt = "" Then
tbl.LoadFilter = ""
Else
txt = "'%" & txt & "%'"
tbl.LoadFilter = "product_name Like " & txt
End If
Tables("窗口产品销售_tblChanpin").Filter = ""
tbl.Loadtop = 1000 '假定每页1000行
tbl.Loadpage = 0
tbl.Load()
有点甜和狐狸爸爸的都对,我是SQL的
另外有一个问题要咨询。
在帮助中我做了用Table控件模拟关联表
有订单表tblsale和订单明细tblxiaoshoumingxi
Dim t_tblXiaoshoumingxi As Table = Tables("窗口产品销售_tblXiaoshoumingxi")
Dim t_tblSale As Table = Tables("窗口产品销售_tblSale")
With Tables("窗口产品销售_tblXiaoshoumingxi")
If .Current Is Nothing Then
t_tblSale.Filter =False
Else
t_tblSale.Filter = "sale_id= " & .Current("sale_id")
End If
End With
现在订单表我用了狐狸爸爸的方法实现了动态加载,那下面的这个订单明细表怎么解决呢,我目前是吧订单明细表都加载上来,也能按照狐狸爸爸的这个方式来加载吗,试验了没弄出来,请指点一下