📄 default.asp
字号:
<!-- #include file="../inc/err.asp" -->
<!--#include file="../../connections/conndb.asp" -->
<%
company=trim(request("company"))
linkman=trim(request("linkman"))
userid=trim(request("userid"))
sql="select * from tbl_client where 1=1"
if userid<>"" then
sql=sql&" and userid='"&userid&"'"
end if
if linkman<>"" then
sql=sql&" and linkman='"&linkman&"'"
end if
if company<>"" then
sql=sql&" and company like '%"&company&"%'"
end if
sql=sql&" order by inputdate desc"
'response.Write sql
'response.End()
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1
if not rs.eof then
pagenum=16
%>
<!--#include file="../inc/page.asp" -->
<HTML>
<HEAD>
<title>会员管理</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<!--#include file="../inc/script.asp" -->
</HEAD>
<BODY text="#000000" link="#000000" vlink="#000000" LEFTMARGIN=0 TOPMARGIN=0>
<table width="99%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr height=10>
<td ></td>
</tr>
<tr>
<td>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td> <table width="100%" border="0" cellspacing="0" cellpadding="0">
<form name="form2" method="post" action="default.asp">
<tr>
<td> 会员帐号
<input name="userid" type="text" id="userid" size="16" maxlength="20" > 公司名称
<input name="company" type="text" id="company" >
联系人
<input name="linkman" type="text" id="linkman" size="10" maxlength="20">
<input type="submit" name="Submit" value="查 询" class="button"> </td>
<td align="right"> <strong>会员管理</strong></td>
</tr>
</form>
</table></td>
</tr>
</table></td>
</tr>
<tr>
<td width="100%" align=center valign="top">
<table width="100%" border=0 align="center" cellpadding="0" cellspacing="1" bordercolorlight=#c0c0c0 bordercolordark=#ffffff bgcolor="#999999">
<FORM name="theform" method="post" action="delete.asp">
<tr bgcolor="#B6CBEB">
<td width="6%" height="22" align="center">
<input type="checkbox" id="check1" name="chkall" value="on" onclick="CheckAll(this.form)">
</td>
<td width="12%"> 会员帐号</td>
<td align="center" bgcolor="#B6CBEB"> 公司名称</td>
<td width="12%"> 联系人</td>
<td width="12%" height="22"> 加入日期</td>
<td width="15%" height="22" align="center">管理操作</td>
</tr>
<%
while Repeat1__numRows <> 0 and not rs.eof
%>
<tr bgcolor="#FFFFFF" onmouseover="mOvr(this,'#ECECFC');" onmouseout="mOut(this,'#ffffff');">
<td width="8%" height="22" align="center"> <input type="checkbox" name="c" value="<%=rs("id")%>">
</td>
<td> <a href=javascript:urll('show.asp?id=<%=rs("id")%>')><%=rs("userid")%></a></td>
<td height="22" align="center"><a href=javascript:urll('show.asp?id=<%=rs("id")%>')>
<%
if rs("company")<>"" then
response.write rs("company")
else
response.write "个人用户"
end if
%>
</a></td>
<td> <%=rs("linkman")%></td>
<td> <%=datevalue(rs("inputdate"))%></td>
<td height="22" align="center"> <a href=javascript:urll('modify.asp?id=<%=rs("id")%>')>修改</a> <a href=delete.asp?c=<%=rs("id")%>>删除</a>
</td>
</tr>
<%
Repeat1__index=Repeat1__index+1
Repeat1__numRows=Repeat1__numRows-1
rs.movenext
wend
%>
<tr bgcolor="#FFFFFF">
<td> <div align="center">全/清</div></td>
<td colspan="5"> <input name="submit" type="submit" value="删除记录" class="button">
<input name="submit2" type="reset" value="取 消" class="button"> </td>
</tr>
</form>
<tr bgcolor="#FFFFFF">
<td height=22 colspan="6"> <!--#include file="../inc/pages.asp" --> </td>
</tr>
</table>
</td>
</tr>
</table>
</BODY>
</HTML>
<%
else
call msg("没有任何信息！","javascript:history.back()")
response.end
end if
rs.close
set rs=nothing
conn.close
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -