使用两个字段检查记录是否存在

时间:2013-06-24 07:46:22

标签: sql vba ms-access ms-access-2007 access-vba

我有两个字段要扫描到我的表单中,我在表单上有一个按钮,当它按下时我想要一个对话框说天气记录存在。我目前有一个SQL查询从数据库中提取记录。

SELECT Stock, Scanned
FROM Products
WHERE ((([Stock])=Forms!Products![Stock Code]))                                                  
And ((([Scanned])=Forms!Products![Scanned Information]));

我希望能够检查此查询是否返回null。我不确定这是否是检查记录是否退出的最佳方法,DLookup是否是我想要实现的更好的方法?

1 个答案:

答案 0 :(得分:1)

这样的事情应该有效:

Set db = CurrentDb
Set qdf = db.QueryDefs("mySelectQuery")
Set rs = qdf.OpenRecordset()
if rs.EOF then
MsgBox "The record does not exist"
else
MsgBox "The record does exist"
end if