<!--#include virtual="/incs/config.asp" -->
<!--#include virtual="/incs/top.asp" -->
<%
chk_log()
chk_newpwr 1,0,1

	hnme=SafeRequest("hnme")
	If hnme="" Then
	call errorpage(-2,"对不起，参数错误！")

	End If
if session("sysclass")>=5 then
query="select * from v_hstlst   where h_ftpusr ='"&hnme&"'"
elseif session("sysclass")>=4 then
query="select * from v_hstlst  where h_ftpusr ='"&hnme&"'  and  ((("&session("sysarestr")&" or u_myare=0) and u_rotnme='') or u_rotnme='"&session("usrname")&"')"
else
query="select * from v_hstlst  where h_unme='"&session("usrname")&"' and h_ftpusr ='"&hnme&"'"
end if
	conn.open constr

	rs.open query,conn,1,1
    if rs.recordcount<>1 then
	rs.close
	conn.close
	call errorpage(-2,"对不起，该主机不存在或者您无权操作！")

	end if

%>
<%    hostname=trim(rs("h_ftpusr"))
			    freedomain = rs("h_ftpusr")&"."&rs("h_svrnme") 
			    proid=trim(rs("h_prd"))
h_sst=rs("g_sst")
		%>
<script language=javascript>
		function expl()
		{
		if (identity.style.display=="none")
		identity.style.display="block";
		else
		identity.style.display="none";
		}
		</script>
<table cellspacing=2 cellpadding=0 width="100%" border=0>
  <tbody> 
  <tr> 
    <td  colspan=2 valign="middle"> 
      <table class=line cellspacing=0 cellpadding=0 width="100%" 
                  border=0 align="center">
        <tbody> 
        <tr> 
          <td valign=bottom width="25%" height=20><font color="#000000" class=ddropshadow><b><span class=enbold><strong><font color="#000000">主机列表<a href="index.asp"  class=commonface ><font color="#FF0000">（查询）</font></a></font></strong></span></b></font></td>
          <td valign=bottom noWrap align=right 
                        width="75%"><a href="hst_lst.asp?querytype=8" class=commonface >今天新开通</a> 
            <font color="#000000">|</font> <a href="hst_lst.asp?querytype=9" class=commonface >本周新开通</a> 
            <font color="#000000">|</font> <a href="hst_lst.asp?querytype=10" class=commonface >本周到期</a> 
            <font color="#000000">| </font><a href="hst_lst.asp?querytype=11" class=commonface >本月到期</a></td>
        </tr>
        <tr> 
          <td align=middle width="100%" colspan=2 height=5></td>
        </tr>
        <tr> 
          <td align=middle width="100%" colspan=2 height=2 class=menuline></td>
        </tr>
        </tbody> 
      </table>
      <br>
    </td>
  </tr>
  <tr> 
    <td  colspan=2 valign="middle" height="28"> 
      <table width="100%" border="0" cellspacing="0" cellpadding="0" align="center">
        <tr> 
          <td> 
            <!--#include file="menu.asp"-->
          </td>
        </tr>
      </table>
      <br>
      <table cellpadding="0" cellspacing="0" id="AutoNumber3" style="border-collapse: collapse" width="100%" border="0" align="center">
        <tr> 
          <td height="14" width="100%" valign="top"> 
            <table  cellpadding="0" cellspacing="0" >
              <tr> 
                <td height=1></td>
              </tr>
            </table>
            <table align="center" border="0" cellpadding="0" cellspacing="0" width="100%" class=datalist >
              <tr align="middle" > 
                <th colspan=3 height="22" class=datalistheader > 
                  <div align="center"><b>是否启用日志功能</b> </div>
                </th>
              </tr>
              <%
