<%@ Language=VBScript %>
<!--#include virtual="/inc-freehost-function/FreeHostFunctionMain.asp"-->
<%If session("admau")="" Then
	ef=True
	ec="授权非法，有可能是超时造成的。"
ElseIf not IsNumeric(Request("id"))  Then
	ef=True
	ec="ID应该是数字！"
ElseIf not IsNumeric(Request("ipid"))  Then
	ef=True
	ec="IPID应该是数字！"		
elseIf session("cansetserver")="" Then
	ef=True
	ec="您没有此操作的权限。"
end if
if not ef then%>
<!--#include virtual="/inc-freehost-function/htmlwrite.asp"--><%=htmlwrite("html8")%>
<%=htmlwrite("html9")%>
<TABLE width="100%" border=0 cellPadding=0 cellSpacing=0 background="img/midtop4.gif">
  <TBODY>
    <TR>
      <TD width=53 align="left" background="img/midtop1.gif"><strong> 　 </strong><font color="#FFFFFF">─<strong>&gt;</strong></font> </TD>
      <TD width="150"><table height="59"  border="0" cellpadding="0" cellspacing="0">
          <tr>
            <td width="7" background="img/midtop.gif">&nbsp;</td>
            <td width="120" align="center" valign="middle" background="img/r3.jpg" id="tableTop1" style="Cursor:hand"><a href="serverlist.asp"><font color="#FFFFFF">虚拟主机服务器设置</font></a><a href="setnews.asp"></a></td>
            <td width="5" background="img/midtop2.gif">&nbsp;</td>
          </tr>
      </table></TD>
      <TD width="83">&nbsp;</TD>
      <TD width="83">&nbsp;</TD>
      <TD width="83" align="left">&nbsp;</TD>
      <TD align="left">&nbsp;</TD>
      <TD width=23 align="right"><IMG height=59 
                  src="img/rtop4.jpg" 
                  width=19></TD>
    </TR>
  </TBODY>
</TABLE>
<TABLE width="100%" border=0 cellPadding=0 cellSpacing=0>
  <TBODY>
    <TR>
      <TD width=19 background="img/midlef.gif" id=rightid>&nbsp;</TD>
      <TD height="300" align="center" vAlign=top bgcolor="#FFFFFF"><br>
	  
<%
Set conn=Server.CreateObject("ADODB.Connection")
	conn.Open Application("FreeHostDBlink")
	Set ds = Server.CreateObject("ADODB.Recordset")	
		Sql="Select * from FreeHost.FreeHost_Serverlist order by orderbyid desc,id asc"
if request.Form ("id")<>"" Then Sql="Select * from FreeHost.FreeHost_Serverlist where id='"&Request("id")&"'"
		ds.Open Sql,conn,1,1
If ds.Eof Then%>
服务器列表为空.
<%else%>  
<DIV class="tableborder">
<table width="100%"  border="0" cellspacing="1">
  <tr >
    <td width="9%" height="24" align="center" background="img/tablebg.gif"><font color="#FFFFFF">编号</font></td>
    <td width="55%" align="center" background="img/tablebg.gif"><font color="#FFFFFF">服务器名称</font></td>
<%if Application("hostoneip")=true then%><td width="7%" align="center" background="img/tablebg.gif"><font color="#FFFFFF">IP资源</font></td><%end if%>
    <td height="24" colspan="3" align="center" background="img/tablebg.gif"><font color="#FFFFFF">操作</font></td>
    </tr>
<%while not ds.Eof%>

  <tr bgcolor="#E4EAF2" onmouseover=this.bgColor='#cccccc'; onmouseout=this.bgColor='#E4EAF2';>
    <td height="30" align="center"><%=ds("id")%></td>
    <td align="left">　　[<%=ds("ostype")%>]:<%=ds("servername")%>(<%=ds("site")%>) IP:<%=ds("ip")%>
      <%if ds("agent1")<>"n" then%>
      　 代理名：<a href="searchagent.asp?username=<%=ds("agent1")%>"><font color="#0000FF"><%=ds("agent1")%></font></a>
      <%end if%>      　
      排队:<%=ds("orderbyid")%></td>
<%if Application("hostoneip")=true then%><td align="center"><a href="serverlist.asp?id=<%=ds("id")%>&op=ip">未用：
        <%
Set dsip = Server.CreateObject("ADODB.Recordset")	
		Sql="Select count(*) from FreeHost.FreeHost_Product_Host_IP where ServerlistID='"&ds ("id")&"' and HostID=0"
		dsip.Open Sql,conn,1,1
		response.write dsip(0)
%><br>

总IP：
<%Set dsip = Server.CreateObject("ADODB.Recordset")	
		Sql="Select count(*) from FreeHost.FreeHost_Product_Host_IP where ServerlistID='"&ds ("id")&"'"
		dsip.Open Sql,conn,1,1
		response.write dsip(0)%>
<br>
<%If dsip(0)=0 then%>
<font color=red>修改</font>
<%else%>
修改
<%End if%>
    </a></td><%end if%>
    <td width="8%" align="center"><a href="serverlist.asp?id=<%=ds("id")%>"><font color=black>修改</font></a></td>
    <td width="7%" align="center"><a href="serveradm.asp?type=host&id=<%=ds("id")%>" <%if ds("ostype")="linux" then%>target=_blank<%end if%>><font color=black>管理</font></a></td>
    <td width="14%" align="center"><a href="systemtest.asp?id=<%=ds("id")%>&site=<%=ds("site")%>" target=_blank><font color=blue>系统自检>>></font></a></td>
  </tr>
