📄 feiyongquery.asp
字号:
<!--#include file="conn.asp"-->
<%
if session("user")="" then
response.write "您无此权限"
response.end
end if
dim user_name,user_number,sql
id=request("id")
if id=1 then
user_name=trim(request("user_name1"))
if user_name="" then
response.write "输入不能为空"
response.end
end if
sql="user_name like'%"&user_name&"%'"
end if
if id=2 then
user_number=trim(request("user_number1"))
if user_number="" then
response.write "输入不能为空"
response.end
end if
sql="user_number ='"&user_number&"'"
end if
set rs=server.createobject("adodb.recordset")
sql="select * from feiyong where "&sql
rs.open sql,conn,1,1
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>查询结果</title>
<link rel="stylesheet" href="style.css">
</head>
<body>
<!--#include file="top.asp"-->
<p> </p>
<div align="center">
<table border="1" width="700" bordercolorlight="#000000" cellspacing="0" cellpadding="4" bordercolordark="#FFFFFF">
<tr>
<td width="50" align="center">学号</td>
<td width="50" align="center">姓名</td>
<td width="70" align="center">费用类型</td>
<td width="70" align="center">交费时间</td>
<td width="50" align="center">费用金额</td>
<td width="90" align="center">延长(至)</td>
<td width="170" align="center">备注</td>
<td width="50" align="center">修改</td>
<td width="50" align="center">删除</td>
</tr>
<%if not rs.eof then%>
<%do while not rs.eof
%>
<tr>
<td width="50" align="center"><%=rs("user_number")%></td>
<td width="50" align="center"><%=rs("user_name")%></td>
<td width="70" align="center"><%=rs("user_type")%></td>
<td width="70" align="center"><%=rs("user_time")%></td>
<td width="50" align="center"><%=rs("money")%></td>
<td width="90" align="center"><%=rs("data")%></td>
<%
info=len(rs("info"))
if info>10 then
info=left(rs("info"),10)
%>
<td width="170" align="center"><%=info%>.. <a href="query_feiyong.asp?id=<%=rs("id")%>">[详情]</a></td>
<%else%>
<td width="170" align="center"><%=rs("info")%></td>
<%end if%>
<td width="50" align="center"><a href="mod_feiyong.asp?id=<%=rs("id")%>">修改</a></td>
<td width="50" align="center"><a href=javascript:if(confirm('确实要删除吗?'))location='del_feiyong.asp?id=<%=rs("id")%>'>删除</a>
</td>
</tr>
<%
rs.movenext
loop
else%>
<tr>
<td colspan="9"><marquee>
暂无奖惩情况添加
</marquee></td>
</tr>
</table>
<%
end if
rs.close
set rs=nothing
%>
</div>
<!--#include file="down.asp"-->
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -