<% if session("S_login")="" then Response.Redirect "default.asp" end if %> 用户首页
<% dim db,trs Set db=new Connections set trs=server.CreateObject("ADODB.recordset") strsql="select * from MEMBER_CN order by ADD_DATE desc" set trs=db.Query (strsql,1) if not trs.eof then page_size=15 totalrecord=db.GetRecordcount(trs) totalpage=db.GetPagecount(totalrecord,page_size) nowpage=Request("page") if nowpage="" or cint(nowpage)<1 then nowpage=1 else nowpage=cint(nowpage) end if trs.movefirst trs.move (nowpage-1)*page_size end If while not trs.eof And i <% i=i+1 trs.movenext Wend %>
选择 姓名 性别 省市 职务 单位 注册时间 操作
bgcolor="#CCDEFF"<%else%> bgcolor="#9FC0FD"<%end if%> align="center" style="cursor:hand"> "> bgcolor="#CCDEFF"<%else%> bgcolor="#9FC0FD"<%end if%> align="center">"><%=trs("M_NAME")%> bgcolor="#CCDEFF"<%else%> bgcolor="#9FC0FD"<%end if%> align="center"><%=trs("M_SEX")%> bgcolor="#CCDEFF"<%else%> bgcolor="#9FC0FD"<%end if%> align="center"><%=trs("M_SHENG")%>-<%=trs("M_COUNTRY")%> bgcolor="#CCDEFF"<%else%> bgcolor="#9FC0FD"<%end if%> align="center"><%=trs("M_TITLE")%> bgcolor="#CCDEFF"<%else%> bgcolor="#9FC0FD"<%end if%> align="center"><%=trs("M_AGENCIES")%> bgcolor="#CCDEFF"<%else%> bgcolor="#9FC0FD"<%end if%> align="center"><%=trs("ADD_DATE")%> bgcolor="#CCDEFF"<%else%> bgcolor="#9FC0FD"<%end if%> align="center"> ">修改

<% showpage totalrecord,totalpage,nowpage,"member_list_cn.asp" Set db=nothing %> <%if session("U_Type")="finance" or session("U_Type")="manager" then%>  全部选中             <%end if%>