Office中国论坛/Access中国论坛

标题: 请教怎么判断查询有无记录？ [打印本页]

作者: 呈易 时间: 2006-5-22 04:11
标题: 请教怎么判断查询有无记录？
请教怎么判断查询有无记录？

作者: andymark 时间: 2006-5-22 05:51
Dim Sql As String
Dim Rs As New ADODB.Recordset
Sql = " select * from 查询1"
Rs.Open Sql, CurrentProject.Connection, adOpenDynamic, adLockOptimistic
If Not Rs.EOF Then
   DoCmd.OpenQuery "查询1"
   Else
   MsgBox "查询没有记录"
End If

Set Rs = Nothing

作者: goooer 时间: 2006-5-22 05:55
我认为可以用

select count(*) from [表名]　where ......

搜索看看记录条数是不是０，否则表明有合适记录存在

或者

用eof和bof

[此贴子已经被作者于2006-5-21 21:56:13编辑过]

作者: 一点通 时间: 2006-5-22 06:08
可利用Dlookup和isnull两个函数进行判别

作者: 呈易 时间: 2006-5-22 18:07
还是isnull,dlookup方便

tblAAAA,其中有一字段MMM

if isnull(dlookup("[MMM]","tblAAAA")) then
msgbox "此表无记录"
end if

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