📄 fee.asp
字号:
<% if not session("sel") then
Response.redirect "usdl.asp"
end if
%>
<!--#include file="conn.asp" -->
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML>
<HEAD>
<TITLE><%=page_name%> – <%=page_title%></TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<LINK
href="images/style.css" type=text/css rel=stylesheet>
<META content="MSHTML 6.00.2800.1106" name=GENERATOR>
</HEAD>
<BODY leftMargin=0 background=images/bg.jpg topMargin=0 marginheight="0"
marginwidth="0">
<!--#include file="head.asp" -->
<TABLE height=288 cellSpacing=0 cellPadding=0 width=760 align=center
bgColor=#ffffff border=0>
<TBODY>
<TR>
<TD width=171 height=288 vAlign=top background="images/bg_l_n.gif"><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><div align="center"><img src="images/domain_image.gif" width="174" height="119"></div></td>
</tr>
<tr>
<td height="17" bgcolor="#EEEEEE"><div align="center">欢迎: <font color="#FF0000"><strong><%= session("us") %></strong></font> 光临</div></td>
</tr>
<tr>
<% us=session("us")
sql="select * from user where userid='"&us&"'"
rs.open sql,conn,1,1
%>
<td><p>您的账面存款：</p>
<p align="center"><font color="#FF0000">￥ <%= rs("je") %></font></p>
<p align="center">客户等级: <font color="#FF0000"><%= rs("sf") %>
<% rs.close %>
</font></p></td>
</tr>
<tr>
<td height="1" background="images/2.jpg"></td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><div align="center">
<!--#include file="user_inc.asp" -->
</div></td>
</tr>
<tr>
<td><p></td>
</tr>
<tr>
<td height="1" background="images/2.jpg"></td>
</tr>
</table></TD>
<td height="288" valign="top"><table width="573" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="573"><img src="images/mameger.gif" width="437" height="43"></td>
</tr>
<tr>
<td><div align="left">会员<font color="#FF0000"><strong><%= session("us") %></strong></font>的财务收支记录</div></td>
</tr>
<tr>
<td><table width="573" height="40" border="0" cellpadding="0" cellspacing="2">
<tr bgcolor="#D9D9D9">
<td width="100"><div align="center"><font color="#990000">操 作</font></div></td>
<td width="203"><div align="center"><font color="#990000">项 目</font></div></td>
<td width="62"><div align="center"><font color="#990000"> 入 账</font></div></td>
<td width="45"><div align="center"><font color="#990000">支 出</font></div></td>
<td width="46"><div align="center"><font color="#990000">余 额</font></div></td>
<td width="103"><div align="center"><font color="#990000">交 易 日 期</font></div></td>
</tr>
<%
sql="select * from memo where userid='"&session("us")&"'"
pp=20
rs.open sql,conn,1,1
if not rs.eof then
count=rs.recordcount
if count=empty then
count=0
end if
if count/pp>(count\pp) then
totalpage=(count\pp)+1
else
totalpage=(count\pp)
end if
end if
pagecount=cint(request.querystring("topage"))
if pagecount<=0 then pagecount=1
if pagecount>totalpage then pagecount=totalpage
if not rs.eof then
rs.movefirst
rs.move (pagecount-1)*pp
i=0
while not rs.eof and i<pp
i=I+1
%>
<tr bgcolor="#FAFAFA">
<td height="22"><div align="center"><font color="#FF0000"><%= rs("log") %></font></div></td>
<td><div align="center"><font color="#FF0000"><%= rs("body") %></font></div></td>
<td><div align="center"><font color="#000066">
<% if rs("je")<0 then
Response.Write("/")
else
Response.Write(rs("je"))
end if%>
</font></div></td>
<td><div align="center"><font color="#000066">
<% if rs("je")>=0 then
Response.Write("/")
else
Response.Write(rs("je"))
end if%>
</font></div></td>
<td><div align="center"><font color="#000099"><%= rs("zje") %></font></div></td>
<td><div align="center"><font color="#FF0000"><%= rs("dat") %></font></div></td>
</tr>
<%
rs.movenext
wend
rs.close
end if %>
</table></td>
</tr>
</table>
<table width="573" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="46%" bgcolor="#F2F2F2"><div align="center">一共有:<%= count %> 条 一共:<%= totalpage %> 页 当前: <%= pagecount %> 页</div></td>
<td width="54%" bgcolor="#F2F2F2"><div align="center">
<%
if totalpage>1 then
if totalpage-pagecount>0 then
%>
<a href="user8.asp?topage=<%=pagecount+1%>"><font color="#990000">下一页</font></a>
<%
end if
if pagecount<>1 and totalpage-pagecount>0 then
response.write "<font color=#FFFFFF>/</font>"
end if
if pagecount<>"1" then %>
<a href="user8.asp?topage=<%=pagecount-1%>"><font color="#990000">上一页</font></a>
<%
end if
end if
%>
</div></td>
</tr>
</table>
<p> </p>
<p align="center"></p></td>
</TR>
</TBODY>
</TABLE>
<TABLE cellSpacing=0 cellPadding=0 width=760 align=center border=0>
<TBODY>
<TR>
<TD bgColor=#999999><IMG height=1 src="images/spacer.gif"
width=1></TD>
</TR>
</TBODY>
</TABLE>
<!--#include file="foot.asp" -->
<%conn.close
set conn= nothing
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -