⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 operation.asp

📁 给某大型ICP网站开发的域名管理支付系统
💻 ASP
字号:
<!--#include file ="../profile/checksec.asp"-->
<HTML><HEAD><TITLE>交易信息</TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<STYLE type=text/css>TD {
	FONT-SIZE: 9pt; FONT-FAMILY: "宋体"
}
.e_8 {
	FONT-SIZE: 8pt; FONT-FAMILY: "Verdana"
}
.select {
	COLOR: #000000; BACKGROUND-COLOR: #ffffcc
}
.input {
	BORDER-RIGHT: #000000 1px solid; BORDER-TOP: #000000 1px solid; BORDER-LEFT: #000000 1px solid; COLOR: #ff0000; BORDER-BOTTOM: #000000 1px solid; BACKGROUND-COLOR: #ffffff
}
.x18 {
	LINE-HEIGHT: 18pt
}
</STYLE>

<script language="javascript" src="calender.js"></script>

<META content="MSHTML 6.00.2600.0" name=GENERATOR></HEAD>
<BODY text=#000000 vLink=#cc0000 aLink=#990099 link=#0066ff bgColor=#ffffff leftMargin=0 topMargin=0>
<form name=form1 action="" method=post>
<TABLE cellSpacing=0 cellPadding=1 width=640 align=center bgColor=#000000 
border=0>
  <TBODY>
  <TR>
    <TD>
      <TABLE cellSpacing=0 cellPadding=0 bgColor=#ffffff border=0>
        <TBODY>
        <TR bgColor=#ffb41d>
          <TD colSpan=3 height=12><IMG height=72 
            src="../images/paycentertop_01.gif" 
            width=174><IMG height=72 
            src="../images/paycentertop_02.gif" 
            width=168><IMG height=72 
            src="../images/paycentertop_03.gif" 
            width=158><IMG height=72 
            src="../images/paycentertop_04.gif" 
          width=140></TD></TR>
        <TR>
          <TD colSpan=3><IMG height=1 
            src="../images/paycenter_02.gif" 
        width=640></TD></TR>
        <TR>
          <TD vAlign=top bgColor=#ffffff height=406><IMG height=35 
            src="../images/paycenter_03.gif" width=475> 
            <TABLE cellSpacing=0 cellPadding=8 width=98% align=center 
              border=0 height="488">
              <TBODY> 
              <TR>
                <TD><IMG height=21 
                  src="../images/paycenter-bar_02.gif" 
                  width=400></TD></TR>
              <TR>
                <TD valign="top"> 
                  <TABLE cellSpacing=0 cellPadding=1 width="100%" align=center 
                  bgColor=#993300 border=0>
                    <TBODY> 
                    <TR>
                      <TD>
                      <%
                        dim pgIndex,pgNum,dealnum
                        if request("pageIndex")<>"" then 
	              		pgIndex=request("pageIndex")
	              	else
	              		pgIndex=1
	              	end if
                        date1=year(now) & "-" & month(now) & "-" & day(now)
                        Set Con=Server.CreateObject("ADODB.Connection")
			Con.Open "driver={Microsoft Access Driver (*.mdb)}; DBQ=" & server.MapPath("../database/yino.mdb")
			set rs=server.createobject("adodb.recordset")
			opertype=request.form("opertype")
			if opertype=0 or opertype="" then
				sql="select * from deal order by id DESC" 
			else if opertype=1 then
				sql="select * from deal where isdispose=0 order by id DESC"
			else if opertype=2 then
				sql="select * from deal where isdispose=1 order by id DESC"
			else
				sql="select * from deal where dealdate>=#" & date1 & "# order by ID DESC" 
			end if
			end if
			end if
			rs.open sql,Con,1,1
			dealnum=rs.recordcount
			pgnum=dealnum\8+1
		     %>
                          <TABLE cellSpacing=1 cellPadding=3 width="100%" border=0>
                            <TBODY> 
                            <TR> 
                              <TD colSpan=2 height="10"><b><font color="#FFFFFF">查看业务</font></b></TD>
                              <TD colSpan=4 height="10" align="right"><font color="#FFFFFF">目前第<%=pgIndex%>页&nbsp;共<%=pgNum%>页&nbsp;<%=dealnum%>条业务纪录</font></TD>
                            </TR>
                            <TR align="center"> 
                              <TD colSpan=3 height="20" bgcolor="#FFFFFF"> 
                                <select name=opertype onchange=form1.submit()>
                                  <option value="">请选择查看方式</option>
                                  <option value="0">查看全部业务</option>
                                  <option value="1">查看未处理业</option>
                                  <option value="2">查看已处理业务</option>
                                  <option value="3">查看当天的业务</option>
                                </select>
                              </TD>
                              <%//<!--TD height="20"> <a href=dispcndns.asp>处理中文域名解析</a></TD-->%>
                              <TD colSpan=3 height="20" bgcolor="#FFFFFF"><a href="disppay.asp">处理预付款</a>&nbsp;<a href="seepay.asp">查看预付款</a></TD>
                            </TR>
                            <TR> 
                              <TD width="19%" bgColor=#ffffff align="center"> 
                                代理ID号 </TD>
                              <TD bgColor=#ffffff width="24%" align="center">业务类型</TD>
                              <TD bgColor=#ffffff align="center" width="24%">加入时间</TD>
                              <TD bgColor=#ffffff align="center" width="9%">&nbsp;</TD>
                              <TD bgColor=#ffffff align="center" width="24%" colspan="2">&nbsp;</TD>
                            </TR>
                            <%  
				count=0
				do while not rs.eof
				count=count+1
				if count>(pgIndex-1)*8 and count<=pgIndex*8 then
                          %>
                            <TR> 
                              <TD width="19%" bgColor=#ffffff align="center"> 
                                <%=rs("dealobj")%> </TD>
                              <TD bgColor=#ffffff width="24%"><%=rs("dealtype")%></TD>
                              <TD bgColor=#ffffff align="center" width="24%"><%=year(rs("dealdate"))%>-<%=month(rs("dealdate"))%>-<%=day(rs("dealdate"))%>&nbsp;<%=hour(rs("dealdate"))%>时</TD>
                              <TD bgColor=#ffffff align="center" width="9%"><a href="seeoper.asp?id=<%=rs("id")%>">详情</a></TD>
                              <TD bgColor=#ffffff align="center" width="12%"> 
                                <%
                                if rs("isdispose")=0 then
                                %>
                                <a href="dispoper.asp?id=<%=rs("id")%>">处理</a> 
                                <%
                                else
                                %>
                                已处理 
                                <%
                                end if
                                %>
                              </TD>
                              <TD bgColor=#ffffff align="center" width="12%"> 
                                <%
                                if rs("isdispose")=1 then
                                %>
                                <a href="opermod.asp?id=<%=rs("id")%>">修改</a> 
                                <%
                                else
                                %>
                                &nbsp; 
                                <%
                                end if
                                %>
                              </TD>
                            </TR>
                              <%
                          rs.movenext
                         else if count<=(pgIndex-1)*8 then
			     	rs.movenext
		             else 
		             	exit do
		             end if
	                 end if
                         loop
                         rs.close
                         Con.close
                         %>
                            <TR align="right"> 
                              <TD colspan="6">
                               <table width="100%" border="0" cellspacing="0" cellpaddi="0">
                                <tr> 
                                  <td height="20" align="right" class="td_stytle">&nbsp; 
                                    <%
		                 pagelist=request("pagelist")
		                 if pagelist="" then
		                 	pagelist=0
		                 else	
		                 	pagelist=pagelist
		                 end if
		                 dim gotopage
		                 gotopage=pagelist*14
		                 if pagelist>0 then
		                 %>
                                    <a href="operation.asp?pagelist=<%=pagelist-1%>&pageIndex=<%=pgIndex%>"><font color=white>上一页</font></a> 
                                    <%
		                 end if
		                 do while gotopage<pgNum
		                 gotopage=gotopage+1
		                 if gotopage>(pagelist+1)*14 then exit do
		                 %>
                                    <a href="operation.asp?pagelist=<%=pagelist%>&pageIndex=<%=gotopage%>"><font color=white><%=gotopage%></font></a> 
                                    <%
		                 loop
		                 if pgNum>(pagelist+1)*14 then
		                 %>
                                    <a href="operation.asp?pagelist=<%=pagelist+1%>&pageIndex=<%=pgIndex%>"><font color=white>更多</font></a> 
                                    <%
		                 end if
		            
		                 %>
                                  </td>
                                </tr>
                              </table>
                              </TD>
                            </TR>
                          
                            </TBODY> 
                          </TABLE>
                      </TD></TR></TBODY></TABLE>
                  <table width="100%" border="0" cellspacing="0" cellpadding="0" height="41">
                    <tr>
                      <td align="center">
                        <input type="button" name="bt2" value="返回" onclick=window.open("../main.asp","_self")>
                      </td>
                    </tr>
                  </table>
                </TD>
              </TR></TBODY></TABLE></TD>
          <TD width=1 bgColor=#000000 rowSpan=2><IMG height=407 
            src="../images/paycenter_04.gif" width=1></TD>
          <TD vAlign=top align=middle width=164 bgColor=#ffb41d rowSpan=2>
            <P><IMG height=7 
            src="../images/paycenter_05_01.gif" 
            width=164></P>
            <P><A 
            href="http://www.paycenter.com.cn/cgi-bin/Agent/AgentIndex"><IMG 
            height=49 src="../images/bakc.gif" width=35 
            border=0></A></P></TD></TR>
        <TR>
          <TD colSpan=3 height=1><IMG height=1 
            src="../images/paycenter_07.gif" 
        width=640></TD></TR>
        <TR>
          <TD><IMG height=18 
            src="../images/paycenter_08.gif" 
width=475></TD>
          <TD width=1><IMG height=18 
            src="../images/paycenter_09.gif" width=1></TD>
          <TD><IMG height=18 
            src="../images/paycenter_10.gif" 
        width=164></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE></form></BODY></HTML>

⌨️ 快捷键说明

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