<%
ds.movenext
wend%>
</table>
</div>
<%end if%>
<%if Request("op")="" then%>
<%if Request("id")<>"" then

	Set ds = Server.CreateObject("ADODB.Recordset")	
		Sql="Select * from FreeHost.FreeHost_Serverlist where id='"&Request("id")&"'"
		ds.Open Sql,conn,1,1
If not ds.Eof Then
%>
<form name="form1" method="post" action="serveradd.asp" ID="Form1" >
<DIV class="tableborder">
<table width="100%"  border="0" cellspacing="1">
  <tr >
    <td height="24" colspan="2" align="center" background="img/tablebg.gif"><font color="#FFFFFF">修改旧的服务器</font></td>
  </tr>
  <tr bgcolor="#E4EAF2">
    <td width="9%" align="right">&nbsp;</td>
    <td width="91%" align="left"><br>
操作系统类型:
<input name="ostype" type="radio" value="windows" <%if ds("ostype")="windows" then%>checked<%end if%>>
Windows　　
<input type="radio" name="ostype" value="linux" <%if ds("ostype")="linux" then%>checked<%end if%>>
Linux(使用DA接口)<br>　　　　　　　　　　　　　　　　　
(DA接口的特别说明：星外科技提供的只是接口,DA面板请联系DA开发商购买,<br>　　　　　　　　　　　　　　　　　　DA面板的技术支持请联系DA开发商提供,<font color="#FF0000">星外科技不提供任何DA面板的技术支持</font><br>　　　　　　　　　　　　　　　　　　运营Linux系统需要相关的基础知识及相关的英文语言能力。)      <br>      
      <br>
      服务器命名：
      <input name="servername" type="text" id="servername" value="<%=ds("servername")%>" size="12">
受控网址：
<input name="site" type="text" id="site" value="<%=ds("site")%>" size="35"><br>
排队顺序：
<input name="orderbyid" type="text" id="orderbyid" size="4" maxlength="6" value="<%if isnull(ds("orderbyid")) then%>0<%else%><%=ds("orderbyid")%><%end if%>">
(在前台如果有多台服务器让用户选取时，服务器的排序顺序，数值大排前面)<br>
共享密码：
<input name="FreeHostsharekey" type="password" id="FreeHostsharekey"  value="<%=ds("FreeHostsharekey")%>">
　机房：
<input name="netby" type="text" id="netby" value="<%=ds("netby")%>" size="10" maxlength="20">
<br>
临时域名后缀：
<input name="tempdomain" type="text" id="tempdomain" value="<%=ds("tempdomain")%>" size="20">
(必须填写,Linux系统的不能太长)<br>
代理商名下用户开通时所绑定的临时域名后缀：
<input name="tempdomainagn" type="text" id="tempdomainagn" value="<%=ds("tempdomainagn")%>" size="20">
(可以和上面的临时域名后缀一致) <br>
用户FTP用的域名：
<input name="ftpdomain" type="text" id="ftpdomain" value="<%=ds("ftpdomain")%>" size="20">
服务器ＩＰ：
<input name="ip" type="text" id="ip" value="<%=ds("ip")%>" size="20">
(Linux系统只能写一个IP)<br>
主机别名(双线服务器时填写)：
<input name="cname" type="text" value="<%=ds("cname")%>" size="20">
(可以不填写)
<br>
<br>
注意：以下全部内容Linux系统不用填写(不用更改)：<br>
<br>
用户上一层目录：
<input name="homedir" type="text" id="spacelimit" size="15" value="<%=ds("homedir")%>" maxlength="30">
(已开通虚拟主机后不能修改主目录)<br>
暂停网站时的转向地址：
<input name="pauseweb" type="text" id="spacelimit" size="30" value="<%=ds("pauseweb")%>" maxlength="200">
(超过使用期限) <br>
暂停网站时的转向地址：
<input name="pauseweb2" type="text" id="spacelimit" size="30" value="<%=ds("pauseweb2")%>" maxlength="200">
(上传政治色情不良内容) <br>
暂停网站时的转向地址：
<input name="pauseweb3" type="text" id="spacelimit" size="30" value="<%=ds("pauseweb3")%>" maxlength="200">
(上传引起不稳定的程序，超流量及其他原因) <br>
暂停网站时的转向地址：
<input name="pauseweb4" type="text" id="spacelimit" size="30" value="<%=ds("pauseweb4")%>" maxlength="200">
(没有备案或备案不成功)<br>
启用网站数据备份功能：
<input name="backupyes" type="checkbox" id="backupyes" value="y" <%if ds("backupyes")="y" then%>checked<%end if%> onClick="alert('注意！备份用户网站需要大量的硬盘空间,请检查备份目录的可用空间是否足够。')">
　每周
<input name="backupday" type="text" id="backupday" value="<%=ds("backupday")%>" size="2" maxlength="2">
(星期几，注意星期日为1,星期一为2,星期六为7)<br>
备份保留
 <input name="backupsave" type="text" id="backupsave" value="<%=ds("backupsave")%>" size="2" maxlength="2">
次　
备份目录：
<input name="backupdir" type="text" id="backupdir" size="20" value="<%=ds("backupdir")%>" maxlength="30">
　
不备份的类型：
<input name="nottype" type="text" id="nottype" size="15" value="<%=ds("nottype")%>" maxlength="128">
(*.rar*.zip)<br>
ASP影射：
<textarea name="asp" cols="50" id="spacelimit"><%=ds("asp")%></textarea>
<br>
ASP.Net 1.1影射：
<textarea name="aspx" cols="50" id="spacelimit"><%=ds("aspx")%></textarea>
<br>
ASP.Net 2.0/3.5影射：
<textarea name="aspx2" cols="50" id="spacelimit"><%=ds("aspx2")%></textarea>
<br>
ASP.Net 4.0 影射：
<textarea name="aspx4" cols="50" id="spacelimit"><%=ds("aspx4")%></textarea>
<br>
开通时默认的.Net版本
<select name="netver" id="netver">
  <option value="1.1" <%if ds("netver")="1.1" then%>selected<%end if%>>1.1</option>
  <option value="2.0" <%if ds("netver")="2.0" then%>selected<%end if%>>2.0/3.5</option>
  <option value="4.0" <%if ds("netver")="4.0" then%>selected<%end if%>>4.0</option>  
