<!--#include virtual="/incs/config.asp"-->
<!--#include virtual="/incs/web_top.asp"-->
<%
chk_log_usr()
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
perpage=SafeRequest("perpage")
if chk_int(perpage)=false then
perpage=15
end if 
perpage=clng(perpage)
if perpage>=100 then
perpage=100
end if
ThePage=0
page=0
rcount=0
thepage=0
'''''''''''''''''''''''''''''''''
dim colors(25)
colors(0)="#000000"
colors(1)="#ff0000"
colors(2)="#008200"
colors(3)="#ff00ff"
colors(4)="#"
colors(5)="#"
colors(6)="#"
colors(7)="#"
colors(8)="#"
colors(9)="#"
''''''''''''''''''''''''''''''''''
k_wrds=trim(SafeRequest("k_wrds"))
k_tpe=trim(SafeRequest("k_tpe"))
k_mod=trim(SafeRequest("k_mod"))
if  k_wrds<>"" and instr(k_wrds,"'")<=0 then
if k_mod="moda" then
keywords=" and "&k_tpe&"='"&k_wrds&"'"
else
keywords=" and "&k_tpe&" like '%"&k_wrds&"%'"
end if

end if
''''''''''''''''''''''''''''''''''
t_str1=trim(SafeRequest("t_str1"))
t_str2=trim(SafeRequest("t_str2"))
if t_str1<>"" and t_str2<>"" then
if ((not chk_tme(t_str1)) and (not chk_tme(t_str2))) or instr(t_str1,"-")<=0 or instr(t_str2,"-")<=0 then
call errorpage(-2,"对不起，时间格式不正确!")
end if
timestrings=" and (addtime>='"&t_str1&"' and addtime<='"&t_str2&"')"
end if
''''''''''''''''''''''''''''''''''''''
odr1=trim(SafeRequest("odr1"))
odr2=trim(SafeRequest("odr2"))
if odr1="" or odr2="" then
odr1="a_addtime_d"
odr2="b_v_rname_a"
end if
order1=right(odr1,len(odr1)-2)
aff_a=left(order1,len(order1)-2)
if right(order1,1)="a" then
order1=left(order1,len(order1)-2)
else
order1=left(order1,len(order1)-2)&" desc"
end if
order2=right(odr2,len(odr2)-2)
aff_b=left(order2,len(order2)-2)
if right(order2,1)="a" then
order2=left(order2,len(order2)-2)
else
order2=left(order2,len(order2)-2)&" desc"
end if


if aff_a=aff_b then
orderstring=order1
else
orderstring=order1&","&order2
end if

''''''''''''''''''''''
if chk_int(SafeRequest("payid")) then
keywords=" and payid="&SafeRequest("payid")
end if
query="select * from onlpay where username='"&session("usrname")&"' "&keywords&timestrings&" 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   

%>

<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.odr1.value=ordn;
searchform.page.value=1;
searchform.submit();
 }
 function toorder2()
 {
 frm_qry.k_tpe.value="tpe";
 frm_qry.k_wrds.value=form_sss.odrsss.value;
 frm_qry.submit();
 }
function ifdel(fid)
{
if(confirm("是否确认删除该在线支付记录?"))
location.href="fnc_mng.asp?module=onl_del&payid="+fid;
}

function delall()
{
if(confirm("是否确认删除?"))
document.aff_frm.submit();
}

