📄 supersearch.asp
字号:
<% @language=vbscript%>
<!--#include file="conn.asp"-->
<%
log_name=Request.Cookies("name") '读cookie
if log_name="" then
error_str="你还没登录！"
conn.close
Response.write error_str
Response.End
end if
%>
<%
if (Request("class")="" or Request("key")="" or Request("class")="0") then
response.write"<SCRIPT language=JavaScript>alert('注意： 请正确选择搜索分类，且确保输入的关键字正确 !');</SCRIPT>"
conn.close
set conn=nothing
Response.End
end if
l_class=trim(Request("class"))
Response.Cookies("class")=l_class
key_word=trim(Request("key"))
key_word=replace(key_word,"'","''")
set rs=Server.CreateObject("ADODB.recordset")
select case l_class
case 1
disp_class="按姓名"
sql="select * from master where m_name Like '%"&key_word&"%'"
case 2
disp_class="按身份证号"
sql="select * from master where m_id Like '%"&key_word&"%'"
end select
rs.PageSize=1 '设定rs分页参数,最好在此处设定
rs.OPEN sql,Conn,1,1 '必须用此方式打开记录
if not rs.EOF then
'////////////////////////////////////////////////////////////////////////////////////////////////////
page=trim(Request("page")) '接受分页参数page，
if not isnumeric(page) then page=1 end if 'page不为数字时的处理
if page="" then page=1 end if 'page为空时的处理
page=cint(page) '转化
if page<1 then page=1 end if 'page为<1时的处理
if page>rs.PageCount then page=rs.PageCount end if 'page为>总分页数的处理
rs.AbsolutePage=page
id=rs.Fields("id")
total=rs.RecordCount
pageno=page
%>
<html>
<head>
<title>户口管理</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<style type="text/css" >
input{width: 20px}
</style>
</head>
<body bgcolor="#ffffff" text="#000000">
<p> </p>
<hr >
<div align="center">你的搜索类别是：【<%=disp_class%>】输入关键字是：【<%=key_word%>】<br>
</div>
<hr >
<div align="center">共找到 <%=rs.RecordCount%> 条符合条件的记录<br>
</div>
<table align="center" "495">
<tr>
<td "168">
<table border="1" height="628" align="center" "244">
<tr>
<td "113" height="54" "42">
<div align="right"></div>
</td>
<td "241" height="54" "137">
<div align="center"> 户主</div>
</td>
</tr>
<tr>
<td "113" height="54" "42">
<div align="right">姓名：</div>
</td>
<td "241" height="54" width="120">
<div align="center"> <%=rs.Fields("m_name")%> </div>
</td>
</tr>
<tr>
<td "113" height="52" "42">
<div align="right">性别：</div>
</td>
<td "241" height="52" "137">
<div align="center"> <%=rs.Fields("m_sex")%> </div>
</td>
</tr>
<tr>
<td "113" height="51" "42">
<div align="right">出生年月：</div>
</td>
<td "241" height="51" "137">
<div align="center"> <%=rs.Fields("m_born")%> </div>
</td>
</tr>
<tr>
<td "113" height="55" "42">
<div align="right">民族：</div>
</td>
<td "241" height="55" "137">
<div align="center"> <%=rs.Fields("m_nation")%> </div>
</td>
</tr>
<tr>
<td "113" height="71" "42">
<div align="right">籍贯：</div>
</td>
<td "241" height="71" "137">
<div align="center"> <%=rs.Fields("m_home")%> </div>
</td>
</tr>
<tr>
<td "113" height="55" "42">
<div align="right">文化程度：</div>
</td>
<td "241" height="55" "137">
<div align="center"> <%=rs.Fields("m_level")%> </div>
</td>
</tr>
<tr>
<td "113" height="52" "42">
<div align="right">婚姻状况：</div>
</td>
<td "241" height="52" "137">
<div align="center"> <%=rs.Fields("m_double")%> </div>
</td>
</tr>
<tr>
<td "113" height="27" "42">
<div align="right">职业：</div>
</td>
<td "241" height="27" "137">
<div align="center"> <%=rs.Fields("m_work")%> </div>
</td>
</tr>
<tr>
<td "113" height="55" "42">
<div align="right">工作单位：</div>
</td>
<td "241" height="55" "137">
<div align="center"> <%=rs.Fields("m_unit")%> </div>
</td>
</tr>
<tr>
<td "113" height="56" "42">
<div align="right">身份证号：</div>
</td>
<td "241" height="56" "137">
<div align="center"> <%=rs.Fields("m_id")%> </div>
</td>
</tr>
<tr>
<td "113" height="62" "42">
<div align="right">联系方式：</div>
</td>
<td "241" height="62" "137">
<div align="center"><%=rs.Fields("m_link")%> </div>
</td>
</tr>
<tr>
<td "113" height="40" "42">
<div align="right">出租房间数：</div>
</td>
<td "241" height="40" "137">
<div align="center"> <%=rs.Fields("m_room")%> </div>
</td>
</tr>
</table>
<%
sql="select * from partner where p_masid="&id
rs.Close
rs.OPEN sql,Conn,1,1
if not rs.EOF then
%>
</td>
<td "165">
<table border="1" height="628" align="center" "282">
<tr>
<td "168" height="54" "156">
<div align="center">户主配偶</div>
</td>
</tr>
<tr>
<td "168" height="54" width="120"><%=rs.Fields("p_name")%></td>
</tr>
<tr>
<td "168" height="52" "156"><%=rs.Fields("p_sex")%></td>
</tr>
<tr>
<td "168" height="51" "156"><%=rs.Fields("p_born")%></td>
</tr>
<tr>
<td "168" height="55" "156"><%=rs.Fields("p_nation")%></td>
</tr>
<tr>
<td "168" height="71" "156"><%=rs.Fields("p_home")%></td>
</tr>
<tr>
<td "168" height="55" "156"><%=rs.Fields("p_level")%></td>
</tr>
<tr>
<td "168" height="52" "156"><%=rs.Fields("p_double")%></td>
</tr>
<tr>
<td "168" height="27" "156"><%=rs.Fields("p_work")%></td>
</tr>
<tr>
<td "168" height="55" "156"><%=rs.Fields("p_unit")%></td>
</tr>
<tr>
<td "168" height="56" "156"><%=rs.Fields("p_id")%></td>
</tr>
<tr>
<td "168" height="62" "156"><%=rs.Fields("p_link")%></td>
</tr>
<tr>
<td "168" height="40" "156"> </td>
</tr>
</table>
<%end if%>
</td>
<%
rs.Close
sql="select * from children where c_masid="&id
rs.OPEN sql,Conn,1,1
do while not rs.eof
%>
<td "146">
<table border="1" height="628" align="center" "143" "143""267">
<tr>
<td "170" height="54">
<div align="center">户主子女</div>
</td>
</tr>
<tr>
<td width="120" height="54"><%=rs.Fields("c_name")%></td>
</tr>
<tr>
<td "170" height="52"><%=rs.Fields("c_sex")%></td>
</tr>
<tr>
<td "170" height="51"><%=rs.Fields("c_born")%></td>
</tr>
<tr>
<td "170" height="55"><%=rs.Fields("c_nation")%></td>
</tr>
<tr>
<td "170" height="71"><%=rs.Fields("c_home")%></td>
</tr>
<tr>
<td "170" height="55"><%=rs.Fields("c_level")%></td>
</tr>
<tr>
<td "170" height="52"> </td>
</tr>
<tr>
<td "170" height="27"><%=rs.Fields("c_work")%></td>
</tr>
<tr>
<td "170" height="55"><%=rs.Fields("c_unit")%></td>
</tr>
<tr>
<td "170" height="56"><%=rs.Fields("c_id")%></td>
</tr>
<tr>
<td "170" height="62"><%=rs.Fields("c_link")%></td>
</tr>
<tr>
<td "170" height="40"> </td>
</tr>
</table>
</td>
<%
rs.movenext
loop
%>
</tr>
</table>
<form name="form1" method="post" action="supersearch.asp?class=<%=l_class%>&key=<%=key_word%>">
<p align="center">共<font color=#000000> <%=total%> </font>条 | 分<font color=#000000> <%=total%> </font>页 | 第<font color=#000000> <%=pageno%> </font>个 |
<a href=supersearch.asp?page=<%=page-1%>&class=<%=l_class%>&key=<%=key_word%>>上一个</a> | <a href=supersearch.asp?page=<%=page+1%>&class=<%=l_class%>&key=<%=key_word%>>下一个</a> |
<a href=supersearch.asp?page=1&class=<%=l_class%>&key=<%=key_word%>>首个</a> | <a href=supersearch.asp?page=<%=rs.PageCount%>&class=<%=l_class%>&key=<%=key_word%>>末个</a> | 跳到:
第
<input type="text" name="page" maxlength=3 style="width:20;background-color:rgb();">
个
<input type="submit" name="Submit1" value="go" style="width:20;background-color:rgb(100,100,245)">
</form>
<p> </p>
</body>
</html>
<%
else
Response.write "无此记录！"
end if
rs.close
set rs=nothing
conn.close
set conn=nothing
%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -