showhost.asp

一个非常优秀的自动建站程序

<%
HostID = Request("HostID")
if (HostID="") then Response.Redirect ("error.asp?id=001")
%>
<!--#include file="top.asp"-->
<%
sql="select * from [Host_List] where HostID="&HostID
set rs=conn.Execute(Sql)
if rs.bof and rs.eof then Response.Redirect("error.asp?id=001")
HostName=rs("HostName")
HostSize=rs("HostSize")
MailSize=rs("MailSize")
MailNum=rs("MailNum")
Other1=rs("Other1")
Other2=rs("Other2")
Webip=rs("Webip")
WebRootPath=rs("WebRootPath")
WebMaxConnections=rs("WebMaxConnections")
WebMaxBandwidth=rs("WebMaxBandwidth")
WebAccessScript=clng(rs("WebAccessScript"))
rs.close
conn.close
set rs=nothing
set conn=nothing
%>

<table width="100%" align="center" bgcolor="#cccccc" border="0" cellpadding="2" cellspacing="1" style="font-size: 9pt; line-height: 200%">
<tr>
<td align=center bgcolor="#FFFFFF">

<br>
<table align=center width=500 cellpadding="2" cellspacing="1" bgcolor=#cccccc>
<tr>
<td bgcolor=ffffff align=center height=24 colspan="3">
主机信息
</td>
</tr>
<tr>
<td bgcolor=FFFFFF width=24%>
&nbsp; 产品名称:
</td>
<td bgcolor=FFFFFF width=40%>
<input name="HostName" style="width:210px" value="<%=HostName%>" readonly="yes">
</td>
<td bgcolor=FFFFFF width=36%>
产品名称
</td>
</tr>
<tr>
<td bgcolor=FFFFFF>
&nbsp; 空间大小:
</td>
<td bgcolor=FFFFFF>
<input name="HostSize" style="width:210px" value="<%=HostSize%>" readonly="yes">
</td>
<td bgcolor=FFFFFF>
单位MB 
</td>
</tr>
<tr>
<td bgcolor=FFFFFF>
&nbsp; 邮箱大小:
</td>
<td bgcolor=FFFFFF>
<input name="MailSize" style="width:210px" value="<%=MailSize%>" readonly="yes">
</td>
<td bgcolor=FFFFFF>
单位MB 
</td>
</tr>
<tr>
<td bgcolor=FFFFFF>
&nbsp; 邮箱数量:
</td>
<td bgcolor=FFFFFF>
<input name="MailNum" style="width:210px" value="<%=MailNum%>" readonly="yes">
</td>
<td bgcolor=FFFFFF>
单位MB 
</td>
</tr>
<tr>
<td bgcolor=FFFFFF>
&nbsp; 简要说明:
</td>
<td bgcolor=FFFFFF>
<input name="Other1" style="width:210px" value="<%=Other1%>" readonly="yes">
</td>
<td bgcolor=FFFFFF>
主机功能简要说明
</td>
</tr>
<tr>
<td bgcolor=FFFFFF>
&nbsp; 详细说明:
</td>
<td bgcolor=FFFFFF colspan="2">
<textarea name="Other2" style="width:360px;height=70px" readonly="yes"><%=Other2%></textarea>
</td>
</tr>
<tr>
<td bgcolor=FFFFFF>
&nbsp; IIS连接:
</td>
<td bgcolor=FFFFFF>
<input name="WebMaxConnections" style="width:210px" value="<%=WebMaxConnections%>" readonly="yes">
</td>
<td bgcolor=FFFFFF>
IIS最大连接数
</td>
</tr>
</table>
<br>

</td>
</tr>
</table>

</TD></TR></TABLE>
<!--#include file="foot.asp"-->