程序代码：

<%
set rs=server.createobject("adodb.recordset")
rs.open "select * from [user]",conn,1,1
if rs.eof and rs.bof then
  Response.Write "无数据"
else
  Response.Write "有数据"
end if
rs.close
set rs=nothing
%>