function checkAll()
  {
    for (var i=0;i<document.aff_frm.elements.length;i++)
    {
      var e = document.aff_frm.elements[i];
      var boolValue = document.aff_frm.selectAll.checked;
      if (e.name != 'selectAll')
	  {
        e.checked = boolValue;
	  }
    }
  }

 //-->
 </script>
      <table cellspacing=0 cellpadding=0 width="100%" border=0>
        <tbody> 
        <tr> 
          <td colspan=2><img height=3 
            src="/imgs/spacer.gif" width=3></td>
        </tr>
        <tr> 
          
          
          <td width=438 
          background=/imgs/bg_inside_pages_link.jpg 
          height=30><img height=11 
            src="/imgs/aword_square.gif" width=11 
            align=absMiddle> <a href="/">首 页</a> <strong>&gt;</strong> <a href="/control/">管理中心</a> 
            <b>&gt;</b> <a href="/control/onl_mng/usr_onl.asp">在线支付查看</a></td>
          <td>&nbsp;</td>
        </tr>
        <tr> 
          <td colspan=2><img height=10 
            src="/imgs/shadow_inside_pages.jpg" 
        width=438></td>
        </tr>
        </tbody>
      </table>
 <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
        <TBODY>
        <TR>
          <TD vAlign=top width=180 bgColor=#f3f3f3><!--#include virtual="/incs/control_left.asp"-->
            <br>
            <br>
            <br>
            <br>
            <br>
            <br>
            <br>
            <br>
            <br>
          </TD>
          <TD vAlign=top width=10 
          background=/imgs/bg_inside_pages_block.jpg><IMG 
            height=1 src="/imgs/bg_inside_pages_block.jpg" 
            width=10></TD>
          <TD vAlign=top> 
            <table cellspacing=2 cellpadding=0 width="100%" border=0>
              <tbody> 
              <tr> 
                <td  colspan=2 valign="middle">
                  <table class=line cellspacing=0 cellpadding=0 width="98%" 
                  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%">&nbsp; </td>
                    </tr>
                    <tr> 
                      <td align=middle width="100%" colspan=2 height=5></td>
                    </tr>
                    <tr> 
                      <td align=middle width="100%" colspan=2 height=2 bgcolor="#5F5F5F"></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=usr_onl.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=k_tpe value="<%=k_tpe%>">
                <input type=hidden name=k_mod value="<%=k_mod%>">
                <input type=hidden name=k_wrds value="<%=k_wrds%>">
                <input type=hidden name=t_str1 value="<%=t_str1%>">
                <input type=hidden name=t_str2 value="<%=t_str2%>">
                <input type=hidden name=odr1 value="<%=odr1%>">
                <input type=hidden name=odr2 value="<%=odr2%>">
                <input type=hidden name=perpage value="<%=perpage%>">
                            <%=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 right(odr1,2)="_d" then
				  odr1_1="a_v_amount_a"
				  odr1_2="a_v_pstring_a"
				  odr1_3="a_v_pmode_a"
				  odr1_5="a_addtime_a"

				  odr1_7="a_fathercon_a"
				  odr1_8="a_v_rname_a"
				  else
				  odr1_1="a_v_amount_d"
				  odr1_2="a_v_pstring_d"
				  odr1_3="a_v_pmode_d"
				  odr1_5="a_addtime_d"

				  odr1_7="a_fathercon_d"
				  odr1_8="a_v_rname_d"
				  end if
				  %><br>
                  
                  <table border=0 cellpadding=0 
                        cellspacing=1 width="98%" bordercolordark="#FFFFFF" align="center" bgcolor="#666666" >
                    <tbody> 
                    <form action=onl_mng.asp method=post name=aff_frm>
                      <tr bgcolor="#8b8b8b"> 
                        <td width="6%" height="25"> 
                          <div align="center"><font color="#FFFFFF"><u>序</u></font></div>
                        </td>
                        <td width="13%"> 
                          <div align="center"><a href="javascript:toorder('<%=odr1_1%>');"><font color="#FFFFFF"><u>金额</u></font></a></div>
                        </td>
                        <td width="12%" align="center"><a href="javascript:toorder('<%=odr1_2%>');"><font color="#FFFFFF"><u>支付结果</u></font></a></td>
                        <td width="20%"> 
                          <div align="center"><a href="javascript:toorder('<%=odr1_3%>');"><font color="#FFFFFF"><u>支付银行</u></font></a></div>
                        </td>
                        <td width="20%"> 
                          <div align="center"><a href="javascript:toorder('<%=odr1_5%>');"><font color="#FFFFFF"><u>支付时间</u></font></a></div>
                        </td>
                        <td width="15%"> 
                          <div align="center"><a href="javascript:toorder('<%=odr1_7%>');"><font color="#FFFFFF"><u>审核</u></font></a></div>
                        </td>
                        <td> 
                          <div align="center"><a href="javascript:toorder('<%=odr1_8%>');"><font color="#FFFFFF"><u>用户</u></font></a></div>
                        </td>
                      </tr>
                      <%
  i=1
   do while not rs.eof %>
                      <tr  bgcolor="#ffffff" > 
                        <td height="25" align=center><%=i+perpage*(page-1)%></td>
                        <td  align=center> 
                          <div align="right"><font color="#000000"><b> <%=rs("v_amount")%></b>&nbsp;</font></div>
                        </td>
                        <td  align=center><font color="#000000"><%=rs("v_pstring")%></font></td>
                        <td  align=center><font color="#000000"><%=rs("v_pmode")%></font></td>
                        <td  align=center><%=right(left(replace(rs("addtime")," ","   "),10),8)%> 
                        </td>
                        <td  align=center> 
                          <%
		  if trim(rs("fathercon"))="" or isnull(rs("fathercon")) then
		  response.write "<font color=#ff0000>未审核</font>"
		  else
		  response.write "<font color=#000000>"&rs("fathercon")&"</font>"
		  end if %>
                        </td>
                        <td  align=center> <%=rs("v_rname")%> </td>
                      </tr>
                      <%
  rs.movenext
