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


if not ef Then

Response.ContentType="text/html" 

If Request.QueryString ("id")="1" Then
filename="index.htm" 
Response.AddHeader "content-Disposition","attachment;filename="&filename 
htmlwrite("html1")
End If

If Request.QueryString ("id")="12" Then
filename="host.htm" 
Response.AddHeader "content-Disposition","attachment;filename="&filename 

Server.Execute "/style/info/host.asp"

End If

%>

<%end if
if ef then
Response.Redirect "e.asp?e="&ec
end if%>