📄 host_edit.asp
字号:
<!--#include file="admin.asp"-->
<%
if Request("action")="save" then
chk_admin_login(3)
if Request.Form("asp")="" or Request.Form("ifreg")="" or Request.Form("onlymail")="" or Request.Form("iptime")="" or Request.Form("active")="" or Request.Form("ftpreg")="" or Request.Form("ftp")="" or Request.Form("domain")="" or Request.Form("ifupload")="" then
ErrMsg("您的必填资料没有填写完全，请重新输入！")
end if
rs.open "select * from [host] where id="&request("id"),conn,1,3
rs("name")=Trim(Request.Form("name"))
rs("type")=Trim(Request.Form("type"))
rs("asp")=Trim(Request.Form("asp"))
rs("space")=Request.Form("space")
userdir=Request.Form("userdir")
if right(userdir,1)<>"\" then userdir=userdir&"\"
rs("userdir")=userdir
rs("bakfolder")=Request.Form("bakfolder")
rs("userurl")=Request.Form("userurl")
rs("domainname")=Request.Form("domainname")
rs("hidden")=Request.Form("hidden")
rs("ad")=Request.Form("ad")
rs("content")=Request.form("intro")
rs("intro")=Trim(Request("content"))
rs("img")=Trim(Request.Form("imgs"))
rs("price")=Trim(Request.Form("price"))
rs("point")=Trim(Request.Form("point"))
rs("usedays")=Trim(Request.Form("usedays"))
rs("ifreg")=Trim(Request.Form("ifreg"))
rs("onlymail")=Trim(Request.Form("onlymail"))
rs("iptime")=Trim(Request.Form("iptime"))
rs("active")=Trim(Request.Form("active"))
rs("dayreg")=Trim(Request.Form("dayreg"))
rs("maxreg")=Trim(Request.Form("maxreg"))
rs("ftpreg")=Trim(Request.Form("ftpreg"))
rs("ftp")=Trim(Request.Form("ftp"))
rs("html")=Trim(Request.Form("html"))
rs("count")=Trim(Request.Form("count"))
rs("gbook")=Trim(Request.Form("gbook"))
rs("databak")=Trim(Request.Form("databak"))
rs("msg")=Trim(Request.Form("msg"))
rs("domain")=Trim(Request.Form("domain"))
rs("ifupload")=Trim(Request.Form("ifupload"))
rs("uptype")=Trim(Request.Form("uptype"))
rs("filecount")=Trim(Request.Form("filecount"))
rs("filetype")=Trim(Request.Form("filetype"))
rs("uploadsize")=Trim(Request.Form("uploadsize"))
rs("badcode")=Trim(Request.Form("badcode"))
rs.update
rs.close
if not fso.FolderExists(Request.Form("userdir")) then
fso.createfolder(Request.Form("userdir"))
end if
if not fso.FolderExists(Request.Form("bakfolder")) then
fso.createfolder(Request.Form("bakfolder"))
end if
response.write"<script>alert('修改成功！');location.href='host_admin.asp'</script>"
end if
id=request("id")
sql="select * from [host] where id="&id
rs.open sql,conn,1,1
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>:::管理页面:::</title>
<LINK href="../css/admin.css" rel=stylesheet type=text/css>
</head>
<body >
<table width="99%" border="0" align="center" cellpadding="4" cellspacing="1" class="a2">
<form name="coolform" method="post" action="?action=save" onSubmit="return CheckForm2(this);">
<input type=hidden name=id value=<%=id%>>
<input name="content" type="hidden" value='<%=rs("intro")%>'>
<tr align="center">
<td height="25" colspan="2" class="a1">修改空间类型</td>
</tr>
<tr class="a3">
<td width="22%">空间名称：</td>
<td width="78%"><input name="name" type="text" value="<%=rs("name")%>"> </td>
</tr>
<tr class="a4">
<td>空间类型：</td>
<td><select name="type">
<option value="free" <%if rs("type")="free" then%>selected<%end if%>>免费空间</option>
<option value="vip" <%if rs("type")="vip" then%>selected<%end if%>>收费空间</option>
</select></td>
</tr>
<tr class="a3">
<td>ASP权限：</td>
<td><input type="radio" name="asp" value="True" <%if rs("asp")=True then response.write "checked"%>>
打开
<input type="radio" name="asp" value="False" <%if rs("asp")=False then response.write "checked"%>>
关闭 (注意：如关闭asp权限，必须同时在IIS中把ASP,ASA等可执行文件的执行权限去掉) </td>
</tr>
<tr class="a4">
<td>空间大小：</td>
<td><input name="space" type="text" value="<%=rs("space")%>">
M (只填写数字) </td>
</tr>
<tr class="a3">
<td>存储路径：</td>
<td><input name="userdir" type="text" value="<%=rs("userdir")%>" size="30">
所在服务器的物理路径，如：E:\web\home\ </td>
</tr>
<tr class="a4">
<td>备份路径：</td>
<td><input name="bakfolder" type="text" value="<%=rs("bakfolder")%>" size="30">
*便于在必要时恢复数据，格式同上↑</td>
</tr>
<tr class="a3">
<td>空间域名：</td>
<td><input name="userurl" type="text" value="<%=rs("userurl")%>" size="30">
*该类型空间的真实域名，末尾不需要加"/"</td>
</tr>
<tr class="a3">
<td height="23">二级域名功能：</td>
<td height="23"><select name="domain">
<option value="">请选择</option>
<option value="0" <%if rs("domain")=0 then Response.Write(" selected")%>>关闭</option>
<option value="1" <%if rs("domain")=1 then Response.Write(" selected")%>>系统内置二级域名转发</option>
<option value="2" <%if rs("domain")=2 then Response.Write(" selected")%>>VDNS二级域名转发</option>
<option value="3" <%if rs("domain")=3 then Response.Write(" selected")%>>ISAPI真正二级域名</option>
</select>
<font color="#FF0000">注意：如选择ISAPI二级域名转发，各种空间类型的存储路径必须相同！</font></td>
</tr>
<tr class="a4">
<td>二级域名：</td>
<td><input name="domainname" type="text" value="<%=rs("domainname")%>" size="30">
如：9cool.net，二级域名功能关闭可不填</td>
</tr>
<tr class="a4">
<td>是否隐藏真实URL：</td>
<td><input type="radio" name="hidden" value="1" <%if rs("hidden")=1 then response.write "checked"%>>
是
<input type="radio" name="hidden" value="0" <%if rs("hidden")=0 then response.write "checked"%>>
否
二级域名功能关闭可不填</td>
</tr>
<tr class="a4">
<td>是否显示广告：</td>
<td><input type="radio" name="ad" value="1" <%if rs("ad")=1 then response.write "checked"%>>
是
<input type="radio" name="ad" value="0" <%if rs("ad")=0 then response.write "checked"%>>
否
<font color="#FF0000">注:如选择隐藏真实URL,只支持弹出窗口代码,否则二级域名功能失效</font></td>
</tr>
<tr class="a4">
<td>广告代码：</td>
<td><textarea name="intro" cols="80" rows="5"><%=rs("content")%></textarea>
</td>
</tr>
<tr class="a3">
<td>详细介绍：</td>
<td height="250"><SCRIPT src="inc/post.js"></SCRIPT></td>
</tr>
<tr class="a4">
<td>图标：</td>
<td><input name="imgs" type="text" id="imgs" value="<%=rs("img")%>" size="30"></td>
</tr>
<tr class="a3">
<td>价格：</td>
<td><input name="price" type="text" size="10" value="<%=rs("price")%>">
元/年 (只填写数字，免费空间填"0"<font color="#FF0000">)</font></td>
</tr>
<tr class="a4">
<td>虚拟货币点数：</td>
<td><input name="point" type="text" size="10" value="<%=rs("point")%>">
(用户可通过网络虚拟货币购买/升级此类型空间，必须为数字)</td>
</tr>
<tr class="a3">
<td height="30">可使用天数：</td>
<td height="23"><input name="usedays" type="text" size="10" value="<%=rs("usedays")%>">
天 (填"0"表示不限 如果是收费空间，建议填写365，表示一年) </td>
</tr>
<tr class="a4">
<td height="30">是否关闭用户注册：</td>
<td height="23"><input type="radio" name="ifreg" value="True" <%if rs("ifreg")=True then response.write "checked"%>>
打开
<input type="radio" name="ifreg" value="False" <%if rs("ifreg")=False then response.write "checked"%>>
关闭 </td>
</tr>
<tr class="a3">
<td height="30">一个E-mail只能注册一个帐号</td>
<td height="23"><input type="radio" name="onlymail" value="1" <%if rs("onlymail")=1 then response.write "checked"%>>
打开
<input type="radio" name="onlymail" value="0" <%if rs("onlymail")=0 then response.write "checked"%>>
关闭 </td>
</tr>
<tr class="a4">
<td height="30">同一IP每天只可注册一次</td>
<td height="23"><input type="radio" name="iptime" value="1" <%if rs("iptime")=1 then response.write "checked"%>>
打开
<input type="radio" name="iptime" value="0" <%if rs("iptime")=0 then response.write "checked"%>>
关闭 </td>
</tr>
<tr class="a3">
<td height="30">每天允许注册用户数：</td>
<td height="23"><input name="dayreg" type="text" size="12" value="<%=rs("dayreg")%>">
(填"0"表示不限 ) </td>
</tr>
<tr class="a4">
<td>系统总允许注册用户数：</td>
<td><input name="maxreg" type="text" size="12" value="<%=rs("maxreg")%>">
(填"0"表示不限 ) </td>
</tr>
<tr class="a3">
<td>开通方式：</td>
<td><input type=radio name=active value=1 <%if rs("active")=1 then response.write "checked"%>>
即时开通
<input type=radio name=active value=2 <%if rs("active")=2 then response.write "checked"%>>
邮箱激活<input type=radio name=active value=0 <%if rs("active")=0 then response.write "checked"%>>
管理员审核</td>
</tr>
<tr class="a4">
<td>FTP申请权限：</td>
<td><input type=radio name=ftpreg value=True <%if rs("ftpreg")=True then response.write "checked"%>>
打开
<input type=radio name=ftpreg value=False <%if rs("ftpreg")=False then response.write "checked"%>>
关闭</td>
</tr>
<tr class="a3">
<td>是否直接开通FTP：</td>
<td><input type=radio name=ftp value=True <%if rs("ftp")=True then response.write "checked"%>>
是
<input type=radio name=ftp value=False <%if rs("ftp")=False then response.write "checked"%>>
否
</td>
</tr>
<tr class="a4">
<td height="23">HTML编辑器：</td>
<td height="23"><input type=radio name=html value=True <%if rs("html")=True then response.write "checked"%>>
打开
<input type=radio name=html value=False <%if rs("html")=False then response.write "checked"%>>
关闭</td>
</tr>
<tr class="a3">
<td height="23">计数器功能：</td>
<td height="23"><input type=radio name=count value=True <%if rs("count")=True then response.write "checked"%>>
打开
<input type=radio name=count value=False <%if rs("count")=False then response.write "checked"%>>
关闭</td>
</tr>
<tr class="a4">
<td height="23">留言本功能：</td>
<td height="23"><input type=radio name=gbook value=True <%if rs("gbook")=True then response.write "checked"%>>
打开
<input type=radio name=gbook value=False <%if rs("gbook")=False then response.write "checked"%>>
关闭</td>
</tr>
<tr class="a4">
<td height="23">数据备份/恢复：</td>
<td height="23"><input type=radio name=databak value=True <%if rs("databak")=True then response.write "checked"%>>
打开
<input type=radio name=databak value=False <%if rs("databak")=False then response.write "checked"%>>
关闭</td>
</tr>
<tr class="a3">
<td height="23">短消息功能：</td>
<td height="23"><input type=radio name=msg value=True <%if rs("msg")=True then response.write "checked"%>>
打开
<input type=radio name=msg value=False <%if rs("msg")=False then response.write "checked"%>>
关闭</td>
</tr>
<tr class="a4">
<td height="23">用户WEB上传：</td>
<td height="23"> <input type="radio" name="ifupload" value="True" <%if rs("ifupload")=True then response.write "checked"%>>
打开
<input type="radio" name="ifupload" value="False" <%if rs("ifupload")=False then response.write "checked"%>>
关闭 </td>
</tr>
<tr class="a3">
<td height="23">文件上传组件：</td>
<td height="23"><select name="uptype">
<option value="">请选择</option>
<option value="1" <%if rs("uptype")="1" then Response.Write(" selected")%>>Asp Upload</option>
<option value="2" <%if rs("uptype")="2" then Response.Write(" selected")%>>无组件上传</option>
<option value="3" <%if rs("uptype")="3" then Response.Write(" selected")%>>批量上传</option>
</select> 速度分别为：快、中、慢、特快</td>
</tr>
<tr class="a4">
<td height="23">每次上传文件个数：</td>
<td height="23"><input name="filecount" type="text" id="filecount" size="10" value="<%=rs("filecount")%>">
个(填数字，建议在10-20之间) </td>
</tr>
<tr class="a3">
<td height="23">禁用的文件类型：<strong></strong></td>
<td height="23"><input name="filetype" type="text" size="40" value="<%=rs("filetype")%>">
如：<font color="#FF0000">jpg|gif|htm</font>，多个用"|"'分隔</td>
</tr>
<tr class="a4">
<td height="23">单个文件允许的大小：</td>
<td height="23"><input name="uploadsize" type="text" size="10" value="<%=rs("uploadsize")%>">
单位<font color="#FF0000">KB</font> (1M=1024KB，建议≤2M)</td>
</tr>
<tr class="a3">
<td height="23">过滤非法字符或代码：</td>
<td height="23"><textarea name="badcode" cols="50" rows="5"><%=rs("badcode")%></textarea>
多个用"|"'分隔，同时请留意官方网站，会不定期更新字符库</td>
</tr>
<tr align="center" class="a4">
<td colspan="2"><input name="EditSubmit" type="submit" value=" 确 定 ">
<span class="a3">
<input name="reset" type="reset" value=" 取 消 " onClick="javascript:history.back()">
</span></td>
</tr></form>
</table>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -