📄 jsfind0.asp
字号:
<%@ language=vbscript %>
<!--#include file="conn.asp"-->
<%
if Session.Contents("gws")<>true then
%>
<!--#include file="gly.asp"-->
<%
else
myjl=request("myjl")
if myjl="" then
myjl=10
end if
key = request.form("key")
topic=request.form("topic")
if key="" and topic="" then
key = request("key")
topic=request("topic")
end if
if key="" then
response.write"<script language='javascript'>"
response.write"alert('您没有输入查询关键词！');"
response.write"history.go(-1);"
response.write"</script>"
response.end
gws=0
end if
if topic="0"then
sql="SELECT * from jsxxb where dm like '%"&key&"%' or xm like '%"&key&"%' or xl like '%"&key&"%' or zc like '%"&key&"%' or bm like '%"&key&"%'"
end if
if topic="1" then
sql="SELECT * from jsxxb where dm like '%"&key&"%'"
end if
if topic="2" then
sql="SELECT * from jsxxb where xm like '%"&key&"%'"
end if
if topic="3" then
sql="SELECT * from jsxxb where bm like '%"&key&"%'"
end if
if topic="4" then
sql="SELECT * from jsxxb where xl like '%"&key&"%'"
end if
if topic="5" then
sql="SELECT * from jsxxb where zc like '%"&key&"%'"
end if
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1
if rs.eof then
response.write"<script language='javascript'>"
response.write"alert('对不起，没有找到你输入的内容！');"
response.write"history.go(-1);"
response.write"</script>"
response.end
end if
total=rs.recordcount
%>
<html>
<head>
<title></title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="config.css" type="text/css">
</head>
<body bgcolor="#FFFFFF" text="#000000" background="bg01.gif">
<form name="form1" method="post" action="jsfind0.asp">
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td>
<div align="center"><b><font face="华文行楷" size="6" color="red">
教师管理窗口</font></b></div>
<div align="center"><b><font color=red>删除或修改记录</font></b></div>
<div align="center"><b><font color="#0066FF">共找到<font color=red><%=total%></font>条符合您要求的记录
</font></b></div>
</td>
</tr>
</table>
<%
Response.Write("<center>")
Response.Write("<table border=1 cellpadding=1 cellspacing=1>")
Response.Write("<tr bgcolor=aaaaaa style='color:black;'>")
Response.Write("<td align=center>编号</td>")
Response.Write("<td align=center><a href='jsindex0.asp?jlh=1&myjl="&myjl&"'>代码</a></td>")
Response.Write("<td align=center><a href='jsindex0.asp?jlh=2&myjl="&myjl&"'>姓名</a></td>")
Response.Write("<td align=center>性别</td>")
Response.Write("<td align=center><a href='jsindex0.asp?jlh=3&myjl="&myjl&"'>部门</a></td>")
Response.Write("<td align=center>出生时间</td>")
Response.Write("<td align=center>密码</td>")
Response.Write("<td align=center>学历</td>")
Response.Write("<td align=center>职称</td>")
Response.Write("<td align=center>简介</td>")
Response.Write("<td align=center>删除确认</td>")
Response.Write("<td align=center>修改资料</td></tr>")
do while not rs.eof
i=i+1
dm=rs("dm")
xm=rs("xm")
xb=rs("xb")
bm=rs("bm")
csny=rs("csny")
mm=rs("mm")
xl=rs("xl")
zc=rs("zc")
If sColor = "silver" Then
sColor = "#cccccc"
Else
sColor = "silver"
End If
Response.Write("<tr bgcolor='" & sColor & "'>")
%>
<td align=center><font color="red"><%=i%></font> </td>
<td align=center><%=dm%> </td>
<td align=center><%=xm%> </td>
<%
if xb="男" then
%>
<td align=center><font color="red"><%=xb%></font></td>
<%
else
%>
<td align=center><font color="green"><%=xb%></font></td>
<%
end if
%>
<td align=center><%=bm%> </td>
<td align=center><%=csny%> </td>
<td align=center><%=mm%> </td>
<td align=center><%=xl%></td>
<td align=center><%=zc%></td>
<td align=center>
<a href="#" onClick="window.open('jsjj.asp?dm=<%=dm%>', 'Sample', 'toolbar=no,location=no,directories=no,status=no,menubar=no,scrollbars=yes,resizable=yes,copyhistory=yes,left=0,top=0')">
<font color="blue">查看</font></a></td>
<td align=center><a href=jssc.asp?dm=<%=dm%>><font color="red">点击删除</font></a></td>
<td align=center><a href=jsxg.asp?dm=<%=dm%>><font color="green">查看修改</font></a></td>
</tr>
<%
rs.movenext
loop
Response.Write("</table>")
Response.Write("</center>")
%>
<br>
<!--#include file="jsnnz.asp"-->
<table width="100%" border="0" align="center">
<tr>
<td>
<div align="center">
<select name="topic">
<option value="1">按代码搜</option>
<option value="2">按姓名搜</option>
<option value="3">按部门搜</option>
<option value="4">按学历搜</option>
<option value="5">按职称搜</option>
<option value="0" selected>智能搜索</option>
</select>
关键词：
<input type="text" name="key" size="20">
<input type="submit" name="Submit2" value="搜索">
</div>
</td>
</tr>
</table>
</form>
</body>
</html>
<%
rs.close
set rs=nothing
conn.close
set conn=nothing
end if
%>
<form action=jsindex0.asp method=post>
<center><input type=submit value="返回管理首页" align=center></center>
</form>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -