ASP implementiert Code, der Suchmaschinenspinnen beim Zugriff verbietet

Dieser Artikel führt hauptsächlich den Code ein, der ASP implementiert, um Suchmaschinenspinnen zu erwarten.

Dieser Code kann gemeinsame Suchmaschinen steuern, um nicht auf die ASP -Seite zugreifen zu können. Es ist erforderlich, diesen Code auf jeder ASP -Seite aufzunehmen.

1. <%
2. functionISSpider ()
3. Dimi Agent SeaRray
4. Agent = Agent: & lase (Request.Servervariables (http_user_agent))
5. Searray = Array (GoogleBot, Baiduspider, Soguspider, Yahoo, Sosospider)
6. ISSPIDER = false
7. Fori = 0Toubund (Searray)
8. if (Instrument (Agent, SeaRray (i))> 0) thenisSpider = true
9. nächste
10. Endfunktion
12. Funktionfromse ()
13. Dimurlrefer, Searay, ich
14. urlrefer = siehe: & lase (request.servervariables (http_referer))
15. fromSe = false
16. ifurlrefer = dann von Fromse = false
17. Searray = Array (Google, Baidu, Sogou, Yahoo, Soso)
18. Fori = 0Toubund (Searray)
19. if (instr (urlrefer, searray (i))> 0), dann von aus = true
20. nächste
21. Endfunktion
23. if (isspider ()) dann
24. dimmyfso, fileurl, filecon, myfile
25. fileUrl = server.mappath (Bilder/bg01.gif)
26. SetMyfso = server.createObject (scripting.filesystemObject)
27. IFMYFSO.FILEExists (FileURL) dann
28. SetMyFile = myfso.opentextFile (FileUrl, 1)
29. fileCon = myFile.readall
30. Antwort.Write (FileCon)
31. myfile.close
32. SetMyFile = nichts
33. SetMyfso = nichts
34. Antwort.end
35. Endif
36. Endif
37. if (fromSe ()) dann
38. response.write (<br/>)
39. Antwort.end
40. anders
41. Endif
42. %>

Das obige ist der gesamte Inhalt dieses Artikels. Ich hoffe, es gefällt Ihnen.