</select><br>
PHP影射：
<textarea name="php" cols="50" id="spacelimit"><%=ds("php")%></textarea>
<br>
CGI/perl影射：
<textarea name="cgi" cols="50" id="spacelimit"><%=ds("cgi")%></textarea>
<br>
禁止下载类影射：
<textarea name="notuserar" cols="50" ><%=ds("notuserar")%></textarea><br>
如果此服务器安装了一流信息监控拦截系统,并且您的服务器是win 2003<br>
请设置它：
<textarea name="infosafe" cols="50" id="spacelimit"><%=ds("infosafe")%></textarea>
<br>
<br>
 <br>
 是否允许PHP版本切换：
 <input type="radio" name="canphpver" value="1" <%if ds("canphpver")=true then%>checked<%end if%>>
是(默认) 　　
<input type="radio" name="canphpver" value="0" <%if ds("canphpver")=false then%>checked<%end if%>>
否<br>
<br> 
本服务器中的虚拟主机的所有域名必须在工信部已备案成功才能绑定：
 <input type="radio" name="openmustre" value="1" <%if ds("openmustre")=true then%>checked<%end if%>>
是 　　
<input type="radio" name="openmustre" value="0" <%if ds("openmustre")=false then%>checked<%end if%>>
否(默认)<br />
<br />
 本服务器中的所有虚拟主机绑定的域名如果30天未备案成功就自动清理(7天不提交备案信息也清理)：
 <input type="radio" name="autodelicp" value="1" <%if ds("autodelicp")=true then%>checked<%end if%> />
是 　　
<input type="radio" name="autodelicp" value="0" <%if ds("autodelicp")=false then%>checked<%end if%> />
否(默认)<br>
<br>
本服务器中的所有域名采用自带的ISP备案系统处理备案(在您安装了星外ISP备案系统的前提这个功能才有用)：
<input type="radio" name="useisp" value="1" <%if ds("useisp")=true then%>checked<%end if%> />
是 　　
<input type="radio" name="useisp" value="0" <%if ds("useisp")=false then%>checked<%end if%> />
否(默认)<br>
<br>
接入商的信息(提供给用户备案用的)：
<textarea name="ispinfo" cols="50" rows="5" id="ispinfo"><%=ds("ispinfo")%></textarea><br>
<br>
本服务器使用海外CDN转发免备案结构：
<input type="radio" name="isuseCDN" value="0" <%if ds("isuseCDN")=false then%>checked<%end if%>>
否(默认)　　
<input type="radio" name="isuseCDN" value="1" <%if ds("isuseCDN")=true then%>checked<%end if%>>
是　源端口
<input name="port" type="text" id="port" value="<%=ds("port")%>" size="4" maxlength="6">
<br>
　　可选的CDN服务器一：
<select name="usecdn1" id="usecdn1">
  <%		
	Set dsCDNserver = Server.CreateObject("ADODB.Recordset")	
Sql="Select * from FreeHost.FreeHost_ServerCDNlist where cdntype='外国免备案专用' order by id asc"
		dsCDNserver.Open Sql,conn,1,1%>
  <%if dsCDNserver.eof then%>
  <option value=0>没有可用的CDN服务器，请您定义CDN服务器</option>
  <%else%>
    <option value=0>不使用CDN服务器</option>
  <%end if
while not dsCDNserver.eof%>
  <option value="<%=dsCDNserver("id")%>" <%if dsCDNserver("id")=ds("usecdn1") then%>selected<%end if%>><%=dsCDNserver("id")%>.<%=dsCDNserver("servername")%>(<%=dsCDNserver("ip")%>)</option>
  <%
dsCDNserver.movenext
wend%>
</select>
正常只需要设置第一台CDN服务器。<br>
　　可选的CDN服务器二：
<select name="usecdn2" id="usecdn2">
  <%		
	Set dsCDNserver = Server.CreateObject("ADODB.Recordset")	
Sql="Select * from FreeHost.FreeHost_ServerCDNlist where cdntype='外国免备案专用' order by id asc"
		dsCDNserver.Open Sql,conn,1,1%>
  <%if dsCDNserver.eof then%>
  <option value=0>没有可用的CDN服务器，请您定义CDN服务器</option>
  <%else%>
    <option value=0>不使用CDN服务器</option>  
  <%end if
while not dsCDNserver.eof%>
  <option value="<%=dsCDNserver("id")%>" <%if dsCDNserver("id")=ds("usecdn2") then%>selected<%end if%>><%=dsCDNserver("id")%>.<%=dsCDNserver("servername")%>(<%=dsCDNserver("ip")%>)</option>
  <%
dsCDNserver.movenext
wend%>
</select>
一般不需要设置多台CDN服务器，特殊情况下才要这样设置<br>
　　可选的CDN服务器三：
<select name="usecdn3" id="usecdn3">
  <%		
	Set dsCDNserver = Server.CreateObject("ADODB.Recordset")	
Sql="Select * from FreeHost.FreeHost_ServerCDNlist where cdntype='外国免备案专用' order by id asc"
		dsCDNserver.Open Sql,conn,1,1%>
  <%if dsCDNserver.eof then%>
  <option value=0>没有可用的CDN服务器，请您定义CDN服务器</option>
  <%else%>
    <option value=0>不使用CDN服务器</option>  
  <%end if
