<!--#include file="conn.asp" -->
<!--#include file="inc/usdl.asp" -->
<!--#include file="inc/gl1.asp" -->
<% 
call gl(Trim(Request.QueryString("bh")))
 %>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title><%=page_title%>用户管理中心.</title>
<link href="css.css" rel="stylesheet" type="text/css">
</head>

<body leftmargin="3" topmargin="0">

<!--#include file="head.asp" -->
<table width="763" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td width="763" height="19" valign="bottom"><font color="#990000">　→ </font>你当前位置：<a href="default.asp">首 
      页 </a>&gt;&gt;管理中心</td>
  </tr>
  <tr>
    <td height="1" background="images/2.jpg"></td>
  </tr>
</table>
<table width="763" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr> 
    <td width="175" valign="top"> <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
			zje1=rs("je")
			 %>
          <td><p><font color="#FF0000">您的账面存款：</font></p>
            <p>&nbsp;</p>
            <p align="center"><font color="#FF0000">￥ <%= rs("je") %></font></p> 
            <p align="center">&nbsp;</p>
            <p>客户等级: <font color="#FF0000"><%= rs("dl") %>  
              <% rs.close  %>
              </font></p></td>
        </tr>
        <tr> 
          <td height="1" bgcolor="#E6F7FF"> </td>
        </tr>
      </table>
      <div align="center"> 
        <!--#include file="user_inc.asp" -->
      </div></td>
    <td width="1" background="images/1.jpg"> </td>
    <td width="587" valign="top"> <table width="573" border="0" cellspacing="0" cellpadding="0">
        <tr> 
          <td width="573">
            <p align="center"><a href="user.asp"><img src="images/mameger.gif" width="437" height="43"></a></p>
          </td>
        </tr>
        <tr> 
          <td><table width="95%" height="276" border="0" align="center" cellpadding="0" cellspacing="2">
              <tr> 
                <% 
				bh=request("bh")
	
 if Trim(Request.QueryString("w"))="sf" then
 sql="select * from shop where bh="&bh
 rs.open sql,conn,2,3
 jg1=rs("jg")
 sf1=request("sf")
 zsf=jg1*sf1
 if zje1<zsf then
 %>
                <script language="VBScript" type="text/VBScript">
msgbox "对不起您账号上面的余额不足。。。。请及时入账"
</script>
                <%
else
zsl=rs("sl")+sf1
rs("sl")=zsl
rs.update
sql="update user set je="&zje1&"-"&zsf&" where userid=('"&session("us")&"')"
  conn.execute(sql)
  sql="update mail_shop set sl="&zsl&" where userid=('"&session("us")&"')"
  conn.execute(sql)
  sql="insert into memo(userid,je,body,log,zje) values ('"&session("us")&"',"&-zsf&",'订单号:"&bh&"/邮局续费','续费',"&zje1&"-"&zsf&")"
  conn.execute(sql)
  %>
                <script language="VBScript" type="text/VBScript">
msgbox "续费成功..."
</script>
                <%
end if
rs.close
  

end if


			  bh=request("bh")
sql="select * from mail_shop where bh="&bh&"and userid='"&session("us")&"'" 
rs.open sql,conn,1,1
if not rs.eof then
 %>
                <td width="20%">订单号：</td>
                <td width="80%"><%= rs("bh") %>&nbsp;</td>
              </tr>
              <tr> 
                <td>产品名称：</td>
                <td><%= rs("title") %></td>
              </tr>
              <tr> 
                <td>用户名称：</td>
                <td><%= rs("userid") %></td>
              </tr>
              <tr> 
                <td>邦定域名：</td>
                <td><%= rs("dns") %></td>
              </tr>
              <tr> 
                <td>注册年限：</td>
                <td><%= rs("sl") %></td>
              </tr>
              <% rs.close
  sql="select * from shop where bh="&bh
rs.open sql,conn,1,1
   %>
              <tr> 
                <td>应支付金额：</td>
                <td><%= rs("je") %></td>
              </tr>
              <tr> 
                <td>提交时间：</td>
                <td><%= rs("dat") %></td>
              </tr>
              <tr> 
                <td>交费是否：</td>
                <td><font color="#FF0000"><%= rs("jf") %></font></td>
              </tr>
              <tr> 
                <td>生效是否：</td>
                <td><font color="#FF0000"><%= rs("sx") %></font></td>
              </tr>
              <tr bordercolor="#F5F5F5"> 
                <td height="23"><font color="#990000"><strong>管理员答复：</strong></font></td>
                <td><font color="#990000"><%= rs("msg") %></font></td>
              </tr>
              <tr> 
                <td height="64" colspan="2"> <%  if rs("sx") then %> <form name="form2" method="post" action="user8_mail.asp?w=sf">
                    <table width="100%" border="0" cellspacing="0" cellpadding="0">
                      <tr> 
                        <td width="23%" height="36"><strong><font color="#990000">对产品续费：</font></strong></td>
                        <td width="77%"> <select name="sf" id="sf">
                            <option value="1" selected>1　年</option>
                            <option value="2">2　年</option>
                            <option value="3">3　年</option>
                            <option value="4">4　年</option>
                            <option value="5">5　年</option>
                            <option value="10">10　年</option>
                          </select> <input name="bh" type="hidden" id="bh" value="<%=request("bh") %>">  
                        </td>
                      </tr>
                      <tr> 
                        <td height="25">&nbsp;</td>
                        <td><p> 
                            <input type="submit" name="Submit2" value="确定续费">
                          </p>
                          <p>&nbsp; </p>
                          <p><font color="#FF0000">注：在这里续费请确认您的账号上面有足够的余额。</font></p></td>
                      </tr>
                    </table>
                  </form>
                  <% end if %> </td>
              </tr>
              <tr> 
                <td colspan="2">&nbsp;</td>
              </tr>
              <tr> 
                <td>&nbsp;</td>
                <td><a href="javascript:history.back(1)">返回上页 &gt;&gt;&gt;</a></td> 
              </tr>
            </table></td>
          <% else
			Response.Write("<p><p><b><td>对不起参数不正确</b>")
			end if %>
        </tr>
      </table></td>
  </tr>
</table>
<%
call CloseDatabase '关闭数据库链接
%>
<!--#include file="top.asp" -->

</body>
</html>





























