Office中国论坛/Access中国论坛

标题: 就第一次与第二次的判断!!! [打印本页]

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

作者: zhaobeaut    时间: 2003-5-10 22:00
试一下这个:
set rspay=currentdb.openrecordset("select * from  给付 where 身份证='" & 文本框名称.text & "'")
if rs.recordcount= 0 then
msgbox "第一次“
else
msgbox "不是第一次”
end if





欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/) Powered by Discuz! X3.3