Office中国论坛/Access中国论坛

标题: 请问：在代码里面怎么判断一个SQL查询返回的是没有记录的查询？ [打印本页]

作者: nplgacce 时间: 2005-12-8 06:22
标题: 请问：在代码里面怎么判断一个SQL查询返回的是没有记录的查询？
请问：在代码里面怎么判断一个SQL查询返回的是没有记录的查询？

我的一个窗体中有段代码：我输入表中没有的值的时候会出错。

sSql = "SELECT * FROM DaoTest WHERE [DaoTest].[cDaima] LIKE '" & Trim(txt1.Text) & "*'"
Me.RecordSource = sSql

我的想法是：如果我在TXT1中输入了错误的值，那么查询回来就没有记录了？怎么才能判断这个SSQL返回的值到底有没有记录？如果没有，怎么才能写个MSGBOX（）函数提示没有返回的记录，再让txt1获得焦点？

先谢谢了。
[attach]14626[/attach]

[此贴子已经被作者于2005-12-7 22:26:09编辑过]

作者: tz-chf 时间: 2005-12-8 16:44
先判断txt1.Text的值，再sql

作者: falex 时间: 2005-12-11 01:33
dim rst as recordset

set rst=currentdb.openrecordset(ssql)

if rst.recordcount>0 then

Me.RecordSource = sSql

else

msgbox "记录数为0"

end if

肯定没问题。呵呵！

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)