ASP implementa código que proíbe as aranhas do mecanismo de pesquisa de acessar

Este artigo apresenta principalmente o código que implementa o ASP para proibir as aranhas do mecanismo de pesquisa de acessar.

Esse código pode controlar os mecanismos de pesquisa comuns para não poder acessar a página ASP e é necessário incluir esse código em cada página do ASP.

1. <%
2. functionisspider ()
3. Dimi Agent Searray
4. Agente = agente: & lcase (request.servervariables (http_user_agent))
5. Searray = Array (Googlebot, Baiduspider, Sogouspider, Yahoo, SosoSpider)
6. isSpider = false
7. fori = 0toubund (Searray)
8. if (instrum (agente, Searray (i))> 0) thenisspider = true
9. próximo
10. Função final
12. functionFromse ()
13. dimurlrefer, Searay, i
14. urlRefer = consulte: & lcase (request.servervariables (http_referer))
15. dese = false
16. ifurlRefer = entãoFromse = false
17. Searray = Array (Google, Baidu, Sogou, Yahoo, Soso)
18. fori = 0toubund (Searray)
19. if (Instr (urlRefer, Searray (i))> 0) então fromse = true
20. próximo
21. Função final
23. if (isspider ()) então
24. Dimmyfso, Fileurl, FileCon, MyFile
25. fileurl = server.mappath (imagens/bg01.gif)
26. SetMyfso = server.createObject (script.filesystemobject)
27. ifmyfso.fileExists (fileurl) Então
28. SetMyfile = myfso.opentExtfile (fileurl, 1)
29. filecon = myfile.readall
30. Response.Write (FileCon)
31. myfile.close
32. SetMyfile = nada
33. Setmyfso = nada
34. resposta.END
35. endif
36. endif
37. if (deSe ()) então
38. Response.write (<br/>)
39. resposta.END
40. outro
41. endif
42. %>

O exposto acima é o conteúdo inteiro deste artigo, espero que gostem.