求助：如何确定一个记录是否在一个记录集中？

yanghua1900363

今天，在VBA中编写一段代码，想实现：确定某个记录是否在一个确定的记录集中。我用了关键字“in”,系统提示语法错误，怎么做都没通过，叨扰各位了！
Dim rs3 As New 记录集封装程序

'如果当前订单ID不在记录集salesdatetimesearch中
rs3.OpenRecordset "salesdatetimesearch"
if me.销售订单id not in rs3.Recordset ("销售订单id") then

yanghua1900363

zhuyiwen 发表于 2011-10-21 09:57
其实更简单的是从表中查询，比你的那个思路更单易行：学习罗斯文的记录集封装要有DAO/ADO的基础，可能对初 ...

多谢 这个思路确实好！我写个函数试一试。

zhuyiwen

使用记录集的Find或Seek方法查找"销售订单id="me.销售订单id，如果遇到EOF则表示不存在，反之，则存在该记录

zhuyiwen

其实更简单的是从表中查询，比你的那个思路更单易行：

1. If DLookup("[销售订单id]", "[销售表]", "[销售订单id]=' & me.销售订单id) =Null Then
   
2.     ' 处理没有的情况
   
3.     ....
   
4. Else
   
5.     ' 处理表中存在“销售订单id”的情况
   
6.     ....
   
7. End If

复制代码

学习罗斯文的记录集封装要有DAO/ADO的基础，可能对初学都有点难度。

yanghua1900363

zhuyiwen 发表于 2011-10-20 18:10
使用记录集的Find或Seek方法查找"销售订单id="me.销售订单id，如果遇到EOF则表示不存在，反之，则存在该记录 ...

谢谢朱老师的指点！ 我发现从access2007罗斯文实例数据库中导入的“记录集封装程序”中没有记录集的find或者seek方法，看来要另觅他法啦。

yanghua1900363

再谢朱老师！ 问题已经解决了。