while not dsCDNserver.eof%>
  <option value="<%=dsCDNserver("id")%>" <%if dsCDNserver("id")=ds("usecdn3") then%>selected<%end if%>><%=dsCDNserver("id")%>.<%=dsCDNserver("servername")%>(<%=dsCDNserver("ip")%>)</option>
  <%
dsCDNserver.movenext
wend%>
</select>
如果多台虚拟主机服务器共用一个免备案CDN服务器<br>
　　可选的CDN服务器四：
<select name="usecdn4" id="usecdn4">
  <%		
	Set dsCDNserver = Server.CreateObject("ADODB.Recordset")	
Sql="Select * from FreeHost.FreeHost_ServerCDNlist where cdntype='外国免备案专用' order by id asc"
		dsCDNserver.Open Sql,conn,1,1%>
  <%if dsCDNserver.eof then%>
  <option value=0>没有可用的CDN服务器，请您定义CDN服务器</option>
  <%else%>
    <option value=0>不使用CDN服务器</option>  
  <%end if
while not dsCDNserver.eof%>
  <option value="<%=dsCDNserver("id")%>" <%if dsCDNserver("id")=ds("usecdn4") then%>selected<%end if%>><%=dsCDNserver("id")%>.<%=dsCDNserver("servername")%>(<%=dsCDNserver("ip")%>)</option>
  <%
dsCDNserver.movenext
wend%>
</select> 
那么，可选的CDN服务器顺序必须一样。 
<br>
　　可选的CDN服务器五：
<select name="usecdn5" id="usecdn5">
  <%		
	Set dsCDNserver = Server.CreateObject("ADODB.Recordset")	
Sql="Select * from FreeHost.FreeHost_ServerCDNlist where cdntype='外国免备案专用' order by id asc"
		dsCDNserver.Open Sql,conn,1,1%>
  <%if dsCDNserver.eof then%>
  <option value=0>没有可用的CDN服务器，请您定义CDN服务器</option>
  <%else%>
    <option value=0>不使用CDN服务器</option>  
  <%end if
while not dsCDNserver.eof%>
  <option value="<%=dsCDNserver("id")%>" <%if dsCDNserver("id")=ds("usecdn5") then%>selected<%end if%>><%=dsCDNserver("id")%>.<%=dsCDNserver("servername")%>(<%=dsCDNserver("ip")%>)</option>
  <%
dsCDNserver.movenext
wend%>
</select><br>
<br>
<input type="submit" name="Submit" value="修改" ID="Submit1">
<input name="id" type="hidden" id="id" value="<%=ds("id")%>" size="12">
　　　　　　　　　　　　　　　　　　　　　　　　
<input name="delit" type="submit" id="delit" value="删除">
(删除是不可恢复的删除)<br>
<br></td>
  </tr>
</table>
</div></form>

<%
end if
end if%>
<script language=JavaScript>
<!--

	function chkForm2(theform)
	{	
	  if (!(theform.site.value.indexOf("www.")<0))
			if(! confirm("受控网址不应该是www开头的域名，也不能和主控域名一样，是您在建立受控端时输入的网址。"))	return false;
		return true;
	}
//-->
</script>
<form name="form1" method="post" action="serveradd.asp" ID="Form1"onsubmit="return chkForm2(this)">
  <DIV class="tableborder">
    <table width="100%"  border="0" cellspacing="1">
      <tr >
        <td height="24" colspan="2" align="center" background="img/tablebg.gif"><font color="#FFFFFF">添加新的虚拟主机服务器</font></td>
      </tr>
      <tr bgcolor="#E4EAF2">
        <td width="9%" align="right">&nbsp;</td>
        <td width="91%" align="left"><br>
          操作系统类型:
            <input name="ostype" type="radio" value="windows" checked>
            Windows(默认)　　
            <input type="radio" name="ostype" value="linux"> 
            Linux(DA接口)<br>
            　　　　　　　　　　　　　　　　　　 (DA接口的特别说明：星外科技提供的只是接口，DA面板请联系DA开发商购买,<br>
　　　　　　　　　　　　　　　　　　　DA面板的技术支持请联系DA开发商提供,<font color="#FF0000">星外科技不提供任何DA面板的技术支持</font><br>
　　　　　　　　　　　　　　　　　　　运营Linux系统需要相关的基础知识及相关的英文语言能力。) <br>
　　　　　　　　　　　　　　　　　　（每增加一台Linux服务器，您要修改下原有的linux产品并提交才能生效。)<br>            
<br>
          <br>
          服务器命名：
            <input name="servername" type="text" id="servername" size="12">
