<!--#include virtual="/incs/config.asp"-->
<% chk_log()
chk_newpwr 4,10,1
%>
<%
''''''''''''''''''''''''''''''''

perpage=SafeRequest("perpage")
if chk_int(perpage)=false then
perpage=20
end if 
perpage=clng(perpage)
if perpage>50 then
perpage=50
end if
ThePage=0
page=0
rcount=0
thepage=0
'''''''''''''''''''''''''''''''''
ordernum=SafeRequest("ordernum")
if chk_int(ordernum)=true then
if ordernum=11 then
orderstring=" u_nme asc"
elseif ordernum=12 then
orderstring=" u_nme desc"
elseif ordernum=21 then
orderstring=" u_rotnme asc"
elseif ordernum=22 then
orderstring=" u_rotnme desc"
elseif ordernum=31 then
orderstring=" u_mnyavl asc"
elseif ordernum=32 then
orderstring=" u_mnyavl desc"
elseif ordernum=41 then
orderstring=" u_mnyrmn asc"
elseif ordernum=42 then
orderstring=" u_mnyrmn desc"
elseif ordernum=51 then
orderstring=" u_mnybrw asc"
elseif ordernum=52 then
orderstring=" u_mnybrw desc"
elseif ordernum=61 then
orderstring=" u_mnylck asc"
elseif ordernum=62 then
orderstring=" u_mnylck desc"
elseif ordernum=71 then
orderstring=" u_mnytmp asc"
elseif ordernum=72 then
orderstring=" u_mnytmp desc"
elseif ordernum=81 then
orderstring=" u_mnyprz asc"
elseif ordernum=82 then
orderstring=" u_mnyprz desc"
elseif ordernum=91 then
orderstring=" u_mnyusd asc"
elseif ordernum=92 then
orderstring=" u_mnyusd desc"
elseif ordernum=101 then
orderstring=" u_mnyall asc"
elseif ordernum=102 then
orderstring=" u_mnyall desc"
else
end if
else
ordernum=52
orderstring=" u_addtme desc"
end if
'''''''''''''''''''''''''''''''''''''''''
conn.open constr
query="select  *  from v_memlst   where 1=1  "&qstring&qstring2&"  order by "&orderstring
rs.open query,conn,1,1
if rs.RecordCount<=0 then
          ErrMsg="<font color=#ff0000>对不起</font>，没有搜索到符合条件的记录！..."
		
	   else
	      rcount=rs.recordcount
	      rs.pagesize=perpage
		  ThePage=rs.pagecount
		  if Chk_Int(SafeRequest("page"))=false then
		  page=1
		  else
		   page=cint(SafeRequest("page"))
		    if page<=0  then
		       page=1
		    elseif page>ThePage then
		       page=ThePage
		    end if	  
		  end if
		    rs.absolutepage=page
       end if   

%>
<!--#include virtual="/incs/top.asp"-->
<script language="javascript">
<!--

function tofirst()
{searchform.page.value=1;
searchform.submit();
 }
  function toprev()
{searchform.page.value-=1;
searchform.submit();
 }
  function tonext()
{
searchform.page.value=<%=page%>-1+2;
searchform.submit();
 }
  function tolast()
{searchform.page.value=<%=ThePage%>;
searchform.submit();
 }
 function toorder(ordn)
{searchform.ordernum.value=ordn;
searchform.page.value=1;
searchform.submit();
 }

 //-->
 </script>