if rs("h_log")=1 then
statestring="启动"
startstr="disabled=1"
stopstr=" "
elseif rs("h_log")=0 then
statestring="暂停"
startstr=" "
stopstr=" disabled=1"
end if 
%>
              <form action="hst_mng.asp" method =post name= weblog>
                <tr > 
                  <td height="35"  width="25%" class=datalistgrida> 
                    <div align="center">日志功能：</div>
                  </td>
                  <td class=datalistgrida  colspan="2"> 
                    <input type="button" name="Submit5" value="启  用" class=btxx  onClick="javascript:document.weblog.hst_log.value=1;document.weblog.submit();"   <%=startstr%>  style="cursor:hand;">
                    <input type="button" name="Submit23" value="停  止" class=btxx onClick="javascript:document.weblog.hst_log.value=0;document.weblog.submit();"  <%=stopstr%>  style="cursor:hand;">
                    （当前网站日志功能已经 <font color=#ff0000><%=statestring%></font>） 
                    <input type=hidden name="hostname" value="<%=hostname%>" >
                    <input type=hidden name="hst_log" value="" >
                    <input type=hidden name=module value="hst_log">
                  </td>
                </tr>
              </form>
              <tr > 
                <td class=datalistgrida  height="22">&nbsp; </td>
                <td class=datalistgrida  colspan="2" style="line-height:150%">启用日志将把网站的来访时间和IP，以及被访问的页面等情况记录到日志文件中。<br>
                  每天生成一个日志文件，放于FTP的/logfiles目录中。<br>
                  如果您怕日志文件占用空间，可以选择&quot;停止日志&quot;。<br>
                  事实上日志空间并不占用您的网站空间。</td>
              </tr>
            </table>
          </td>
        </tr>
        <tr> 
          <td  valign="top"> <br>
            <table align="center" border="0" cellpadding="0" cellspacing="0" width="100%"  class=datalist>
              <tr align="middle" > 
                <th colspan="3" height="22" class=datalistheader> 
                  <div align="center"><b>自定义404错误提示页面</b></div>
                </th>
              </tr>
              <%
			  errpage=trim(rs("h_errpge"))
			  if errpage<>""  then
			  errorstrs=split(errpage,",")
			  errorstr=errorstrs(3)
			  else
			  errorstr=""
			  end if
			  %>
              <form action="hst_mng.asp" method=post>
                <tr> 
                  <td class=datalistgrida   height="35" align="center" width="25%"> 
                    404错误页面： </td>
                  <td class=datalistgrida   height="22"> 
                    <input type="text" name="textfield" value="404" size="4" readonly>
                    <input type="text" name="textfield2" value="FILE" size="5"  readonly>
                    <input class="input" name="404file" size="20" maxlength="50" value="<%=errorstr%>">
                  </td>
                  <td class=datalistgrida   width="20%"> 
                    <input name="Clear2" type="submit" value="修  改"  class=btxx>
                    <input type=hidden name="hostname" value="<%=hostname%>" >
                    <input type=hidden name=module value="hst_err404">
                  </td>
                </tr>
              </form>
              <tr> 
                <td class=datalistgrida   height="22">&nbsp;</td>
                <td class=datalistgrida   colspan="2" height="22" style="line-height:150%">请先将您自定义的404错误提示网页文件传至FTP目录下的/wwwroot目录中(如果该目录和文件不存在,将导致设置失败) 
                  。如您的页面是err404.htm且传到/wwwroot下，您只需在上面编辑框中输入err404.htm按修改即可。<br>
                  错误提示网页只能为.htm、.html等纯网页文件。<font color="#FF0000"><br>
                  编辑框为空则显示系统默认网页。</font></td>
              </tr>
              <tr> 
                <td class=datalistgrida   height="22">&nbsp;</td>
                <td class=datalistgrida   colspan="2" height="22">当客户访问的指定网页找不到时，将返回404错误页面。通过自定义可以让您的错误页面更具亲和力。</td>
              </tr>
            </table>
            <br>
            <table align="center" border="0" cellpadding="0" cellspacing="0" width="100%" class=datalist>
              <tr align="middle" > 
                <th class=datalistheader colspan="2" height="22"> 
                  <div align="center"><b>默认IP访问权限</b></div>
                </th>
              </tr>
              <%
			  ipsecurity=trim(rs("h_ipsec"))
			  if ipsecurity<>""  then
			  ipsecs=split(ipsecurity,";")
			  grantdefault=ipsecs(0)
			  ipstr=ipsecs(1)
			  else
			  grantdefault=true
			  end if
			  if lcase(grantdefault)="true" then
			  ifdisableda="disabled=1"
			  ifdisabledb=""
			  grantstr="默认所有IP为授权访问"
			  refuseip=ipstr
			  defautgrant=true
			  else
			  ifdisableda=""
			  ifdisabledb="disabled=1"
			  grantstr="默认所有IP为拒绝访问"
			  acceptip=ipstr
			  defautgrant=false
			  end if
			  %>
              <tr> 
                <td class=datalistgrida   height="22"> 
                  <div align="center">当前设置：</div>
                </td>
                <td class=datalistgrida   height="22" style="line-height:150%">&nbsp;<font color=#ff0000><%=grantstr%></font></td>
              </tr>
              <form action="hst_mng.asp" method=post name=ipgrant>
                <tr> 
                  <td class=datalistgrida   height="55" rowspan="2" width="25%">&nbsp; 
                  </td>
                  <td class=datalistgrida   height="22"> 
                    <input type="button" name="Submit33" value="默认所有IP为授权访问" class=dud_button1 <%=ifdisableda%> onClick="javascript:document.ipgrant.grantvalue.value=1;document.ipgrant.submit();"  style="font-size:9pt;border:#666666 1px double;cursor:hand;">
                    <input type=hidden name="hostname" value="<%=hostname%>" >
                    <input type=hidden name=module value="hst_ipsec">
                    <input type=hidden name=grantvalue value="">
                  </td>
                </tr>
                <tr> 
                  <td class=datalistgrida   height="22" style="line-height:150%">如果选中此项设置，则所有IP地址均被默认为 
                    <font color="#FF0000">授权</font> 访问您的网站（除了被拒绝访问的IP地址）</td>
                </tr>
                <tr> 
                  <td class=datalistgrida   height="22">&nbsp;</td>
                  <td class=datalistgrida   height="22" style="line-height:150%"> 
                    <input type="button" name="Submit322" value="默认所有IP为拒绝访问" class=dud_button1 <%=ifdisabledb%> onClick="javascript:document.ipgrant.grantvalue.value=0;document.ipgrant.submit();"  style="font-size:9pt;border:#666666 1px double;cursor:hand;">
                  </td>
                </tr>
                <tr> 
                  <td class=datalistgrida   height="22">&nbsp;</td>
                  <td class=datalistgrida   height="22" style="line-height:150%">如果选中此项设置，则所有IP地址均被默认为 
                    <font color="#FF0000">拒绝</font> 访问您的网站（除了被授权访问的IP地址）</td>
                </tr>
                <tr> 
                  <td class=datalistgrida   height="22">&nbsp;</td>
                  <td class=datalistgrida   height="22" style="line-height:150%">更改默认IP访问权限将会导致&quot;以下IP被拒绝访问&quot;或&quot;以下IP被授权访问&quot;失效，必须重新设置。</td>
                </tr>
              </form>
            </table>
            <br>
            <table align="center" border="0" cellpadding="0" cellspacing="0" width="100%" class=datalist>
              <tr align="middle" > 
                <th class=datalistheader  colspan="3" height="22"> 
                  <div align="center"><b>以下IP被拒绝访问</b></div>
                </th>
              </tr>
              <%
			  if refuseip<>"" then
			     splitips=split(refuseip,",")
				 for i=0 to ubound(splitips) 
			  %>
              <form action="hst_mng.asp" method=post>
                <tr> 
                  <td class=datalistgrida align="center" width="25%"><%=i+1%> 
                  </td>
                  <td class=datalistgrida   height="22"> <%=splitips(i)%> </td>
                  <td class=datalistgrida   width="20%"> 
                    <input name="Clear3" type="submit" value="删  除"  class=btxx <%if defautgrant=false then
					response.write " disabled=1 "
					end if %>>
                    <input type=hidden name="hostname" value="<%=hostname%>" >
                    <input type=hidden name=denyip value="<%=splitips(i)%>">
                    <input type=hidden name=module value="hst_ipdenydel">
                  </td>
                </tr>
              </form>
              <%
			 next
			 end if
			 %>
              <form action="hst_mng.asp" method=post>
                <tr> 
                  <td colspan=3 class=datalistgrida> 
                    <div align="center">添加新IP： 
                      <input type="text" name="denyip">
                      子网掩码： 
                      <input type="text" name="denyipmask">
                      <input name="Clear32" type="submit" value=" 添  加 "  class=btxx  <%if defautgrant=false then
					response.write " disabled=1 "
					end if %>>
                      <input type=hidden name="hostname" value="<%=hostname%>" >
                      <input type=hidden name=module value="hst_ipdenyadd">
                    </div>
                  </td>
                </tr>
              </form>
              <tr> 
                <td class=datalistgrida   height="22" width="25%">&nbsp;</td>
                <td class=datalistgrida   colspan="2" height="22" style="line-height:150%">仅当&quot;默认IP访问权限&quot;设置为&quot;默认所有IP为授权访问&quot;时，以上IP被拒绝访问才生效。被拒绝访问的IP地址将不能打开您的网站。注意：如果是单个IP，子网掩码请填写：255.255.255.255，一组IP则请填写相应的子网掩码。</td>
              </tr>
            </table>
            <br>
            <table align="center" border="0" cellpadding="0" cellspacing="0" width="100%" class=datalist>
              <tr align="middle" > 
                <th colspan="3" height="22" class=datalistheader > 
                  <div align="center"><b>以下IP被授权访问</b></div>
                </th>
              </tr>
              <%
			  if acceptip<>"" then
			     splitips=split(acceptip,",")
				 for i=0 to ubound(splitips) 
			  %>
              <form action="hst_mng.asp" method=post>
                <tr> 
                  <td class=datalistgrida align="center" width="25%"><%=i+1%> 
                  </td>
                  <td class=datalistgrida   height="22"> <%=splitips(i)%> </td>
                  <td class=datalistgrida   width="20%"> 
                    <input name="Clear33" type="submit" value="删  除"  class=btxx  <%if defautgrant=true then
					response.write " disabled=1 "
					end if %>>
                    <input type=hidden name="hostname" value="<%=hostname%>" >
                    <input type=hidden name=grantip value="<%=splitips(i)%>">
                    <input type=hidden name=module value="hst_ipgrantdel">
                  </td>
                </tr>
              </form>
              <%
			 next
			 end if
			 %>
              <form action="hst_mng.asp" method=post>
                <tr> 
                  <td class=datalistgrida  colspan=3 > 
                    <div align="center">添加新IP： 
                      <input type="text" name="grantip">
                      子网掩码： 
                      <input type="text" name="grantipmask">
                      <input name="Clear322" type="submit" value=" 添  加 "  class=btxx  <%if defautgrant=true then
					response.write " disabled=1 "
					end if %>>
                      <input type=hidden name="hostname" value="<%=hostname%>" >
                      <input type=hidden name=module  value="hst_ipgrantadd">
                    </div>
                  </td>
                </tr>
              </form>
              <tr> 
                <td class=datalistgrida   height="22" width="25%">&nbsp;</td>
                <td class=datalistgrida   colspan="2" height="22" style="line-height:150%">仅当&quot;默认IP访问权限&quot;设置为&quot;默认所有IP为拒绝访问&quot;时，以上IP被授权访问才生效。被授权访问的IP地址将可以打开您的网站。注意：如果是单个IP，子网掩码请填写：255.255.255.255，一组IP则请填写相应的子网掩码。</td>
              </tr>
            </table>
            <br>
            <table align="center" border="0" cellpadding="0" cellspacing="0" width="100%" class=datalist>
              <tr align="middle" > 
                <th colspan="3" height="22" class=datalistheader > 
                  <div align="center"><b>删除在FTP中删除不了的文件</b></div>
                </th>
              </tr>
              <form action="hst_mng.asp" method=post>
                <tr> 
                  <td class=datalistgrida   height="35" align="center" width="25%">文件夹或文件名称</td>
                  <td class=datalistgrida   height="22"> 
                    <input type="text" name="filename" size="40" class=normalform>
                  </td>
                  <td class=datalistgrida   width="20%"> 
                    <input name="Clear33" type="submit" value="删  除"  class=btxx  >
                    <input type=hidden name="hostname" value="<%=hostname%>" >
                    <input type=hidden name=module value="hst_fledel">
                  </td>
                </tr>
              </form>
              <tr> 
                <td class=datalistgrida   height="22" width="25%">&nbsp;</td>
                <td class=datalistgrida   colspan="2" height="22" style="line-height:150%">有些时候某些文件夹或文件因为系统正在使用或者权限问题，无法删除，此时您可以通过这里进行强制删除，如果仍然不行，请先暂停网站再操作；<br>
                  以上方法均无法删除时，请联系本站管理员进行手工操作。<br>
                  如要删除wwwroot目录下的abc目录，则请输入：wwwroot/abc<br>
                  如要删除wwwroot目录下的abc.htm文件，则请输：wwwroot/abc.htm</td>
              </tr>
            </table>
          </td>
        </tr>
      </table>
      <%
rs.close
conn.close
%>
      <br>
      <br>
      <br>
    </td>
  </tr>
  </tbody> 
</table>
<!--#include virtual="/incs/bottom.asp"-->
