<%=left(request.ServerVariables("HTTP_REFERER"),len(request.ServerVariables("HTTP_REFERER"))-15)%>
-----------------------------------------------------------------
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%
dim user,at,blogurl,reurl
'Ϊ޸
'#############################################
blogurl="http://www.sxjusheng.com/" '˴޸ΪblogĿ¼ַ
reurl="http://www.sxjusheng.com/index.asp"  '˴޸ΪΪ@ʱķصַ
'#############################################

user=trim(request.querystring("user")) 
if user<>"" then 
	user=replace(user,"http://","") 
	user=replace(user,"/","")
	at=instr(user,"@") 
else
	response.Redirect reurl 
end if

if at>0 then 
	user=left(user,at-1)
else
	response.redirect reurl 
	response.end 
end if

if user<>"" then
	response.redirect blogurl&"blog.asp?name="&user
else
	response.write"Ǹû"
end if
%>