<table cellspacing=2 cellpadding=0 width="100%" border=0>
  <tbody> 
  <tr> 
    <td  colspan=2 valign="middle"> 
      <table class=line cellspacing=0 cellpadding=0 width="100%" 
                  border=0 align="center">
        <tbody> 
        <tr> 
          <td valign=bottom width="25%" height=20><font color="#000000" class=ddropshadow><b><span class=enbold><strong>会员列表</strong></span></b></font></td>
          <td valign=bottom noWrap align=right 
                        width="75%"> <a href="fnc_lst.asp?unme=<%=unme%>&grd=<%=grd%>&gnme=<%=gnme%>&gid=<%=gid%>" class=commonface >财务流水</a> 
            | <a href="fnc_ruk.asp?unme=<%=unme%>&grd=<%=grd%>&gnme=<%=gnme%>&gid=<%=gid%>" class=commonface  ><font color="#FF0000">汇款入帐</font></a> 
            | <a href="fnc_kou.asp?unme=<%=unme%>&grd=<%=grd%>&gnme=<%=gnme%>&gid=<%=gid%>"  class=commonface ><font color="#FF0000">业务扣款</font></a> 
            | <a href="fnc_tui_ruk.asp?unme=<%=unme%>&grd=<%=grd%>&gnme=<%=gnme%>&gid=<%=gid%>"  class=commonface >退款入户</a> 
            | <a href="fnc_tui.asp?unme=<%=unme%>&grd=<%=grd%>&gnme=<%=gnme%>&gid=<%=gid%>"  class=commonface >退款出帐</a> 
            | <a href="fnc_fan.asp?unme=<%=unme%>&grd=<%=grd%>&gnme=<%=gnme%>&gid=<%=gid%>"  class=commonface >优惠返款</a> 
            | <a href="fnc_brw.asp?unme=<%=unme%>&grd=<%=grd%>&gnme=<%=gnme%>&gid=<%=gid%>"  class=commonface >资金借用</a> 
            | <a href="fnc_hua.asp?unme=<%=unme%>&grd=<%=grd%>&gnme=<%=gnme%>&gid=<%=gid%>"  class=commonface >借款归还</a> 
            | <a href="fnc_don.asp?unme=<%=unme%>&grd=<%=grd%>&gnme=<%=gnme%>&gid=<%=gid%>" class=commonface >冻结资金</a> 
            | <a href="fnc_jie.asp?unme=<%=unme%>&grd=<%=grd%>&gnme=<%=gnme%>&gid=<%=gid%>" class=commonface >解除冻结</a> 
            | <a href="fnc_mem.asp" class=commonface  >会员列表</a></td>
        </tr>
        <tr> 
          <td align=middle width="100%" colspan=2 height=5></td>
        </tr>
        <tr> 
          <td align=middle width="100%" colspan=2 height=2 class=menuline></td>
        </tr>
        </tbody> 
      </table>
      <br>
    </td>
  </tr>
  <tr> 
    <td  colspan=2 valign="middle" height="28"> 
      <table width="95%" border="0" cellspacing="0" cellpadding="0" align="center">
        <tbody> 
        <form action=fnc_mem.asp method=post name=searchform2>
          <tr> 
            <td height=20 width="119">&nbsp;共计 <b> <%=rcount%> </b>条记录 </td>
            <td height=20> 
              <div align="center"> 
                <input type=hidden name=qu1 value="<%=qu1%>">
                <input type=hidden name=qu2 value="<%=qu2%>">
                <input type=hidden name=qu3 value="<%=qu3%>">
                <input type=hidden name=qu4 value="<%=qu4%>">
                <input type=hidden name=qu5 value="<%=qu5%>">
                <input type=hidden name=qu6 value="<%=qu6%>">
                <input type=hidden name=qu7 value="<%=qu7%>">
                <input type=hidden name=qu8 value="<%=qu8%>">
                <input type=hidden name=querytype value="<%=querytype%>">
                <input type=hidden name=perpage value="<%=perpage%>">
                <input type=hidden name=ordernum value="<%=ordernum%>">
                <%=page_turn%></div>
            </td>
            <td height=20 width="120"> 
              <div align="right">转第 
                <select name="page" onChange="javascript:document.searchform2.submit();">
                  <option selected value=<%=page%>><%=page%></option>
                  <%
				   for i=1 to thepage
				   response.write "<option value="&i&">"&i&"</option>"
				   next
				   %>
                </select>
                页</div>
            </td>
          </tr>
        </form>
        </tbody> 
      </table>
      <table width="100%" border="0" cellspacing="0" cellpadding="0">
        <tr> 
          <td height=8></td>
        </tr>
      </table>
      <% if sessioN("sysclass")>=2 then %>
      <div align="center"><br>
        <% end if %>
      </div>
      <table border=0 cellpadding=0 
                        cellspacing=0 width="100%"  align="center" class=datalist >
        <tbody> 
        <tr bgcolor="#8b8b8b"> 
          <th width="6%" height="20" class=datalistheader  > 
            <%
			if ordernum=11 then
			odr1=12
			else
			odr1=11
			end if
			if ordernum=21 then
			odr2=22
			else
			odr2=21
			end if
			if ordernum=31 then
			odr3=32
			else
			odr3=31
			end if
			if ordernum=41 then
			odr4=42
			else
			odr4=41
			end if
			if ordernum=51 then
			odr5=52
			else
			odr5=51
			end if
			if ordernum=61 then
			odr6=62
			else
			odr6=61
			end if
			if ordernum=71 then
			odr7=72
			else
			odr7=71
			end if
			if ordernum=81 then
			odr8=82
			else
			odr8=81
			end if
			if ordernum=91 then
			odr9=92
			else
			odr9=91
			end if
			if ordernum=101 then
			odr10=102
			else
			odr10=101
			end if

			%>
            <b>序号</b> </th>
          <th class=datalistheader width="20%" > <a href="javascript:toorder(<%=odr1%>);" class=commonface ><b>会员名称</b></a> 
          </th>
          <th width="8%" class=datalistheader > <a href="javascript:toorder(<%=odr3%>);" class=commonface ><b>可用</b></a> 
          </th>
          <th width="8%" align="center" class=datalistheader > <a href="javascript:toorder(<%=odr4%>);" class=commonface ><b>余额</b></a> 
          </th>
          <th width="8%" align="center" class=datalistheader > <a href="javascript:toorder(<%=odr5%>);" class=commonface ><b>借款</b></a> 
          </th>
          <th width="8%" align="center" class=datalistheader > <a href="javascript:toorder(<%=odr6%>);" class=commonface ><b>冻结</b></a> 
          </th>
          <th width="8%" align="center" class=datalistheader > <a href="javascript:toorder(<%=odr7%>);" class=commonface ><b>浮动</b></a> 
          </th>
          <th width="8%" align="center" class=datalistheader ><a href="javascript:toorder(<%=odr8%>);" class=commonface ><b>返款</b></a></th>
          <th width="8%" align="center" class=datalistheader ><a href="javascript:toorder(<%=odr9%>);" class=commonface ><b>消费</b></a></th>
          <th width="8%" align="center" class=datalistheader ><a href="javascript:toorder(<%=odr10%>);" class=commonface ><b>汇款</b></a></th>
          <th align="center" class=datalistheader >查看</th>
        </tr>
        <%
		  i=1
	Do While Not rs.eof 
