?? finduser.asp
字號:
<%response.expires=0%>
<!--#include file="conn.asp"-->
<%
on error resume next
yhm=trim(request.form("yhm"))
url=trim(request.form("url"))
if yhm<>"" or url<>"" then
set rs=server.createobject("adodb.recordset")
if yhm<>"" and url="" then
sql="select * from userinfo where yhm='"&yhm&"'"
elseif yhm="" and url<>"" then
sql="select * from userinfo where url1 like '%"&url&"%'"
elseif yhm<>"" and url<>"" then
sql="select * from userinfo where yhm='"&yhm&"' and url1 like '%"&url&"%'"
end if
rs.open sql,conn,1,1
if not rs.eof and not rs.bof then
do while not rs.eof
response.write("<div align=""left"">")
response.write("用戶名："&rs("yhm")&"<br>")
response.write("密 碼："&rs("mm")&"<br>")
response.write("昵 稱："&rs("lc")&"<br>")
response.write("網站名稱："&rs("mc1")&"<br>")
response.write("網站類型："&rs("lx1")&"<br>")
response.write("網址："&rs("url1")&"<br>")
response.write("總訪問量："&rs("looksums")&"<br>")
response.write("網站簡介："&server.htmlencode(rs("jj"))&"<br>")
response.write("</div>")
response.write("<hr>")
rs.movenext
loop
end if
rs.close
conn.close
end if
%>
<html>
<head>
<title>查找注冊用戶</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="style.css" type="text/css">
</head>
<body bgcolor="#FFFFFF" text="#000000">
<div align="center">
<p><font color="#FF0000" size="+2">查找注冊用戶</font> </p>
<form name="form1" method="post" action="finduser.asp">
<table width="333" cellpadding="0" cellspacing="0">
<tr>
<td width="95">用戶名:</td>
<td width="222">
<input type="text" name="yhm">
</td>
</tr>
<tr>
<td width="95">網址：</td>
<td width="222">
<input type="text" name="url">
</td>
</tr>
</table>
<br>
<input type="submit" name="ok" value=" 確 定 ">
</form>
<p> </p>
</div>
</body>
</html>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -