AnasayfaTakvimSSSAramaÜye ListesiKullanıcı GruplarıKayıt OlGiriş yap

Paylaş | 
 

 Asp'de ziyaretçinin ip adresini alma

Aşağa gitmek 
YazarMesaj
TERLAN
Kurucu
Kurucu
avatar


İsim İsim : Mehdin
Cinsiyet Cinsiyet : Erkek
Mesaj Sayısı Mesaj Sayısı : 3884
Başarı Puanı Başarı Puanı : 8820
+ Rep Puanı + Rep Puanı : 9
Doğum tarihi Doğum tarihi : 01/08/96
Kayıt tarihi Kayıt tarihi : 03/07/13
Yaş Yaş : 22
Nerden Nerden : >Diyarbakır<
Hobiler Hobiler : Kitap okumak :)
Lakap Lakap : Tertions <3

MesajKonu: Asp'de ziyaretçinin ip adresini alma   C.tesi Ağus. 31, 2013 4:28 am

ASP’de ziyaretçinin IP adresini Server Variable nesnesi altında alabiliyoruz. Server Variablekomutlarının tüm listesini bir önceki makalemizde vermiştik. Şimdi bunlardan ip adresini alan fonksiyonu göreceğiz. Bunun için kullanılan değer “Remote_Addr” kodudur: Request. ServerVariables(“REMOTE_ADDR”) Aşağıdaki okunma sayısı uygulamasında önce ip adresini aldık. Daha sonra buna göre okunma sayısı bir arttırılıyor. Eğer veritabanındaki yazıyı son okuyan ziyaretçinin ip adresi ile bu sayfayı çağıranın adresi aynı ise işlem yapılmıyor. Şayet veritabanının okunmasayisi tablosunda bu yazı yoksa yani yazı hiç okunmamışsa yeni bir ekleme yapılıyor.
xid=request.querystring(“id”)
xtarih=Now()
control=0
osayisi=1
xip=Request.ServerVariables(“REMOTE_ADDR”)
adoopen_connection mycon1
SQL=”select * from OKUNMASAYISI where o_ilanid =” & xId
adoopen_fwdonly myset1,sql,mycon1
if not myset1of then
osayisi=myset1.fields(“o_sayi”)
if xip=myset1.fields(“o_ip”) then
control=1
end if
end if
adoclose_rset myset1
osayisi=osayisi+1
if control=0 then
sql=”select * from OKUNMASAYISI where o_ilanid =” & xId
adoopen_keyset myset1,sql,mycon1
if not myset1of then
myset1.fields(“o_sayi”).value= osayisi
myset1.fields(“o_tarih”).value= xtarih
myset1.fields(“o_ip”).value= xip
myset1.update
else
myset1.addnew
myset1.fields(“o_ilanid”).value=xId
myset1.fields(“o_sayi”).value= osayisi
myset1.fields(“o_tarih”).value= xtarih
myset1.fields(“o_ip”).value= xip
myset1.update
end if
adoclose_rset myset1
Response.Write(” İşlem Tamamlandı…”)
end if
adoclose_connection mycon1

 

KaranLık,
bir ışıkLa dehşet verir asLında,
Çünkü yaLnız kaLamazsın;
göLgen vardır yanında!!!
Sayfa başına dön Aşağa gitmek
Kullanıcı profilini gör http://notnullteam.yetkin-forum.com
 
Asp'de ziyaretçinin ip adresini alma
Sayfa başına dön 
1 sayfadaki 1 sayfası
 Similar topics
-
» Z İ Y A P A Ş A

Bu forumun müsaadesi var:Bu forumdaki mesajlara cevap veremezsiniz
Kanserojen NGHT :: Webmaster Dünyası :: Programlama Dilleri :: ASP Dersleri-
Buraya geçin: