?? fee_success.asp
字號(hào):
<!--#include file="conn.asp" -->
<!--#include file="admin_dn.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>用戶財(cái)務(wù)入賬記錄</p>
<table width="98%" border="0" align="center" cellpadding="0" cellspacing="1">
<tr bgcolor="#EAEAEA">
<td width="13%" height="13"><div align="center">申請(qǐng)人</div></td>
<td width="18%"><div align="center">入賬金額</div></td>
<td width="20%"><div align="center">匯款時(shí)間</div></td>
<td width="28%"><div align="center">匯款方式</div></td>
<td width="11%"><div align="center">確認(rèn)生效</div></td>
<td width="10%"><div align="center">刪除記錄</div></td>
</tr>
<% if Trim(Request.QueryString("w"))="save" then
je1=Request("je")
id=Request("id")
sql="update log set ss=true where id="&id
conn.execute(sql)
sql="update user set je=je+"&je1&" where userid='"&request("us")&"'"
conn.execute(sql)
rs.open "select * from user where userid='"&request("us")&"'"
if not rs.eof then
zje=rs("je")
end if
rs.close
sql="insert into memo(userid,je,body,log,zje) values ('"&request("us")&"',"&je1&",'財(cái)務(wù)入賬確認(rèn)','入賬確認(rèn)',"&zje&")"
conn.execute(sql)
%>
<script language="VBScript" type="text/VBScript">
msgbox "入賬確讓成功 請(qǐng)不要重復(fù)刷新本頁"
</script>
<%
end if
if Trim(Request.QueryString("w"))="del" then
sql="delete from log where id="&Request("id")
conn.execute(sql)
%>
<script language="VBScript" type="text/VBScript">
msgbox "刪除記錄成功"
</script>
<%
end if
sql="select * from log where ll='入賬' order by not ss,id desc"
rs.open sql,conn,1,1
while not rs.eof
%>
<tr>
<td><div align="center"><%= rs("userid") %></div></td>
<td><div align="center"><font color="#FF0000">¥</font> <%= rs("je") %></div></td>
<td><div align="center"><%= rs("dat") %></div></td>
<td><%= rs("fs") %></td>
<td><div align="center">
<%
if rs("ss") then
%>
<font color="#FF0000">已確認(rèn)</font>
<% else %>
<a href="fee_success.asp?w=save&id=<%=rs("id")%>&je=<%=rs("je")%>&us=<%=rs("userid")%>"><img src="image/3.jpg" width="16" height="16" border="0"></a>
<% end if %>
</div></td>
<td><div align="center"><a href="fee_success.asp?w=del&id=<%=rs("id")%>"><img src="image/4.jpg" width="16" height="16" border="0"></a></div></td>
</tr>
<% rs.movenext
wend
rs.close %>
<tr>
<td> </td>
<td> </td>
<td> </td>
<td> </td>
<td> </td>
<td> </td>
</tr>
</table>
<hr width="95%" size="1">
<p><font color="#FF0000">注:</font>這里顯示的是用戶在匯款以后,到控制面板里提交的交費(fèi)申請(qǐng),請(qǐng)查詢您的賬號(hào)后再?zèng)Q定入賬。。你點(diǎn)確認(rèn)生效后,系統(tǒng)會(huì)自動(dòng)在申請(qǐng)人的賬號(hào)上加上申請(qǐng)人提交的金額。對(duì)于以經(jīng)確認(rèn)的金額將不能再次提交。。</p>
</body>
</html>
?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號(hào)
Ctrl + =
減小字號(hào)
Ctrl + -