受控网址：
<input name="site" type="text" id="site" value="http://" size="35">
(Linux DA接口请写上端口号,如http://192.168.0.88:2222)　<br>
排队顺序：
      <input name="orderbyid" type="text" id="orderbyid" size="4" maxlength="6" value="0">
(在前台如果有多台服务器让用户选取时，服务器的排序顺序，数值大排前面)<br>
共享密码：
<input name="FreeHostsharekey" type="password" id="FreeHostsharekey">
 　　　(Linux DA接口请填写admin用户的密码)　<br>
　 (此密码是星外虚拟主机管理平台主控端与当前受控端共享密码，请修改成一个14位以上的密码)<br>
　 (此密码必须与此服务器“开始”-“7i24虚拟主机管理平台”-“修改共享密码[受控端]”一致）<br>
临时域名后缀：
<input name="tempdomain" type="text" id="tempdomain" size="20">
(可以是二或三级域名 必须填写)　机房：
<input name="netby" type="text" id="netby" value="电信" size="10" maxlength="20">
<br>
代理商名下用户开通时所绑定的临时域名后缀：
<input name="tempdomainagn" type="text" id="tempdomainagn" size="20">
(可以和上面的临时域名后缀一致,Linux的不能太长)<br>
用户FTP用的域名(可以填写服务器的ＩＰ)：
<input name="ftpdomain" type="text" id="ftpdomain" size="20">
服务器ＩＰ：
<input name="ip" type="text" id="ip" size="20">
<br>
主机别名(双线服务器时填写)：
<input name="cname" type="text" size="20">
(可以不填写)<br>
<br>
注意：以下全部内容Linux系统不用填写(不用更改)：<br>
<br>
用户上一层目录：
<input name="homedir" type="text" id="spacelimit" size="15" value="d:\freehost\" maxlength="30">
(已开通虚拟主机后不能修改主目录)<br>
暂停网站时的转向地址：
<input name="pauseweb" type="text" id="spacelimit" size="30" value="http://" maxlength="200">
(超过使用期限) <br>
暂停网站时的转向地址：
<input name="pauseweb2" type="text" id="spacelimit" size="30" value="http://" maxlength="200">
(上传政治色情不良内容) <br>
暂停网站时的转向地址：
<input name="pauseweb3" type="text" id="spacelimit" size="30" value="http://" maxlength="200">
(上传引起不稳定的程序及其他原因) <br>
暂停网站时的转向地址：
<input name="pauseweb4" type="text" id="spacelimit" size="30" value="http://" maxlength="200">
(没有备案或备案不成功)<br>
启用网站数据备份功能：
<input name="backupyes" type="checkbox" id="backupyes" value="y"  onClick="alert('注意！备份用户网站需要大量的硬盘空间,请检查备份目录的可用空间是否足够。')"> 
　每周
<input name="backupday" type="text" id="backupday" value="5" size="2" maxlength="2">
(星期几) 备份保留
<input name="backupsave" type="text" id="backupsave" value="3" size="2" maxlength="2">
次　备份目录：
<input name="backupdir" type="text" id="spacelimit" size="20" value="d:\freehostbackup\" maxlength="30">
<br>
不备份的类型：
<input name="nottype" type="text" id="nottype" size="20" value="*.rar*.zip*.log" maxlength="128">
<br>
ASP影射：
<textarea name="asp" cols="50" id="spacelimit">.asp,C:\WINDOWS\system32\inetsrv\asp.dll,5,GET,HEAD,POST,TRACE|.asa,C:\WINDOWS\system32\inetsrv\asp.dll,5,GET,HEAD,POST,TRACE|</textarea>
<br>
<br>
ASP.Net 1.1 影射：
<textarea name="aspx" cols="50" id="spacelimit">.asax,C:\WINDOWS\Microsoft.NET\Framework\v1.1.4322\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUG|.aspx,C:\WINDOWS\Microsoft.NET\Framework\v1.1.4322\aspnet_isapi.dll,1,GET,HEAD,POST,DEBUG|.asmx,C:\WINDOWS\Microsoft.NET\Framework\v1.1.4322\aspnet_isapi.dll,1,GET,HEAD,POST,DEBUG|.ashx,C:\WINDOWS\Microsoft.NET\Framework\v1.1.4322\aspnet_isapi.dll,1,GET,HEAD,POST,DEBUG|.ascx,C:\WINDOWS\Microsoft.NET\Framework\v1.1.4322\aspnet_isapi.dll,1,GET,HEAD,POST,DEBUG|.config,C:\WINDOWS\Microsoft.NET\Framework\v1.1.4322\aspnet_isapi.dll,1,GET,HEAD,POST,DEBUG|.axd,C:\WINDOWS\Microsoft.NET\Framework\v1.1.4322\aspnet_isapi.dll,1,GET,HEAD,POST,DEBUG|</textarea>
<br>
ASP.Net 2.0/3.5 影射：
<textarea name="aspx2" cols="50" id="spacelimit">.ad,c:\windows\microsoft.net\framework\v2.0.50727\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUG|.adprototype,c:\windows\microsoft.net\framework\v2.0.50727\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUG|.asax,c:\windows\microsoft.net\framework\v2.0.50727\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUG|.ascx,c:\windows\microsoft.net\framework\v2.0.50727\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUG|.ashx,c:\windows\microsoft.net\framework\v2.0.50727\aspnet_isapi.dll,1,GET,HEAD,POST,DEBUG|.asmx,c:\windows\microsoft.net\framework\v2.0.50727\aspnet_isapi.dll,1,GET,HEAD,POST,DEBUG|.aspx,c:\windows\microsoft.net\framework\v2.0.50727\aspnet_isapi.dll,1,GET,HEAD,POST,DEBUG|.axd,c:\windows\microsoft.net\framework\v2.0.50727\aspnet_isapi.dll,1,GET,HEAD,POST,DEBUG|.browser,c:\windows\microsoft.net\framework\v2.0.50727\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUG|.cd,c:\windows\microsoft.net\framework\v2.0.50727\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUG|.compiled,c:\windows\microsoft.net\framework\v2.0.50727\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUG|.config,c:\windows\microsoft.net\framework\v2.0.50727\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUG|.cs,c:\windows\microsoft.net\framework\v2.0.50727\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUG|.csproj,c:\windows\microsoft.net\framework\v2.0.50727\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUG|.dd,c:\windows\microsoft.net\framework\v2.0.50727\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUG|.exclude,c:\windows\microsoft.net\framework\v2.0.50727\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUG|.java,c:\windows\microsoft.net\framework\v2.0.50727\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUG|.jsl,c:\windows\microsoft.net\framework\v2.0.50727\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUG|.ldb,c:\windows\microsoft.net\framework\v2.0.50727\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUG|.ldd,c:\windows\microsoft.net\framework\v2.0.50727\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUG|.lddprototype,c:\windows\microsoft.net\framework\v2.0.50727\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUG|.ldf,c:\windows\microsoft.net\framework\v2.0.50727\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUG|.licx,c:\windows\microsoft.net\framework\v2.0.50727\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUG|.master,c:\windows\microsoft.net\framework\v2.0.50727\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUG|.mdb,c:\windows\microsoft.net\framework\v2.0.50727\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUG|.mdf,c:\windows\microsoft.net\framework\v2.0.50727\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUG|.msgx,c:\windows\microsoft.net\framework\v2.0.50727\aspnet_isapi.dll,1,GET,HEAD,POST,DEBUG|.refresh,c:\windows\microsoft.net\framework\v2.0.50727\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUG|.rem,c:\windows\microsoft.net\framework\v2.0.50727\aspnet_isapi.dll,1,GET,HEAD,POST,DEBUG|.resources,c:\windows\microsoft.net\framework\v2.0.50727\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUG|.resx,c:\windows\microsoft.net\framework\v2.0.50727\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUG|.sd,c:\windows\microsoft.net\framework\v2.0.50727\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUG|.sdm,c:\windows\microsoft.net\framework\v2.0.50727\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUG|.sdmDocument,c:\windows\microsoft.net\framework\v2.0.50727\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUG|.sitemap,c:\windows\microsoft.net\framework\v2.0.50727\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUG|.skin,c:\windows\microsoft.net\framework\v2.0.50727\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUG|.soap,c:\windows\microsoft.net\framework\v2.0.50727\aspnet_isapi.dll,1,GET,HEAD,POST,DEBUG|.svc,c:\windows\microsoft.net\framework\v2.0.50727\aspnet_isapi.dll,1,GET,HEAD,POST,DEBUG|.vb,c:\windows\microsoft.net\framework\v2.0.50727\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUG|.vbproj,c:\windows\microsoft.net\framework\v2.0.50727\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUG|.vjsproj,c:\windows\microsoft.net\framework\v2.0.50727\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUG|.vsdisco,c:\windows\microsoft.net\framework\v2.0.50727\aspnet_isapi.dll,1,GET,HEAD,POST,DEBUG|.webinfo,c:\windows\microsoft.net\framework\v2.0.50727\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUG|</textarea>
<br>
ASP.Net 4.0 影射：
<textarea name="aspx4" cols="50" id="spacelimit">.ad,c:\windows\microsoft.net\framework\v4.0.30319\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUG|.adprototype,c:\windows\microsoft.net\framework\v4.0.30319\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUG|.asax,c:\windows\microsoft.net\framework\v4.0.30319\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUG|.ascx,c:\windows\microsoft.net\framework\v4.0.30319\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUG|.ashx,c:\windows\microsoft.net\framework\v4.0.30319\aspnet_isapi.dll,1,GET,HEAD,POST,DEBUG|.asmx,c:\windows\microsoft.net\framework\v4.0.30319\aspnet_isapi.dll,1,GET,HEAD,POST,DEBUG|.aspx,c:\windows\microsoft.net\framework\v4.0.30319\aspnet_isapi.dll,1,GET,HEAD,POST,DEBUG|.axd,c:\windows\microsoft.net\framework\v4.0.30319\aspnet_isapi.dll,1,GET,HEAD,POST,DEBUG|.browser,c:\windows\microsoft.net\framework\v4.0.30319\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUG|.cd,c:\windows\microsoft.net\framework\v4.0.30319\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUG|.compiled,c:\windows\microsoft.net\framework\v4.0.30319\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUG|.config,c:\windows\microsoft.net\framework\v4.0.30319\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUG|.cs,c:\windows\microsoft.net\framework\v4.0.30319\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUG|.csproj,c:\windows\microsoft.net\framework\v4.0.30319\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUG|.dd,c:\windows\microsoft.net\framework\v4.0.30319\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUG|.exclude,c:\windows\microsoft.net\framework\v4.0.30319\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUG|.java,c:\windows\microsoft.net\framework\v4.0.30319\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUG|.jsl,c:\windows\microsoft.net\framework\v4.0.30319\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUG|.ldb,c:\windows\microsoft.net\framework\v4.0.30319\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUG|.ldd,c:\windows\microsoft.net\framework\v4.0.30319\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUG|.lddprototype,c:\windows\microsoft.net\framework\v4.0.30319\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUG|.ldf,c:\windows\microsoft.net\framework\v4.0.30319\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUG|.licx,c:\windows\microsoft.net\framework\v4.0.30319\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUG|.master,c:\windows\microsoft.net\framework\v4.0.30319\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUG|.mdb,c:\windows\microsoft.net\framework\v4.0.30319\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUG|.mdf,c:\windows\microsoft.net\framework\v4.0.30319\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUG|.msgx,c:\windows\microsoft.net\framework\v4.0.30319\aspnet_isapi.dll,1,GET,HEAD,POST,DEBUG|.refresh,c:\windows\microsoft.net\framework\v4.0.30319\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUG|.rem,c:\windows\microsoft.net\framework\v4.0.30319\aspnet_isapi.dll,1,GET,HEAD,POST,DEBUG|.resources,c:\windows\microsoft.net\framework\v4.0.30319\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUG|.resx,c:\windows\microsoft.net\framework\v4.0.30319\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUG|.sd,c:\windows\microsoft.net\framework\v4.0.30319\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUG|.sdm,c:\windows\microsoft.net\framework\v4.0.30319\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUG|.sdmDocument,c:\windows\microsoft.net\framework\v4.0.30319\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUG|.sitemap,c:\windows\microsoft.net\framework\v4.0.30319\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUG|.skin,c:\windows\microsoft.net\framework\v4.0.30319\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUG|.soap,c:\windows\microsoft.net\framework\v4.0.30319\aspnet_isapi.dll,1,GET,HEAD,POST,DEBUG|.vb,c:\windows\microsoft.net\framework\v4.0.30319\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUG|.vbproj,c:\windows\microsoft.net\framework\v4.0.30319\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUG|.vjsproj,c:\windows\microsoft.net\framework\v4.0.30319\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUG|.vsdisco,c:\windows\microsoft.net\framework\v4.0.30319\aspnet_isapi.dll,1,GET,HEAD,POST,DEBUG|.webinfo,c:\windows\microsoft.net\framework\v4.0.30319\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUG|.php,C:\PHP\php5isapi.dll,5,GET,HEAD,POST,TRACE|.xamlx,c:\windows\microsoft.net\framework\v4.0.30319\aspnet_isapi.dll,1|.aspq,c:\windows\microsoft.net\framework\v4.0.30319\aspnet_isapi.dll,5|.cshtm,c:\windows\microsoft.net\framework\v4.0.30319\aspnet_isapi.dll,5|.cshtml,c:\windows\microsoft.net\framework\v4.0.30319\aspnet_isapi.dll,5|.vbhtm,c:\windows\microsoft.net\framework\v4.0.30319\aspnet_isapi.dll,5|.vbhtml,c:\windows\microsoft.net\framework\v4.0.30319\aspnet_isapi.dll,5|.svc,c:\windows\microsoft.net\framework\v4.0.30319\aspnet_isapi.dll,1|.xoml,c:\windows\microsoft.net\framework\v4.0.30319\aspnet_isapi.dll,1|.rules,c:\windows\microsoft.net\framework\v4.0.30319\aspnet_isapi.dll,5|</textarea>
<br>
开通时默认的.Net版本
<select name="netver" id="netver">
  <option value="1.1">1.1</option>
  <option value="2.0" selected>2.0/3.5</option>
  <option value="4.0">2.0/3.5</option>  
</select>
<br>
PHP影射：
<textarea name="php" cols="50" id="spacelimit">.php,C:\PHP\php5isapi.dll,5,GET,HEAD,POST,TRACE|</textarea>
<br>　　　　　
注意从最新版本使用PHP多版本综合包后，这儿的PHP影射请留空。<br>
CGI/perl影射：
<textarea name="cgi" cols="50" id="spacelimit">.cgi,C:\Perl\bin\perl.exe "%25s" %25s,5,GET,HEAD,POST,TRACE|</textarea>
<br>
禁止下载类影射：
<textarea name="notuserar" cols="50" id="spacelimit">.rar,C:\WINDOWS\system32\inetsrv\asp.dll,4|.zip,C:\WINDOWS\system32\inetsrv\asp.dll,4|.rm,C:\WINDOWS\system32\inetsrv\asp.dll,4|.rmvb,C\WINDOWS\system32\inetsrv\asp.dll,4|.wma,C:\WINDOWS\system32\inetsrv\asp.dll,4|.wmv,C:\WINDOWS\system32\inetsrv\asp.dll,4|.mp3,C:\WINDOWS\system32\inetsrv\asp.dll,4|.mp4,C:\WINDOWS\system32\inetsrv\asp.dll,4|.mpeg,C:\WINDOWS\system32\inetsrv\asp.dll,4|.avi,C:\WINDOWS\system32\inetsrv\asp.dll,4|.exe,C:\WINDOWS\system32\inetsrv\asp.dll,4|.msi,C:\WINDOWS\system32\inetsrv\asp.dll,4|.iso,C:\WINDOWS\system32\inetsrv\asp.dll,4|</textarea>
<br>
如果此服务器安装了一流信息监控拦截系统,并且您的服务器是win2003/win2008<br>
请设置它(复制进去)：
<textarea name="infosafe" cols="50" id="spacelimit"></textarea>
<br>
4.0版一流用以下影射:<br>
*,C:\7i24.com\iissafe\infosafe32.dll,1,GET,HEAD,POST|<br>
<br>
<br>
是否允许PHP版本切换：
<input type="radio" name="canphpver" value="1">
是(默认)　　
<input type="radio" name="canphpver" value="0" checked>
否<br>
<br>
本服务器中的虚拟主机的所有域名必须在工信部已备案成功才能绑定：
<input type="radio" name="openmustre" value="1">
是 　　
<input type="radio" name="openmustre" value="0" checked>
否(默认)<br />
<br />
本服务器中的所有虚拟主机绑定的域名如果30天未备案成功就自动清理(7天不提交备案信息也清理)：
<input type="radio" name="autodelicp" value="1" />
是 　　
<input type="radio" name="autodelicp" value="0" checked/>
否(默认)<br>
<br>
本服务器中的所有域名采用自带的ISP备案系统处理备案(在您安装了星外ISP备案系统的前提这个功能才有用)：
<input type="radio" name="useisp" value="1">
是 　　
<input type="radio" name="useisp" value="0" checked>
否(默认)<br>
<br>
接入商的信息(提供给用户备案用的)：
<textarea name="ispinfo" cols="50" rows="5" id="ispinfo"></textarea>
<br>
<br>
本服务器使用海外CDN转发免备案结构：
<input type="radio" name="isuseCDN" value="0" checked>
否(默认)　　
<input type="radio" name="isuseCDN" value="1" >
是 可选的CDN服务器：
<select name="usecdn1" id="usecdn1">
  <%		
	Set dsCDNserver = Server.CreateObject("ADODB.Recordset")	
Sql="Select * from FreeHost.FreeHost_ServerCDNlist where cdntype='外国免备案专用' order by id asc"
		dsCDNserver.Open Sql,conn,1,1%>
  <%if dsCDNserver.eof then%>
  <option value=0>没有可用的CDN服务器，请您定义CDN服务器</option>
  <%end if
while not dsCDNserver.eof%>
  <option value=<%=dsCDNserver("id")%>><%=dsCDNserver("id")%>.<%=dsCDNserver("servername")%>(<%=dsCDNserver("ip")%>)</option>
  <%
dsCDNserver.movenext
wend%>
</select>
源端口
<input name="port" type="text" id="port" value="80" size="4" maxlength="6">
<br>
<br>
<input type="submit" name="Submit" value="添加" ID="Submit1">
<br>
          <br></td>
      </tr>
    </table>
  </div>
</form>
<%else%>

<br>
<%ServerlistID=Request("id")
	Set ds = Server.CreateObject("ADODB.Recordset")	
		Sql="Select * from FreeHost.FreeHost_Product_Host_IP where ServerlistID='"&Request("id")&"' order by orderbyid desc"
if request.Form ("ipid")<>"" Then Sql="Select * from FreeHost.FreeHost_Product_Host_IP where id='"&Request("ipid")&"'"

		ds.Open Sql,conn,1,1
If ds.Eof Then%>
此服务器IP资源为空.
<%else%>
<DIV class="tableborder">
<table width="100%"  border="0" cellspacing="1">
  <tr >
    <td width="9%" height="24" align="center" background="img/tablebg.gif"><font color="#FFFFFF">编号</font></td>
    <td align="center" background="img/tablebg.gif"><font color="#FFFFFF">IP</font></td>
    <td align="center" background="img/tablebg.gif"><font color="#FFFFFF">所属产品ID</font></td>
    <td width="9%" align="center" background="img/tablebg.gif"><font color="#FFFFFF">操作</font></td>
  </tr>
<%while not ds.Eof%>

  <tr bgcolor="#E4EAF2">
    <td height="30" align="center"><%=ds("id")%></td>
    <td width="40%" align="center"><%=ds("ip")%></td>
    <td width="42%" align="center"><%If ds("HostID")=0 then%>未分配<%else%>
      <a href="handhost1.asp?id=<%=ds("HostID")%>"><%=ds("HostID")%></a>
      <%End if%></td>
    <td align="center"><a href="serverlist.asp?ipid=<%=ds("id")%>&id=<%=ServerlistID%>&op=ip"><font color=black>修改</font></a></td>
  </tr>
<%
ds.movenext
wend%>
</table>
</div>
<%End if%>
<br>
<%if Request("ipid")<>"" then
	Set ds = Server.CreateObject("ADODB.Recordset")	
		Sql="Select * from FreeHost.FreeHost_Product_Host_IP where id='"&Request("ipid")&"'"
		ds.Open Sql,conn,1,1
If not ds.Eof Then
ip=ds("ip")
orderbyid=ds("orderbyid")
HostID=ds("HostID")
ipid=ds("id")
ServerlistID=ds("ServerlistID")
end if
end if%>
<form name="form1" method="post" action="serverlistip-sub.asp" ID="Form1" >
<DIV class="tableborder">
<table width="100%"  border="0" cellspacing="1">
  <tr >
    <td height="24" colspan="2" align="center" background="img/tablebg.gif"><font color="#FFFFFF">IP资源设置</font></td>
  </tr>
  <tr bgcolor="#E4EAF2">
    <td width="9%" align="right">&nbsp;</td>
    <td width="91%" align="left"><br>      
<%If ipid<>"" then%>      编号：<%=ipid%><br><%End if%>
        IP：
        <input name="ip" type="text" id="ip" value="<%=ip%>" size="20" maxlength="50">
        <%if request("ipid")="" then%>(可以批量输入,例如输入192.168.0.1-254就代表输入了255个IP)<%end if%><br>
        排序编号(数字大排前面)：
        <input name="orderbyid" type="text" id="orderbyid" value="<%=orderbyid%>" size="3" maxlength="50"><br>
		所属服务器编号:
		<input name="ServerlistID" type="text" id="ServerlistID" value="<%=ServerlistID%>" size="3" maxlength="50"><br>

<%If HostID<>"" then%>所属虚拟主机编号：
        <input name="HostID" type="text" id="HostID" value="<%=HostID%>" size="3" maxlength="50">(0代表未分配)<br><%End if%>
<br>
<%If ipid="" then%>
<input type="submit" name="Submit" value="添加" ID="Submit1">
<%else%>
<input type="submit" name="modify" value="修改" ID="Submit2">
<input name="ipid" type="hidden" id="ipid" value="<%=ipid%>" size="12">
　　　　　　　　
<input type="submit" name="delit" value="删除" onClick="return chkForm(this)">
(删除是不可恢复的删除)<script language=JavaScript>
<!--
	function chkForm(theform)
	{
			if(! confirm("请确认是否要删除?\n注意，如果删除是没有办法恢复的。在删除IP前，请您仔细检查，必须是没有任何用户，没有任何产品在使用这个IP的参数，这样才能删除！"))
				return false;
	}
//-->
</script>  
<%End if%>
  
<br>
<br></td>
  </tr>
</table></div>
</form>

<%end if%>
</TD>
      <TD width=18 background="img/midri.gif">&nbsp;</TD>
    </TR>
  </TBODY>
</TABLE>
<TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
  <TBODY>
    <TR>
      <TD width=30><IMG height=19 
                  src="img/rb1.jpg" 
                  width=30></TD>
      <TD 
                background=img/rb2.jpg>&nbsp;</TD>
      <TD width=30><IMG height=19 
                  src="img/rb3.jpg" 
                  width=30></TD>
    </TR>
  </TBODY>
</TABLE>
<%=htmlwrite("html10")%>
<%end if
if ef then
Response.Redirect "e.asp?e="&ec
end if%>