if i mod 2=1 then
classstl="datalistgrida"
else
classstl="datalistgridb"
end if
	%>
        <tr> 
          <td height="20" align=center class=<%=classstl%> ><a href="javascript:showurl('/master/memmng/mem_dtl.asp?uid=<%=rs("u_id")%>');" class=commonface><u>&nbsp;<%=i%>&nbsp;</u></a></td>
          <td align=center  class=<%=classstl%>  ><a href="javascript:showurl('/master/memmng/mem_dtl.asp?uid=<%=rs("u_id")%>');" class=commonface><b><u><%=rs("u_nme")%></u></b></a> 
          </td>
          <td  align=right  class=<%=classstl%> ><%=rs("u_mnyavl")%>&nbsp;</td>
          <td  align=right  class=<%=classstl%> ><font color=#ff0000><%=rs("u_mnyrmn")%></font>&nbsp;</td>
          <td  align=right  class=<%=classstl%> ><font color=#0000ff><%=rs("u_mnybrw")%></font>&nbsp;</td>
          <td  align=right  class=<%=classstl%> ><%=rs("u_mnylck")%>&nbsp;</td>
          <td  align=right  class=<%=classstl%> ><%=rs("u_mnytmp")%>&nbsp;</td>
          <td  align=right class=<%=classstl%>  ><%=rs("u_mnyprz")%>&nbsp;</td>
          <td  align=right class=<%=classstl%>  ><%=rs("u_mnyusd")%>&nbsp;</td>
          <td  align=right class=<%=classstl%>  ><%=rs("u_mnyall")%>&nbsp;</td>
          <td  align=center class=<%=classstl%>  > 
            <input type="button" name="Submit" value="查 看" class=btxx onclick="javascript:showurl('/master/fncmng/fnc_lst.asp?t_usr=<%=trim(rs("u_nme"))%>');">
          </td>
        </tr>
        <%
  rs.movenext
