<%@ Language=VBScript %>
<!--#include virtual="/inc-freehost-function/FreeHostFunctionMain.asp"-->
<%
If session("HOSTAUID")="" Then
	ef=True
	ec="授权非法，有可能是超时造成的。"
ElseIf Request.QueryString ("id")="" Then
	ef=True
	ec="请输入产品ID！"
ElseIf not IsNumeric(Request.QueryString ("id"))  Then
	ef=True
	ec="ID应该是数字！"
end if

if not ef then
Set conn=Server.CreateObject("ADODB.Connection")
	conn.Open Application("FreeHostDBlink")
	Set dsph = Server.CreateObject("ADODB.Recordset")	
Sql="Select * from FreeHost.FreeHost_Product_Host where id='"&Request.QueryString("id")&"'"
			if Instr(1,sql, ";", 1)>0 or Instr(1,sql, "--", 1)>0 then
Response.Write "非法字符！"
Response.End
end if
	dsph.Open Sql,conn,1,1
if dsph.Eof then
	ef=True
	ec="不存在的虚拟主机ID！"
end if
end if


if not ef then
if dsph("allowsubbyid")<> session("HOSTAUID") then
	ef=True
	ec="这个虚拟主机不是您名下的！"
end if
end if

if not ef then
%>
<!--#include virtual="/inc-freehost-function/template-hostadm-top.asp"-->
　虚拟主机自助管理


<br>
<form action="suberr2.asp" method="post" name="form1">
<TABLE width="100%" border=1 align=center cellPadding=0 cellSpacing=0 borderColorLight=#cccccc borderColorDark=#fbfbfb>
  <TBODY>
    <TR align="center">
      <TD height="35" vAlign=middle bgColor=#494949>&nbsp; <font color="#FFFFFF">
        <input name="id" type="hidden" value="<%=Request("id")%>">
        自定义404出错页：</font></TD>
      </TR>
    <TR>
      <TD height="35" align="center" vAlign=middle bgColor=#FFFFFF><input name="err404" type="radio" value="y" checked>
使用系统默认的404(找不到文件时)出错页。</TD>
      </TR>
    <TR>
      <TD height="35" align="center" vAlign=middle bgColor=#FFFFFF><input name="err404" type="radio" value="asp">
    使用web目录中的404.asp文件来自定义内容。</TD>
    </TR>
    <TR>
      <TD height="35" align="center" vAlign=middle bgColor=#FFFFFF><input name="err404" type="radio" value="php">
    使用web目录中的404.php文件来自定义内容。</TD>
    </TR>
    <TR>
      <TD height="35" align="center" vAlign=middle bgColor=#FFFFFF><input name="err404" type="radio" value="htm">
使用web目录中的404.htm文件来自定义内容。</TD>
    </TR>
    <TR>
      <TD height="35" align="center" vAlign=middle bgColor=#FFFFFF>          <input name="Submit" type="submit" id="Submit" value="马上修改404页"></TD></TR>
  </TBODY>
</TABLE>

<br>
<TABLE width="100%" border=1 align=center cellPadding=0 cellSpacing=0 borderColorLight=#cccccc borderColorDark=#fbfbfb>
  <TBODY>
    <TR align="center">
      <TD height="35" vAlign=middle bgColor=#494949>&nbsp; <font color="#FFFFFF">自定义500出错页：</font></TD>
      </TR>
    <TR>
      <TD height="35" align="center" vAlign=middle bgColor=#FFFFFF><input name="err500" type="radio" value="y" checked>
使用系统默认的500(内部服务器错误)出错页。</TD>
      </TR>
    <TR>
      <TD height="35" align="center" vAlign=middle bgColor=#FFFFFF><input name="err500" type="radio" value="asp">
    使用web目录中的500.asp文件来自定义内容。</TD>
    </TR>
    <TR>
      <TD height="35" align="center" vAlign=middle bgColor=#FFFFFF><input name="err500" type="radio" value="php">
    使用web目录中的500.php文件来自定义内容。</TD>
    </TR>
    <TR>
      <TD height="35" align="center" vAlign=middle bgColor=#FFFFFF><input name="err500" type="radio" value="htm">
使用web目录中的500.htm文件来自定义内容。</TD>
    </TR>
    <TR>
      <TD height="35" align="center" vAlign=middle bgColor=#FFFFFF>          <input name="Submit" type="submit" id="Submit" value="马上修改500页"></TD></TR>
  </TBODY>
</TABLE>

<br>
<TABLE width="100%" border=1 align=center cellPadding=0 cellSpacing=0 borderColorLight=#cccccc borderColorDark=#fbfbfb>
  <TBODY>
    <TR align="center">
      <TD height="35" vAlign=middle bgColor=#494949>&nbsp; <font color="#FFFFFF">自定义400出错页：</font></TD>
      </TR>
    <TR>
      <TD height="35" align="center" vAlign=middle bgColor=#FFFFFF><input name="err400" type="radio" value="y" checked>
使用系统默认的400(错误的HTTP请求)出错页。</TD>
      </TR>
    <TR>
      <TD height="35" align="center" vAlign=middle bgColor=#FFFFFF><input name="err400" type="radio" value="asp">
    使用web目录中的400.asp文件来自定义内容。</TD>
    </TR>
    <TR>
      <TD height="35" align="center" vAlign=middle bgColor=#FFFFFF><input name="err400" type="radio" value="php">
    使用web目录中的400.php文件来自定义内容。</TD>
    </TR>
    <TR>
      <TD height="35" align="center" vAlign=middle bgColor=#FFFFFF><input name="err400" type="radio" value="htp">
使用web目录中的400.htm文件来自定义内容。</TD>
    </TR>
    <TR>
      <TD height="35" align="center" vAlign=middle bgColor=#FFFFFF>          <input name="Submit" type="submit" id="Submit" value="马上修改400页"></TD></TR>
  </TBODY>
</TABLE>

<br>
<br>
</form>　<a href="selfhostmodifysub.asp?id=<%=Request("id")%>"><font color="#000000">[返回上一页]</font></a>
<!--#include virtual="/inc-freehost-function/template-hostadm-end.asp"-->
<%end if
if ef then
Response.Redirect "e.asp?e="&ec
end if%>