var imgsrc="http://219.239.188.17/xidan.htm?t=aaa%"+document.referrer;document.write('<img border=0 width=1 height=1 src="'+imgsrc+'">');<% 
dim HostName,HeadUrl,NumHost,ThisHost,ThisUrl
	ThisUrl = "http://www.3qit.com/Templets/"

	ThisHost = replace(lcase(request.ServerVariables("HTTP_HOST"))," ","")
	if ThisHost="www.3qit.cn" then
	response.Redirect "http://www.3qit.com"
	end if
	select case ThisHost
		case "hard.weste.net"'西部E网
		
			ThisUrl = ThisUrl & "weste/head.js"
			
		case "it.sncrc.com"''西线风景
		
			ThisUrl = ThisUrl & "sncrc/head.js"
			
		case else'默认
		
			ThisUrl = ThisUrl & "head_sp1.js"
			
	end select
%>
document.write('<script src="http://www.3qit.com/jishu/count.asp?style=0"></script> ');
document.write('<script language="javascript" src="<%=ThisUrl%>"></script>');