展开商品列表时如何不显示已停用的商品

彭先生　发表于：2020-06-30 08:07:58 　

以下代码中如何添加：商品列表不显示已停用的商品，请大侠赐教

Private Sub quickkey_Change()
sqlstring = "select * from 五金配件物料表 where 1=1"
If IsNull(Me.quickkey.Text) = False Then
sqlstring = sqlstring & " and 物料编码 like '" & Me.quickkey.Text & "*'"
End If
Me.productlist.RowSource = sqlstring
Me.productlist.Requery
End Sub

Top

金宇发表于：2020-06-30 10:23:29

sqlstring = "select * from 五金配件物料表 where 1=1 and 停用字段名称=True"

红色部分根据你实际的字段名称以及字段类型进行替换。

Top

彭先生发表于：2020-06-30 11:33:54

谢谢版主！测试成功了！

但还有一个问题:quickkey_Change()是改变了，但是productlist在打开窗体的时候还是全部显示了，有没有办法：在打开productlist窗体的时候就不显示已停用的商品呢？

Top

总记录：2篇页次：1/1 9 1 :

Access交流中心

展开商品列表时如何不显示已停用的商品