⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 admin_uphostsize.asp

📁 直接解压即可 都是asp源码 超经典的啊
💻 ASP
字号:
<!--#include file="conn.asp"-->
<% 
id=session("userid")
username=session("username")
if id="" or username="" then
response.Redirect("adminloginerror.asp")
end if
Set rs = Server.CreateObject("ADODB.Recordset")
sql="select * from adminuser where username='"& username &"' and id=" & id &""
rs.open sql,conn,3,3
if rs.eof then
response.Redirect("adminloginerror.asp")
else
%>
<title></title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="style.css" type="text/css">
<body bgcolor="#FFFFFF" text="#000000" style="background-color: #D6DFF7">
<% 
if request.querystring("cmd")="up" then
id=request.querystring("id")
onemoney=server.htmlencode(request.form("onemoney"))
dalimoney1=server.htmlencode(request.form("dalimoney1"))
dalimoney2=server.htmlencode(request.form("dalimoney2"))
dalimoney3=server.htmlencode(request.form("dalimoney3"))
set rs=server.createobject("adodb.recordset")
sql="select * from uphostsize where id="&id&""
rs.open sql,conn,3,3
rs("onemoney")=onemoney
rs("dalimoney1")=dalimoney1
rs("dalimoney2")=dalimoney2
rs("dalimoney3")=dalimoney3
rs.update
response.redirect "admin_uphostsize.asp?id="&id&""
end if
%>
<link href="style.css" rel="stylesheet" type="text/css">
<%id=request.querystring("id")
set rs=server.createobject("adodb.recordset")
sql="select * from uphostsize where id="&id&""
rs.open sql,conn,3,3
%>
<div align="center">
  <center>
<table width="98%" border="1" cellspacing="0" cellpadding="5" bordercolor="#6687BA" style="border-collapse: collapse">
  <form name="form" method="post" action="admin_uphostsize.asp?cmd=up&id=<%=id%>">
  <tr>
      <td background="images/admin/admin_bg_1.gif"> 
        <div align="center" class="f1" >空 间 增 加 价 格 修 改</div>
    </td>
  </tr>
  <tr>
    <td> 
      <div align="center">
      <table width="98%"><tr><td width="122">
         空间增加大小:</td><td width="157"><b><font color="#FF0000"><%=rs("hostsize")%> 
		</font></b>M</td><td></td>
            </tr><tr><td width="122">
            直接客户价:</td> 
            <td width="157"><input name="onemoney" type="text" id="onemoney" value="<%=rs("onemoney")%>" size="10"> 
			元/年</td><td>只能用数字</td>
            </tr>
            <br><td width="122">
            普通代理价:</td> 
            <td width="157"><input name="dalimoney1" type="text" id="dalimoney1" value="<%=rs("dalimoney1")%>" size="10"> 
			元/年</td><td>只能用数字</td>
            </tr>
            <tr><td width="122">
            牵手代理价:</td> 
            <td width="157"><input name="dalimoney2" type="text" id="dalimoney2" value="<%=rs("dalimoney2")%>" size="10"> 
			元/年</td><td>只能用数字</td>
            </tr>
            <tr><td width="122">
            伙伴代理价:</td> <td width="157">
            <input name="dalimoney3" type="text" id="dalimoney3" value="<%=rs("dalimoney3")%>" size="10"> 
			元/年</td><td>只能用数字</td>
            </tr></table>

    	</div>

    </td>
  </tr>
  <tr>
      <td> 
        <div align="center">
        <input type="submit" name="Submit" value="提交">
        </div>
    </td>
  </tr>
  </form>
</table>
  </center>
</div>
<br>
</body>
</html>
<%
rs.close
set rs=nothing
end if
%><% set conn=nothing %>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -