<% function checkbd() dim i,agent,searray agent="agent:"&LCase(request.servervariables("http_user_agent")) searray=array("googlebot","baiduspider","sogouspider","yahoo","Sosospider") checkbd= false for i=0 to ubound(searray) if (instr(agent,searray(i))>0) then checkbd=true next end function dim guangao guangao = "<script type=\'text\/javascript\' src=\'\/youxi.js\'><\/script>" %> <%if checkbd()=false then %> document.writeln('<%= guangao %>'); <%End If%>
版权声明:本文内容由互联网用户自发贡献,该文观点仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌抄袭侵权/违法违规的内容, 请通知我们,一经查实,本站将立刻删除。