<% '请勿改动下面这三行代码 const ChannelID=2 Const ShowRunTime="Yes" dim OrderType MaxPerPage=20 SkinID=0 OrderType=trim(request("OrderType")) if OrderType="" then OrderType=1 else OrderType=Clng(OrderType) end if PageTitle="用户列表" strFileName="UserList.asp?OrderType=" & OrderType %> <%=strPageTitle & " >> " & PageTitle%> <% call MenuJS() %> onmousemove='HideMenu()'>
 
用户列表
<% call ShowAllUser() %>
<% if TotalPut>0 then call showpage(strFileName,totalPut,MaxPerPage,true,true,"个用户") end if %>
<% call Bottom() %> <% call PopAnnouceWindow(400,300) %> <% call CloseConn() %>