Asp İle Google Bot Yakalama

09-04-2009, 14:26:59

Merhaba arkadaşlar google botun sitenize ne zaman geldiğini mail yoluyla anlamak için aşağıdaki kodu sayfalarınıza dahil edin, daha önce sitede açılmış ama kimse net birşey söylememişti. (google la birlikte başka botlarıda anlık rapor eder)

spidercik=Request.ServerVariables("HTTP_USER_AGENT ")
If InStr(spidercik, "bot") Then
Set objJmail = Server.Createobject("JMail.Message")
objJmail.ContentType = "text/html"
objJmail.Charset = "ISO-8859-9"
objJmail.From = "spider@spider.com" ' bunun önemi yok maili biz log için kullandığımız için
objJmail.MailServerUserName = "test@domaininiz.com" ' Serverda kullandığınız mail adresi
objJmail.MailServerPassWord = "" ' o adresin şifresi
objJmail.Subject = "Spider geldi !"
objJmail.AddRecipient "" ' uyarının gitmesini istediğiniz mail adresi
objJmail.Body = spidercik
objJmail.Send("mail.domaininiz.com") '

Set objJmail = Nothing

End if

09-04-2009, 16:50:50

#2

tosih

öncelikle paylaşımın için teşekkürler.
fakat bot geldiğinde maille bilgilenmemizin bize ne gibi bir faydası olucak?

09-04-2009, 17:08:08

#3

akbalci

tosih adlı üyeden alıntı: mesajı görüntüle

öncelikle paylaşımın için teşekkürler.
fakat bot geldiğinde maille bilgilenmemizin bize ne gibi bir faydası olucak?

faydası kişiden kişiye değişir, bazı paranoyak arkadaşlar daha doğrusu yeni site açıp gün boyu google bot geldi gitti diye kafayı yiyerek takip eden arkadaşlar var onların işine yarar

yada db'ye kayıt ettirirsiniz oda size kalmış

09-04-2009, 17:21:38

#4

Peksoft

spidercik=Request.ServerVariables("HTTP_USER_AGENT ")
If InStr(spidercik, "bot") Then
Response.write "Bot geldi haaanııımm."
End if

şeklinde sitenin bi köşesine yazdırılabilir veya her gelmesinde geldiği tarih'i ve saat'i veritabanına kaydedebiliriz.
Faydasıda sadece sitemizde bi' botun olduğunu bilmemiz.

Hangi botların geldiğini bilmek içinde botların tam adını yazmamız lazım, örneğin; googlebot, msnbot, yahoo crawler vs..

if instr(spidercik, "googlebot") then
response.write "Google amca geldi."
elseif instr(spidercik, "msnbot") then
response.write "çık *** sitemden lanet olası pislik"
elseif instr(spidercik, "yahoo") then
response.write "vayyy kimler gelmiş, hangi rüzgar attı."
elseif ...
...
end if

gibi.

13-04-2009, 07:52:31

#5