📄 member_left.asp
字号:
<%
Set rs = Server.CreateObject("ADODB.Recordset")
sql0="select * from savemoney where user_name='"& username &"' and user_id="& id &""
rs.open sql0,conn,3,3
%>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>欢迎您</title>
</head>
<body>
<div align="center">
<TABLE border=0 cellPadding=0 width="100%" style="border-collapse: collapse">
<TBODY>
<TR>
<TD align="center"><IMG height=119 src="images/sev_image.gif"
width=174></TD>
</TR>
<TR>
<TD>
<table width="100%" border="0" cellpadding="5" style="border-collapse: collapse">
<tr>
<td><div align="center"> <span class="f2">欢迎您，<b><font color="#0000FF"><%=session("username")%></font></b></span>
</div></td>
</tr>
</table></TD>
</TR>
</TBODY>
</TABLE>
</div>
<table width="100%" border="0" cellspacing="0" cellpadding="5">
<tr>
<td class="f1">
<p align="center">您的账面存款：<font color="#FF0000"><b>
<% if rs.eof then
response.write"0"
else %><%=rs("savemoney")%>
<% end if %></b></font>元</td>
</tr>
<tr>
<td>
<p align="center">客户等级：<font color="#FF0000"><b><%=session("sales")%></b></font></td>
</tr>
<tr>
<td>
<p align="center">
</td>
</tr>
</table>
<table width="100%" border="0" cellpadding="5" height="238">
<tr>
<td height="18">
<div align="center"><a href="member_upcontent.asp" target="ad" class="f3">会员资料管理</a></div>
</td>
</tr>
<tr>
<td height="18">
<div align="center"><a href="member_uppassword.asp" target="ad" class="f3">会员密码管理</a></div>
</td>
</tr>
<tr>
<td height="18">
<div align="center"><a href="member_shoppingbalance.asp" target="ad" class="f3">已付款产品管理</a></div>
</td>
</tr>
<tr>
<td height="16">
<div align="center"><a href="member_shoppingcontiue.asp" target="ad" class="f3">未付款产品管理</a></div>
</td>
</tr>
<tr>
<td height="18">
<div align="center"><a href="member_money.asp" target="ad" class="f3">财务收支记录</a></div>
</td>
</tr>
<tr>
<td height="18">
<div align="center"><a href="member_meeting.asp" target="ad" class="f3">消息中心</a></div>
</td>
</tr>
<tr>
<td height="18">
<div align="center"><a href="member_ask.asp" target="ad" class="f3">在线提交问题</a></div>
</td>
</tr>
<% if session("sales")="直接客户" then %>
<tr>
<td height="18">
<div align="center"><a href="member_agent.asp" target="ad" class="f3">申请成为代理</a></div>
</td>
</tr>
<% end if %>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="5">
<tr>
<td><div align="center" class="f2">您的购物车情况</div></td>
</tr>
<tr>
<td><table width="100%" border="0" cellspacing="0" cellpadding="5">
<tr>
<td>未结算总金额：<b><font color="#FF0000">
<%
sql1="select sum(allmoney) as summoney1 from domainshopping where (bolo='未结算') and user_name='"&username&"'"
sql2="select sum(money) as summoney2 from hostshopping where (bolo='未结算') and user_name='"&username&"'"
sql3="select sum(money) as summoney3 from mailshopping where (bolo='未结算') and user_name='"&username&"'"
set rs=conn.execute(sql1)
set rs1=conn.execute(sql2)
set rs2=conn.execute(sql3)
if not (rs.eof and rs.bof) then
a=rs("summoney1")
end if
if not (rs.eof and rs.bof) then
b=rs1("summoney2")
end if
if not (rs.eof and rs.bof) then
c=rs2("summoney3")
end if
if isnull(a) then
a=0
end if
if isnull(b) then
b=0
end if
if isnull(c) then
c=0
end if
abce=FormatCurrency((a+b+c),2)
rs.close
rs1.close
rs2.close
set rs=nothing
set rs1=nothing
set rs2=nothing
response.write abce
%>
</font></b>
</td>
</tr>
</table></td>
</tr>
</table>
<table width="100%" height="150" border="0" cellpadding="0" cellspacing="0">
<tr>
<td> </td>
</tr>
</table>
</body>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -