<%
Dim ImageID
ImageID=(Request.QueryString("TitleId"))
Set rs = Server.CreateObject("ADODB.Recordset")
sql="select * from nt_score"
rs.open sql,conn,1,3
If not rs.eof and rs.bof then
if Not isnull(rs("ImageID")) then
  ImageID = rs("ImageID")
Else
  rs.MoveNext
  imageID = rs("imageID")
End If
%>
表1
  <%
rsa.close
%>
<%else%>
        表2
  <%
End If
rs.Close
set rs = Nothing
%> 我想判断ImageID=rs.("ImageID")就显示第一个表格，当 rs.("ImageID")这条记录为空的时候显示第二个表，这个功能这么实现啊。。想了好多天了都没能解决。。在此求助。。谢谢了

这样行吗？
<%
Dim ImageId
ImageId=(Request.QueryString("TitleId"))
Set rs = Server.CreateObject("ADODB.Recordset")
sql="select * from nt_score where ImageID="&ImageId
rs.open sql,conn,1,3
If not rs.eof and rs.bof then
   
%>
表1
  <%
rs.close
set rs=nothing
else%>
        表2
  <%
End If
rs.Close
set rs = Nothing
%>

[ 本帖最后由 designhack 于 2010-2-13 00:07 编辑 ]

试试这样如何
<%
Dim image_id
ImageID=(Request.QueryString("TitleId"))
Set rs = Server.CreateObject("ADODB.Recordset")
sql="select * from nt_score where ImageID="&image_id
rs.open sql,conn,1,1
if rs.eof and rs.bof then
%>
表格2
<%
else
%>
表格1
<%
End If
rs.close
set rs = Nothing  
%>