关于筛选后全选的问题

凌云　发表于：2013-08-28 14:28:45 　

筛选后进行全选，但我有以下的代码就不能实现，按全选会将不在筛选范围内的数据也全部选定。请高人指点！

Private Sub 预约_AfterUpdate()

If Len(strwhere) = 0 Then
strwhere = "1=1"
End If
DoCmd.SetWarnings False
DoCmd.RunSQL "UPDATE 客户订单 set 是否已预约=" & Me.预约 & " where " & strwhere

DoCmd.SetWarnings True
Me.frmchild送货预约.Requery
End Sub

Top

cspa 发表于：2013-08-28 14:43:16

你这个语句更新的不是选定的记录集，而是“客户订单”中所有符合条件的记录。自然会错。

Top

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

Access交流中心

[5分]关于筛选后全选的问题