📄 ad_user.asp

📁 商品订单管理：商品分类管理添加与修改商品管理订单投诉订单反馈信息商品留言管理管理网站用户：管理用户管理后台管理员新闻公告管理：新闻添加（支持图片新闻）修改删除首页公告设置网站常规
💻 ASP
字号:
<!--#include file="conn.asp"-->
<head>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=ISO-8859-1">
<link href=img/css.css rel=STYLESHEET type=text/css>
</head>
<script>
  function user(id) { window.open("ad_viewuser.asp?user_id="+id,"","height=400,width=600,left=190,top=0,resizable=yes,scrollbars=yes,status=no,toolbar=no,menubar=no,location=no");} 
</script>
<script language="javascript">
function openScript(url, width, height){
	var Win = window.open(url,"openScript",'width=' + width + ',height=' + height + ',resizable=1,scrollbars=yes,menubar=no,status=yes' );
}
</script>
<%
if session("admin_name")="" then response.end
set rs=server.createobject("adodb.recordset")
%>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
  <tr>
    <td bgcolor="#F5EFE7" height="77"> 
      <table width="100%" border="1" cellspacing="0" cellpadding="0" bordercolor="#FFFFFF" height="100%" bgcolor="#F5EFE7">
        <tr bgcolor="688cb8"> 
          <td width="7%" height="17" bgcolor="#F5EFE7"> 
            <div align="center">ID</div>
          </td>
          <td width="9%" height="17" bgcolor="#F5EFE7"> 
            <div align="center">UserName</div>
          </td>
          <td width="14%" height="17" bgcolor="#F5EFE7"> 
            <div align="center">Email </div>
          </td>
          <td width="11%" height="17" bgcolor="#F5EFE7"> 
            <div align="center">Zipcode</div>
          </td>
          <td width="18%" height="17" bgcolor="#F5EFE7"> 
            <div align="center">Address</div>
          </td>
          <td width="11%" height="17" bgcolor="#F5EFE7"> 
            <div align="center">Register Date</div>
          </td>
          <td width="8%" height="17" bgcolor="#F5EFE7"> 
            <div align="center">Member Class</div>
          </td>
          <td width="5%" height="17" bgcolor="#F5EFE7"> 
            <div align="center">Points</div>
          </td>
          <td width="5%" height="17" bgcolor="#F5EFE7"> 
            Delete</td>
          <td width="12%" bgcolor="#F5EFE7" height="17"> 
            <div align="center">Upgrade to VIP</div>
          </td>
        </tr>
        <tr bgcolor="#FFFFFF"> 
          <%
page=request.querystring("page")
if page="" then page=1
if not(isnumeric(page)) then page=1
if page<1 then page=1
page=int(page)
sql="select * from [user] order by ID desc"
rs.open sql,conn,3,3
if rs.eof then
%>
          <td colspan="10" bordercolor="#F5EFE7">No User</td>
        </tr>
        <%else
rs.pagesize=20
totalrec=rs.recordcount
totalpage=rs.pagecount
if page>totalpage then page=totalpage
rs.absolutepage=page
rs.cachesize=rs.pagesize
i=0
dim user_id(),user_name(),user_mail(),user_postcode(),user_adds(),user_regtime(),user_type(),user_buymoney()
do while not rs.eof and (i<rs.pagesize)
i=i+1
redim preserve user_id(i),user_name(i),user_mail(i),user_postcode(i),user_regtime(i),user_type(i),user_adds(i),user_buymoney(i)
user_id(i)=rs("ID")
user_name(i)=rs("username")
user_mail(i)=rs("usermail")
user_buymoney(i)=rs("savemoney")
user_postcode(i)=rs("user_postcode")
user_regtime(i)=rs("regtime")
user_type(i)=rs("user_type")
user_adds(i)=rs("user_adds")
rs.movenext
loop
rs.close
for i=1 to ubound(user_id)
%>
        <tr bgcolor="#FFFFFF"> 
          <td width="7%" height="15" align="center" bordercolor="#F5EFE7"><%=user_id(i)%> 
            <div align="center"></div>
          </td>
          <td width="9%" height="15" align="center" bordercolor="#F5EFE7"><a href="javascript:openScript('ad_modify.asp?user_name=<%=user_name(i)%>',450,300)"><%=user_name(i)%></a>
            <div align="center"></div>
          </td>
          <td width="14%" height="15" align="center" bordercolor="#F5EFE7"><%=user_mail(i)%> 
            <div align="center"></div>
          </td>
          <td width="11%" height="15" align="center" bordercolor="#F5EFE7"><%=user_postcode(i)%> 
            <div align="center"></div>
          </td>
          <td width="18%" height="15" align="center" bordercolor="#F5EFE7"> 
            <div align="center"><%=user_adds(i)%></div>
          </td>
          <td width="11%" height="15" align="center" bordercolor="#F5EFE7"><%=user_regtime(i)%> </td>
          <td width="8%" height="15" align="center" bordercolor="#F5EFE7"><%=user_type(i)%> </td>
          <td width="5%" height="15" align="center" bordercolor="#F5EFE7"> 
            <div align="center"><%=user_buymoney(i)%></div>
          </td>
          <td width="5%" height="15" align="center" bordercolor="#F5EFE7"> 
            <a href="ad_viewuser.asp?user_id=<%=user_id(i)%>&action=deluser">Delete</a></td>
          <td width="12%" height="15" align="center" bordercolor="#F5EFE7"> 
            <div align="center"><a href="ad_sheng.asp?user_id=<%=user_id(i)%>&action=up">Upgrade</a> 
				/ <a href="ad_sheng.asp?user_id=<%=user_id(i)%>&action=down">degrade</a></div>
          </td>
        </tr>
        <%next
%>
        <tr bgcolor="#FFFFFF" align="right"> 
          <td colspan="10" height="2" bordercolor="#F5EFE7"> 
            <p align="left">Total Page:<font color=red><%=totalpage%></font>  Page:<%=page%> 
              <font color=666666> 
              <%if page-1>0 then%>
              <a href="ad_user.asp?page=<%=page-1%>">Last</a> 
              <%else%>
              Last 
              <%end if%>
              　 
              <%if page+1<=totalpage then%>
              <a href="ad_user.asp?page=<%=page+1%>">Next</a> 
              <%else%>
              next 
              <%end if%>
              </font></p>
          </td>
        </tr>
      </table>
    </td>
  </tr>
</table><%end if%>
 <form method="POST" action="ad_search.asp">
                            <table width="100%" height="30" border="0" cellpadding="0" cellspacing="0">
                              <tr> 
                                <td align="center">Search UserName:<input style="FONT-SIZE: 12px; WIDTH: 110px" type="text" name="user_name" size="15" class=input>
								<input type="submit" name="imageField2" value="search" ></td>
                              </tr>
                            </table>
                          </form>
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -