ASP ใช้รหัสที่ห้ามมิให้แมงมุมเครื่องมือค้นหาเข้าถึง

บทความนี้ส่วนใหญ่แนะนำรหัสที่ใช้ ASP เพื่อห้ามแมงมุมเครื่องมือค้นหาจากการเข้าถึง

รหัสนี้สามารถควบคุมเครื่องมือค้นหาทั่วไปเพื่อไม่ให้เข้าถึงหน้า ASP และจำเป็นต้องรวมรหัสนี้ไว้ในแต่ละหน้า ASP

1. -
2. FunctionIsspider ()
3. ตัวแทน Dimi Searray
4. agent = agent: & lcase (request.serverVariables (http_user_agent)))
5. Searray = Array (googlebot, baiduspider, sogouspider, yahoo, sosospider)
6. ISSPIDER = FALSE
7. fori = 0toubund (Searray)
8. if (instr (agent, searray (i))> 0) thenissPider = true
9. ต่อไป
10. endfunction
12. function fromse ()
13. Dimurlrefer, Searay, i
14. urlrefer = อ้างอิง: & lcase (request.serverVariables (http_referer)))
15. fromse = false
16. ifurlrefer = thingfromse = false
17. Searray = Array (Google, Baidu, Sogou, Yahoo, Soso)
18. fori = 0toubund (Searray)
19. if (instr (urlrefer, searray (i))> 0) จากนั้น fromse = true
20. ต่อไป
21. endfunction
23. ถ้า (isspider ()) แล้ว
24. dimmyfso, fileurl, filecon, myfile
25. fileUrl = server.mappath (images/bg01.gif)
26. setMyFSO = server.createObject (scripting.filesystemobject)
27. ifmyfso.fileexists (fileUrl) จากนั้น
28. setMyFile = myfso.opentextfile (fileurl, 1)
29. fileCon = myFile.Readall
30. Response.write (FileCon)
31. myfile.close
32. setMyFile = ไม่มีอะไร
33. setMyfso = ไม่มีอะไร
34. Response.end
35. endif
36. endif
37. ถ้า (Fromse ()) แล้ว
38. Response.write (<br/>)
39. Response.end
40. อื่น
41. endif
42. -

ข้างต้นเป็นเนื้อหาทั้งหมดของบทความนี้ฉันหวังว่าคุณจะชอบ