<%
xm=request("xm")
Set rs = Server.CreateObject ("ADODB.Recordset")
sql = "Select * from pub where xm='"&xm&"'"
rs.Open sql,conn,1,1
if rs.EOF and rs.BOF then
response.write ("暂时没有数据")
else
Do Until rs.EOF
response.write("
姓名:"& rs("xm"))
response.write("
分数:"& rs("fsf"))
rs.MoveNext
Loop
end if
rs.close
Set rs = Nothing
conn.close
set conn=nothing
%>
Select * from pub where xm='"&request("xm&")"'
直接在查询语句的条件裏写进去就行了，有就读出来没有当然就是没有罗
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024