i=i+1
if i>perpage then
exit do
end if

  loop 
  %>
                    </form>
                    </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=usr_onl.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=k_tpe value="<%=k_tpe%>">
                <input type=hidden name=k_mod value="<%=k_mod%>">
                <input type=hidden name=k_wrds value="<%=k_wrds%>">
                <input type=hidden name=t_str1 value="<%=t_str1%>">
                <input type=hidden name=t_str2 value="<%=t_str2%>">
                <input type=hidden name=odr1 value="<%=odr1%>">
                <input type=hidden name=odr2 value="<%=odr2%>">
                <input type=hidden name=perpage value="<%=perpage%>">
                            <%=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>
<br>
                  <table width="98%" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#666666">
                    <form action="usr_onl.asp" method=post name="frm_qry">
                      <tr align="center" bgcolor="#8b8b8b"> 
                        <td height="22"><font color="#FFFFFF">关键字</font></td>
                        <td><font color="#FFFFFF">时间(yyyy-mm-dd)</font></td>
                        <td><font color="#FFFFFF">排序</font></td>
                        <td><font color="#FFFFFF">条/页</font></td>
                        <td><font color="#FFFFFF">查询</font></td>
                      </tr>
                      <tr align="center" bgcolor="#FFFFFF"> 
                        <td height="25"> <select name="k_tpe">
                            <option value="v_remail"  <% if k_tpe="v_remail" then
						  response.write " selected"
						  end if %>>邮箱</option>
                            <option value="v_pmode"  <% if k_tpe="v_pmode" then
						  response.write " selected"
						  end if %>>银行</option>
                         </select> <select name="k_mod">
                            <option value="moda" <% if k_mod="moda" then
						  response.write " selected"
						  end if %>>等于</option>
                            <option value="modb"  <% if k_mod="modb" then
						  response.write " selected"
						  end if %>>类似</option>
                          </select> <input name="k_wrds" type="text" size="8" maxlength="50" value="<%=k_wrds%>"> 
                        </td>
                        <td> <input name="t_str1" type="text" size="6" maxlength="10" value="<%=t_str1%>">
                          到 
                          <input name="t_str2" type="text" size="6" maxlength="10" value="<%=t_str2%>"></td>
                        <td> <select name="odr1">
                            <option value="a_addtime_a" style="color:#ff0000;" <% if odr1="a_addtime_a" then
						  response.write " selected"
						  end if %> >时间顺</option>
                            <option style="color:#ff0000" value="a_addtime_d" <% if odr1="a_addtime_d" then
						  response.write " selected"
						  end if %> >时间倒</option>
                            <option style="color:#0000ff" value="a_v_pmode_a" <% if odr1="a_v_pmode_a" then
						  response.write " selected"
							  end if %> >银行顺</option>
                            <option style="color:#0000ff" value="a_v_pmode_d" <% if odr1="a_v_pmode_d" then
						  response.write " selected"
						  end if %> >银行倒</option>
                            <option style="color:#0000ff" value="a_v_amount_a" <% if odr1="a_v_amount_a" then
						  response.write " selected"
							  end if %> >金额顺</option>
                            <option style="color:#0000ff" value="a_v_amount_d" <% if odr1="a_v_amount_d" then
						  response.write " selected"
						  end if %> >金额倒</option>

                          </select><select name="odr2">
                            <option value="b_addtime_a" style="color:#ff0000;" <% if odr1="b_addtime_a" then
						  response.write " selected"
						  end if %> >时间顺</option>
                            <option style="color:#ff0000" value="b_addtime_d" <% if odr1="b_addtime_d" then
						  response.write " selected"
						  end if %> >时间倒</option>
                            <option style="color:#0000ff" value="b_v_pmode_a" <% if odr1="b_v_pmode_a" then
						  response.write " selected"
							  end if %> >银行顺</option>
                            <option style="color:#0000ff" value="b_v_pmode_d" <% if odr1="b_v_pmode_d" then
						  response.write " selected"
						  end if %> >银行倒</option>
                            <option style="color:#0000ff" value="b_v_amount_a" <% if odr1="b_v_amount_a" then
						  response.write " selected"
							  end if %> >金额顺</option>
                            <option style="color:#0000ff" value="b_v_amount_d" <% if odr1="b_v_amount_d" then
						  response.write " selected"
						  end if %> >金额倒</option>
                          </select> </td>
                        <td><input name="perpage" type="text" size="2" maxlength="3" value="<%=perpage%>"></td>
                        <td> <input type="submit" name="Submit" value="查询" class=dud_button1></td>
                      </tr>
                    </form>
                  </table> </td>
              </tr>
              </tbody> 
            </table>
            
          </TD>
        </TR></TBODY></TABLE>
      
	  <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
        <TBODY>
        <TR>
          <TD bgColor=#cccccc><IMG height=1 
            src="/imgs/spacer.gif" 
      width=1></TD></TR></TBODY></TABLE>
<!--#include virtual="/incs/web_bottom.asp"-->