<!--#include file="conn.asp" -->
<!--#include file="inc/usdl.asp" -->
<!--#include file="inc/gl1.asp" -->
<!--#include file="inc/hostconfig.asp" -->
<!--#include file="inc/ftp_date.asp" -->
<% 
call gl(Trim(Request("bh")))
bh=Request("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" background="images/2.jpg"> </td>
        </tr>
      </table> 
	  <div align="center"> 
       <!--#include file="user_inc.asp" -->
      </div></td>
    <td width="1" bgcolor="#F5F5F5"> </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><p>&nbsp;</p>
            <table width="516" border="0" align="center" cellpadding="1" cellspacing="1">
              <tr> 
                <td width="100" bgcolor="FF9900" onmouseover="this.style.backgroundColor='#FFD89D';return true;" onmouseout="this.style.backgroundColor='#FF9900';"> 
                  <div align="center"><a href="user8_host_1.asp?bh=<%=bh%>"><font color="#FFFFFF"> 
                    </font></a><a href="user8_host.asp?bh=<%=bh%>"><font color="#FFFFFF">订  
                    单 参 数</font></a></div></td> 
                <td width="105" bgcolor="#FF9900" onmouseover="this.style.backgroundColor='#FFD89D';return true;" onmouseout="this.style.backgroundColor='#FF9900';"> 
                  <div align="center"><a href="user8_host_2.asp?bh=<%=bh%>"><font color="#FFFFFF">更改Ftp密码</font></a></div></td>
                <td width="114" bgcolor="#FF9900" onmouseover="this.style.backgroundColor='#FFD89D';return true;" onmouseout="this.style.backgroundColor='#FF9900';"> 
                  <div align="center"><a href="user8_host_3.asp?bh=<%=bh%>"><font color="#FFFFFF">绑 
                    定 域 名</font></a></div></td>
                <td width="94" bgcolor="#FF9900" onmouseover="this.style.backgroundColor='#FFD89D';return true;" onmouseout="this.style.backgroundColor='#FF9900';"> 
                  <div align="center"><a href="user8_host_4.asp?bh=<%=bh%>"><font color="#FFFFFF">修改默认主页</font></a></div></td>
                <td width="87" bgcolor="#FF9900" onmouseover="this.style.backgroundColor='#FFD89D';return true;" onmouseout="this.style.backgroundColor='#FF9900';"><div align="center"><a href="user8_host_1.asp?bh=<%=bh%>"><font color="#FFFFFF">空 
                    间 参 数</font></a></div></td>
              </tr>
            </table>
            <p>&nbsp;</p>
            <table width="95%" height="346" border="1" align="center" cellpadding="0" cellspacing="0" bordercolor="#FFD697"bordercolorlight="" bordercolordark="ffffff">
              <tr> 
                <% 
sql="select * from host_shop where bh="&bh
  rs.open sql,conn,1,1
  if not rs.eof then
   User_Name=rs("ftp")
   Ftp_Auto=rs("ftp_auto")
  else
  Response.Write("对不起读取用户数据出错")
  response.end
  end if 
  rs.close
		
 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.form("sf")
 zsf=jg1*sf1
 if zje1<zsf then
 %>
                <script language="VBScript" type="text/VBScript">
           msgbox "对不起您账号上面的余额不足。。。。请及时入账"
        </script>
                <%
else
  sql="update user set je="&zje1&"-"&zsf&" where userid=('"&session("us")&"')"
  conn.execute(sql)
  sql="update host_shop set nx=nx+"&request.form("sf")&" where userid='"&session("us")&"' and bh="&bh
  conn.execute(sql)
  sql="update shop set sl=sl+"&request.form("sf")&",je=je+jg*"&request.form("sf")&" where userid='"&session("us")&"'and bh="&bh
  conn.execute(sql)
  sql="insert into memo(userid,je,body,log,zje) values ('"&session("us")&"',"&-zsf&",'订单号:"&bh&"/空间续费','续费',"&zje1&"-"&zsf&")"
  conn.execute(sql)
  if Ftp_Auto then
  sql="insert into web_logo(bh,userid,log,sl,je,ftp_user,ftp_password,ftp_path,web_dns) values ("&bh&",'"&session("us")&"','空间续费',"&request.form("sf")&",0,'未改','未改','未改','未改')"
  conn.execute(sql)
  edit_ftp=ftp_date(User_Name,Trim(Request.Form("sf")),seuv_filepath)
  if edit_ftp then
   Response.Write("产品续费成功,但是写入ftp文件出错,请和管理员联系")
   end if
  end if 
  %>
                <script language="VBScript" type="text/VBScript">
        msgbox "续费成功..."
       </script>
                <%
end if
rs.close
end if
bh=request("bh")
sql="select * from host_shop where bh="&bh&"and userid='"&session("us")&"'" 
rs.open sql,conn,1,1
if not rs.eof then
 %>
                <td width="20%" bgcolor="#FFF8EE"> <div align="center"><font color="#999999">订  
                    单 号：</font></div></td> 
                <td colspan="3"><font color="#FF0000"><strong> 　<%= rs("bh") %> &nbsp;</strong></font></td> 
              </tr>
              <tr> 
                <td bgcolor="#FFF8EE"> <div align="center"><font color="#999999">产品名称：</font></div></td>
                <td colspan="2">　<%= rs("mc") %></td>
                <td><img src="inc/back.gif" width="8" height="8" border="0"><a href="user8_host_1.asp?bh=<%=bh%>"> 
                  查看空间状态</a></td>
              </tr>
              <tr> 
                <td bgcolor="#FFF8EE"> <div align="center"><font color="#999999">用户名称：</font></div></td>
                <td colspan="3">　<%= rs("userid") %></td>
              </tr>
              <tr> 
                <td bgcolor="#FFF8EE"><div align="center"><font color="#999999">在线管理：</font></div></td>
                <td colspan="3"> 　 <font color="#FF0000"> 
                  <%  if Ftp_Auto then 
				    Response.Write("支持在线管理")
					else
					Response.Write("不支持在线管理")
					end if
				  %>
                  </font></td>
              </tr>
              <tr> 
                <td bgcolor="#FFF8EE"> <div align="center"><font color="#999999">邦定域名：</font></div></td>
                <td colspan="2">　<%= rs("dns") %></td>
                <td><img src="inc/back.gif" width="8" height="8" border="0"><a href="user8_host_3.asp?bh=<%=bh%>"> 
                  修改解析域名</a></td>
              </tr>
              <tr> 
                <td bgcolor="#FFF8EE"><div align="center"><font color="#999999">域名解析IP：</font></div></td>
                <td colspan="3">　<%= rs("web_ip") %>&nbsp;</td>
              </tr>
              <tr> 
                <td bgcolor="#FFF8EE"> <div align="center"><font color="#999999">Ftp用户名：</font></div></td>
                <td width="21%">　<%= rs("ftp") %></td>
                <td colspan="2"><a href="http://<%= rs("ftp") %>.<% =web_zs %>" target="_blank"><font color="#FF6600">-查看空间-</font></a></td>
              </tr>
              <tr> 
                <td bgcolor="#FFF8EE"> <div align="center"><font color="#999999">Ftp  
                    密 码：</font></div></td> 
                <td colspan="2">　<%= rs("ftp_password") %>　　</td>
                <td width="27%"><img src="inc/back.gif" width="8" height="8" border="0"><a href="user8_host_2.asp?bh=<%=bh%>"> 
                  修改FTP密码</a></td> 
              </tr>
              <tr> 
                <td bgcolor="#FFF8EE"> <div align="center"><font color="#999999">注册年限：</font></div></td>
                <td colspan="3"> 　<%= rs("nx") %></td>
              </tr>
              <% rs.close
    sql="select * from shop where bh="&bh
  rs.open sql,conn,1,1
   %>
              <tr> 
                <td bgcolor="#FFF8EE"><div align="center"><font color="#999999">产品单价:</font></div></td>
                <td colspan="3">　<font color="#FF0000"><strong>￥</strong></font><%= rs("jg") %></td>
              </tr>
              <tr> 
                <td bgcolor="#FFF8EE"> <div align="center"><font color="#999999">已付金额：</font></div></td>
                <td colspan="2"><font color="#FF0000">　<strong>￥<%= rs("je") %></strong></font></td>
                <td><img src="inc/back.gif" width="8" height="8" border="0"> <a href="user8_host_4.asp?bh=<%=bh%>">修改默认主页</a></td>
              </tr>
              <tr> 
                <td bgcolor="#FFF8EE"> <div align="center"><font color="#999999">提交时间：</font></div></td>
                <td colspan="3"><font color="#FF9900">　<%= rs("dat") %></font></td>
              </tr>
              <tr> 
                <td bgcolor="#FFF8EE"> <div align="center"><font color="#999999">到期时间：</font></div></td>
                <td colspan="3"><font color="#FF9900">　<%= year(rs("dat"))+rs("sl")&"-"&month(rs("dat"))&"-"&day(rs("dat")) %></font></td>
              </tr>
              <tr> 
                <td bgcolor="#FFF8EE"> <div align="center"><font color="#999999">交费是否：</font></div></td>
                <td colspan="3"><font color="#FF0000">　<%= rs("jf") %></font></td>
              </tr>
              <tr> 
                <td bgcolor="#FFF8EE"> <div align="center"><font color="#999999">生效是否：</font></div></td>
                <td colspan="3"><font color="#FF0000">　<%= rs("sx") %></font></td>
              </tr>
              <tr> 
                <td bgcolor="#FFF8EE"><div align="center"><strong><font color="#003300">管理员答复：</font></strong></div></td>
                <td colspan="3"><font color="#990000">　
				<% if rs("msg")="" then
				 Response.Write("暂无留言...")
				 else
				 Response.Write rs("msg")
				 end if 
				 %></font></td>
              </tr>
              <%  if rs("sx") then %>
              <tr valign="top"> 
                <td height="65" colspan="4"> <form name="form2" method="post" action="user8_host.asp?w=sf">
                    <table width="100%" border="0" cellspacing="0" cellpadding="0">
                      <tr> 
                        <td width="19%" height="29" bgcolor="#FFF8EE"><div align="center"><strong><font color="#990000">对产品续费：</font></strong></div></td>
                        <td width="81%"> <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") %>">  
                          <input type="submit" name="Submit2" value="确定续费"> </td> 
                      </tr>
                      <tr bgcolor="#FFF8EE"> 
                        <td height="20" colspan="2"><font color="#FF0000">　■ 注：在这里续费请确认您的账号上面有足够的余额。</font></td> 
                      </tr>
                    </table>
                  </form></td>
              </tr>
              <% end if %>
              <tr> 
                <td colspan="4"><div align="center"><a href="adm_7_mail.asp?w=save&bh=<%=request("bh")%>"> 
                    </a><a href="javascript:history.back(1)">返回上页 &gt;&gt;&gt;</a></div></td> 
              </tr>
            </table></td>
			 <% else
			Response.Write("<p><p><b><td>对不起参数不正确</b>")
			end if %> 
        </tr>
      </table>
      <p>&nbsp;</p>
      <table width="516" border="0" align="center" cellpadding="1" cellspacing="1">
        <tr> 
          <td width="100" bgcolor="FF9900" onmouseover="this.style.backgroundColor='#FFD89D';return true;" onmouseout="this.style.backgroundColor='#FF9900';"> 
            <div align="center"><a href="user8_host_1.asp?bh=<%=bh%>"><font color="#FFFFFF"> 
              </font></a><a href="user8_host.asp?bh=<%=bh%>"><font color="#FFFFFF">订  
              单 参 数</font></a></div></td> 
          <td width="105" bgcolor="#FF9900" onmouseover="this.style.backgroundColor='#FFD89D';return true;" onmouseout="this.style.backgroundColor='#FF9900';"> 
            <div align="center"><a href="user8_host_2.asp?bh=<%=bh%>"><font color="#FFFFFF">更改Ftp密码</font></a></div></td>
          <td width="114" bgcolor="#FF9900" onmouseover="this.style.backgroundColor='#FFD89D';return true;" onmouseout="this.style.backgroundColor='#FF9900';"> 
            <div align="center"><a href="user8_host_3.asp?bh=<%=bh%>"><font color="#FFFFFF">绑 
              定 域 名</font></a></div></td>
          <td width="94" bgcolor="#FF9900" onmouseover="this.style.backgroundColor='#FFD89D';return true;" onmouseout="this.style.backgroundColor='#FF9900';"> 
            <div align="center"><a href="user8_host_4.asp?bh=<%=bh%>"><font color="#FFFFFF">修改默认主页</font></a></div></td>
          <td width="87" bgcolor="#FF9900" onmouseover="this.style.backgroundColor='#FFD89D';return true;" onmouseout="this.style.backgroundColor='#FF9900';"><div align="center"><a href="user8_host_1.asp?bh=<%=bh%>"><font color="#FFFFFF">空 
              间 参 数</font></a></div></td>
        </tr>
      </table>
      <table width="91%" border="0" align="center" cellpadding="0" cellspacing="0">
        <tr>
          <td><p>&nbsp;</p>
            <p><font color="#FF0000">注: </font>这是虚拟主机的管理面板,如果你的空间是支持在线开通的.你在这里可以对您的站点进行在线管理.首先请将你的域名的A记录解析到我们指定的ip上.</p></td>
        </tr>
      </table>
      <p>&nbsp;</p></td>
  </tr>
  <tr> 
    <td>&nbsp;</td>
    <td colspan="2">&nbsp;</td>
  </tr>
</table>
<%
call CloseDatabase '关闭数据库链接
%>
<!--#include file="top.asp" -->

</body>
</html>





























