viewxf.asp

国内第一数字点卡销售程序。功能强大。 完整无错！数据文件经MD5加密！经严格测试

<!--#include file="top.asp"-->
<% if session("user_name")="" then
   response.write "<script language=javascript>alert('此功能提供给商城用户，请先登陆后操作，谢谢合作！');history.go(-1);</script>"
   response.End
end if
%>
<td width="15" height="3">&nbsp;</td>
<!--#include file="leftuser.asp"--></td>
  <td width="15" height="30">&nbsp;</td>
			<td width="760" valign="top"><br><br>
			<table border="0" width="600" cellspacing="0" cellpadding="0" height="379">
				<tr>
					<td height="100%" width="600" valign="top" style="padding-left: 5px">
	<%set rsq=conn.execute("select sum(sub_totalcash) from sub where  user_name='"&session("user_name")&"' and sub_payok=true")
	tomoney=rsq(0)
	if tomoney&"1"="1" then tomoney=0
	sql="select * from sub where user_name='"&session("user_name")&"' and sub_payok=true order by sub_id desc"  
    rs.open sql,conn,3,3  
    if rs.eof then %> 
       <br> <br>
       暂时没有购买过任何产品！ <br> <br>
             <%else
             rs.pagesize=15
             page = cint(request("page"))
             if page = "" then page = 1
             if page < 1 then page=1
             if page >= rs.pagecount then page = rs.pagecount
             rs.absolutepage = page%>

             <div align="center">
             <table border="1" width="566" cellspacing="0" cellpadding="0" bordercolorlight="#C0C0C0" bordercolordark="#FFFFFF" height="63">
		<tr>
			<td align="center" height="25" width="101">订单号</td>
			<td align="center" height="25" width="114">订购产品</td>
			<td align="center" height="25" width="56">订购数量</td>
			<td align="center" height="25" width="52">单价</td>
			<td align="center" height="25" width="83">订单状态</td>
			<td align="center" height="25" width="146">订购时间</td>
		</tr>
<%
for i=1 to rs.pagesize
%>
		<tr>
			<td align="center" height="25" width="101">
			<%if rs("sub_cz")="0" then%><a href="viewcardpass.asp?sub_number=<%=rs("sub_number")%>"><%end if%><%=rs("sub_number")%>&nbsp;</a></td>
			<td align="center" height="25" width="114"><%=rs("hw_name")%>&nbsp;</td>
			<td align="center" height="25" width="56"><%=rs("hw_count")%>&nbsp;</td>
			<td align="center" height="25" width="52"><%=rs("hw_cash")%>&nbsp;</td>
			<td align="center" height="25" width="83"><%if rs("sub_cz")="1" then%><%if rs("sub_check")=true then%>充值成功<%else%>正在处理<%end if%><%else%>点卡已发<%end if%></td>
			<td align="center" height="25" width="146"><%=rs("sub_date")%>&nbsp;</td>
		</tr>
<%
rs.movenext
if rs.eof then exit for
next
%>
</table>

<p align="center">共有记录<%=rs.recordcount%>条&nbsp;                   
<%=page%>/<%=rs.pagecount%>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; <A href="<%request.servervariables("document_name")%>?page=<%=page-1%>">上一页</A> <A href="<%request.servervariables("document_name")%>?page=<%=page+1%>">下一页</A>&nbsp;&nbsp;&nbsp; 转到第 <SELECT onchange="window.location='?page='+this.value" name=gopage>              
<%for x=1 to rs.pagecount%>
<OPTION <%if x=page then%>selected<%end if%> value=<%=x%>><%=x%></OPTION>
<%next%>      
</SELECT> 页        

      </div>
      <%end if%>
	  <%rs.close%>

	　</p>
	<font color="#FF6600">总消费金额：<%=tomoney%></font></td>
				</tr>
			</table>
			</td>
<td width="1" background="images/line.jpg"></td>
		</tr>
		</table>
</div>

</body>

</html>
<!--#include file="copy.asp"-->