dim rs
sql ="select * from table where user='小明' and password='123'"
set rs = conn.execute(sql)
if rs.eof and rs.bof then
respose.write("无记录")
else
respose.write("有记录")
end if
rs.close : set rs = nothing
<%
rs.open sql,conn,1,1
if rs.eof or rs.bof then
response.write("没结果")
else
response.write("有结果")
end if
%>