?? fee_total.asp
字號:
<!--#include file="conn.asp" -->
<!--#include file="admin_dn.asp" -->
<!--#include file="mail_inc.asp" -->
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title></title>
<link href="image/css.css" rel="stylesheet" type="text/css">
</head>
<body leftmargin="5" topmargin="5">
<p><strong><font color="#006600">財務報表顯示</font></strong></p>
<p> </p>
<table width="90%" border="0" align="center" cellpadding="1" cellspacing="1">
<tr bgcolor="#CCCCCC">
<td colspan="4"> </td>
</tr>
<tr>
<td width="20%" bgcolor="#E1E1E1">用 戶 購 物：</td>
<td width="28%" bgcolor="#F9F9F9"><div align="center"><font color="#FF0000">
<%
rs.open "select * from memo where log='購物'",conn,1,1
if not rs.eof then
Response.Write(rs.recordcount)
end if
con1=0
while not rs.eof
con1=rs("je")+con1
rs.movenext
wend
rs.close
%>
條 </font></div></td>
<td width="15%" bgcolor="#E1E1E1"><div align="center">總 金 額</div></td>
<td width="37%" bgcolor="#F9F9F9"><div align="center"><%= con1 %></div></td>
</tr>
<tr>
<td height="19" bgcolor="#E1E1E1">手 工 入 賬：</td>
<td bgcolor="#F9F9F9"><div align="center"><font color="#FF0000">
<%
rs.open "select * from memo where log='入賬'",conn,1,1
if not rs.eof then
Response.Write(rs.recordcount)
end if
con2=0
while not rs.eof
con2=rs("je")+con2
rs.movenext
wend
rs.close
%>
條 </font></div></td>
<td bgcolor="#E1E1E1"><div align="center">總 金 額</div></td>
<td bgcolor="#F9F9F9"><div align="center"><%= con2 %></div></td>
</tr>
<tr>
<td bgcolor="#E1E1E1">入 賬 確 認：</td>
<td bgcolor="#F9F9F9"><div align="center"><font color="#FF0000">
<%
rs.open "select * from memo where log='入賬確認'",conn,1,1
if not rs.eof then
Response.Write(rs.recordcount)
end if
con3=0
while not rs.eof
con3=rs("je")+con3
rs.movenext
wend
rs.close
%>
條 </font></div></td>
<td bgcolor="#E1E1E1"><div align="center">總 金 額</div></td>
<td bgcolor="#F9F9F9"><div align="center"><%= con3 %></div></td>
</tr>
<tr bgcolor="#CCCCCC">
<td colspan="4"><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="9%">總 記 </td>
<td width="48%"><div align="center"><font color="#FF0000">
<%
rs.open "memo",conn,1,1
if not rs.eof then
Response.Write(rs.recordcount)
end if
rs.close
%>
條</font></div></td>
<td width="9%"> </td>
<td width="34%"><div align="center"><%= con1+con2+con3 %></div></td>
</tr>
</table></td>
</tr>
</table>
<p> </p>
<p> </p>
<p> </p>
<p align="center"> </p>
<p align="center">－<a href="fee_all.asp">顯示所有財務日志</a>－ -<a href="fee_detail.asp">顯示今天財務日志</a>-</p>
<p align="center"> </p>
<p align="center"> </p>
<p align="center"><a href="fee_detail.asp">返回財務日志查詢 >></a></p>
</body>
</html>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -