就第一次与第二次的判断!!!

wslwh20031

就第一次与第二次的判断,我可以这样做吗?
public function checkplay()
dim rspay as recordset
set rspay=currentdb.openrecordset("给付",dbopendynaset)
rspay.findfirst"[身份证]=" & "'"  & me![身份证]& "'"
if rspay.nomatch then
......
老是测试不通过,是什么原因呢?

zhaobeaut

试一下这个：
set rspay=currentdb.openrecordset("select * from  给付 where 身份证='" & 文本框名称.text & "'")
if rs.recordcount= 0 then
msgbox "第一次“
else
msgbox "不是第一次”
end if