<%
from=lcase(Request.ServerVariables("HTTP_HOST")) 
if left(from,4)="www." then
	Response.redirect("index.asp")'此处为网站首页地址
else
	response.Write( "<frameset><frame src=""blog.asp?domain="&from&"""></frameset>")
end if
%> 