求帮忙把一段SQL转成VB代码,谢谢!

流浪的木头

需要在控件的事件代码里执行一个更新查询,SQL语句如下,请帮忙把它完整的转化成VB代码,谢谢.

UPDATE 出库记录 SET 出库记录.选中 = -1
WHERE ((([出库记录].[出库订单号码]) Like "*" & [订单号码1] & "*" Or ([出库记录].[出库订单号码]) Is Null) AND (([出库记录].[收货人]) Like "*" & [收货人1] & "*" Or ([出库记录].[收货人]) Is Null) AND (([出库记录].[省份]) Like "*" & [省份1] & "*" Or ([出库记录].[省份]) Is Null) AND (([出库记录].[城市]) Like "*" & [城市1] & "*" Or ([出库记录].[城市]) Is Null) AND (([出库记录].[区县]) Like "*" & [区县1] & "*" Or ([出库记录].[区县]) Is Null) AND (([出库记录].[出库日期])>=IIf(IsNull([起始日期]),#1/1/1900#,[起始日期]) And ([出库记录].[出库日期])<=IIf(IsNull([截止日期]),#1/1/2999#,[截止日期])));

roych

实在搞不懂现在怎么那么多人膜拜代码。
把这个做成查询，保存为“查询1”，然后在VBE里用Docmd.OpenRequery"查询1" 不行了么？
我以为，在VBE界面，调试好SQL语句不见得是件很轻松的事情。因为对于单双引号，还有字段类型都得考虑到。

zhangjimfu

roych 发表于 2011-9-21 00:01
实在搞不懂现在怎么那么多人膜拜代码。
把这个做成查询，保存为“查询1”，然后在VBE里用Docmd.OpenRequer ...

呵呵.....赞同roych兄的方法,我学习Access就是从VBA开始的,走了不少弯路