i=i+1
if i>perpage then
exit do
end if

  loop 
  	rs.close
	conn.close
  %>
        </tbody> 
      </table>
      <table width="100%" border="0" cellspacing="0" cellpadding="0">
        <tr> 
          <td height=8></td>
        </tr>
      </table>
      <table width="95%" border="0" cellspacing="0" cellpadding="0" align="center">
        <tbody> 
        <form action=fnc_mem.asp method=post name=searchform>
          <tr> 
            <td height=20 width="120">&nbsp;共计 <b> <%=rcount%> </b>条记录 </td>
            <td height=20> 
              <div align="center"> 
                <input type=hidden name=qu1 value="<%=qu1%>">
                <input type=hidden name=qu2 value="<%=qu2%>">
                <input type=hidden name=qu3 value="<%=qu3%>">
                <input type=hidden name=qu4 value="<%=qu4%>">
                <input type=hidden name=qu5 value="<%=qu5%>">
                <input type=hidden name=qu6 value="<%=qu6%>">
                <input type=hidden name=qu7 value="<%=qu7%>">
                <input type=hidden name=qu8 value="<%=qu8%>">
                <input type=hidden name=querytype value="<%=querytype%>">
                <input type=hidden name=perpage value="<%=perpage%>">
                <input type=hidden name=ordernum value="<%=ordernum%>">
                <%=page_turn%> </div>
            </td>
            <td height=20 width="120"> 
              <div align="right">转第 
                <select name="page" onChange="javascript:document.searchform.submit();">
                  <option selected value=<%=page%>><%=page%></option>
                  <%
				   for i=1 to thepage
				   response.write "<option value="&i&">"&i&"</option>"
				   next
				   %>
                </select>
                页</div>
            </td>
          </tr>
        </form>
        </tbody> 
      </table>
      <table width="100%" border="0" cellspacing="0" cellpadding="0">
        <tr> 
          <td height=8></td>
        </tr>
      </table>
      <%
Function showstatus(svalues,buytest,expiredate )
	if cdate(expiredate) < date() then msg="<img src=/icons/fei1.gif>"
If buytest=1 Then
	Select Case svalues
	  Case 1   '运行
		showstatus="<img src=/icons/green1.gif>" & msg
	  Case 2   '暂停
		showstatus="<img src=/icons/green2.gif>"   & msg
	  case 5 '管理员停止
		showstatus="<img src=/icons/sysstop.gif>"   & msg
	  case 0 '未开设
		showstatus="<img src=/icons/nodong2.gif>"   & msg
	  Case 4'已经删除
		showstatus="<img src=/icons/delvho.gif>"   & msg
	  case 3'处理中
		showstatus="<img src=/icons/nodong.gif>"   & msg
	End Select
else
	Select Case svalues
	  Case 1   '运行
		showstatus="<img src=/icons/yell1.gif>"   & msg
	  Case  2   '暂停
		showstatus="<img src=/icons/yell2.gif>"   & msg
	  case 5 '管理员停止
		showstatus="<img src=/icons/sysstop.gif>"  & msg
	  case 0 '未开设
		showstatus="<img src=/icons/nodong2.gif>"   & msg
	  Case 4'已经删除
		showstatus="<img src=/icons/delvho.gif>"   & msg
	  case 3'处理中
		showstatus="<img src=/icons/nodong.gif>"   & msg
	End Select
End If

End Function
%>
      <br>
    </td>
  </tr>
  </tbody> 
</table>
<!--#include virtual="/incs/bottom.asp"-->


