folder Tahribat.com Forumları
linefolder Asp - Php - Cgi - Perl
linefolder Asp Konusunda Takıldığım Yerler.//Veritabanına Yazdırma\\



Asp Konusunda Takıldığım Yerler.//Veritabanına Yazdırma\\

  1. KısayolKısayol reportŞikayet pmÖzel Mesaj
    by_medcezir
    by_medcezir's avatar
    Kayıt Tarihi: 22/Ağustos/2005
    Erkek
    Kişisel site açmak üzereyim.
    Aslında Html ile yapıyordum başlarda sonradan asp ile yapmaya çalışayım ki birazda öğrenirim diye düşündüm.
    Sitenin geneli Html aralarda ufak kodlarla asp koydum.Mesela kişinin Ip sini göstermeyi Asp ile yaptım.
    Fakat bu ip yi database ile kayıt altına almak istiyorum.
    Şöyleki.
    Kişinin Ipsini alalım.
    <% IP = Request.Variables"REMOTE_ADDR" %>
    Sonra sitenin herhangi bir yerinde gösterelim.
    Ip adresiniz: <%=IP%>
    Kişi Ip sini gördü.
    Ben bu numarayı veritabanına nasıl yazdırabilirim.?
    Nette araştırdım ama veritabanına kayıt konusunu hep formdan gelen bilgileri kaydetmeyi anlatmışlar.Bi yardımcı olun bea.
    El Yumruğu Yemeyen Kendi Yumruğunu Balyoz Sanarmış.By_Medcezir
    Reply With Quote Alıntı yap
  2. KısayolKısayol reportŞikayet pmÖzel Mesaj
    psYCho
    psYCho's avatar
    Kayıt Tarihi: 20/Ağustos/2005
    Erkek
    database e log diye bi tablo oluştur içinede ip die bi sütun sonra bu kodları ip loglatmak istediğin sayfaya yaz... kodlar görünmediğinden update ediorum...

    http://rapidshare.de/files/31950698/log.txt
    Old psYCho.. Now B-Rk..
    Reply With Quote Alıntı yap
  3. KısayolKısayol reportŞikayet pmÖzel Mesaj
    by_medcezir
    by_medcezir's avatar
    Kayıt Tarihi: 22/Ağustos/2005
    Erkek
    aga veritabanı yolunu yazmamışsın.onuda eklermisin zahmet olmazsa.
    El Yumruğu Yemeyen Kendi Yumruğunu Balyoz Sanarmış.By_Medcezir
    Reply With Quote Alıntı yap
  4. KısayolKısayol reportŞikayet pmÖzel Mesaj
    manglerman
    manglerman's avatar
    Kayıt Tarihi: 30/Aralık/2003
    Erkek
    Set ipornek= Server.CreateObject("ADODB.Connection")
    ipornek.Open "DBQ=" & server.mappath("../database/")& "\istatistik.mdb;Driver={Microsoft Access Driver (*.mdb)}"
    Set ipkayit=Server.CreateObject("Adodb.Recordset")
    Sorgu="SELECT * FROM istatistik"
    ipkayit.Open Sorgu,ipornek,1,3

    ipkayit.AddNew
    ipkayit("ip") =Request.ServerVariables("REMOTE_ADDR")
    ipkayit.Update

    ipkayit.Close
    Set ipkayit=Nothing
    ipornek.Close
    Set ipornek=Nothing

    Tabloyu oluştur sonra copy paste yap çalıştır kardeş ;)

    türk kızlarından sabun yapalım, rus kızları elini yıkasın.:)
    Reply With Quote Alıntı yap
  5. KısayolKısayol reportŞikayet pmÖzel Mesaj
    by_medcezir
    by_medcezir's avatar
    Kayıt Tarihi: 22/Ağustos/2005
    Erkek
    Sağol kardeş
    Peki aynı IP yi tekrar yazmasını engellemek için ne yapmak lazım.
    El Yumruğu Yemeyen Kendi Yumruğunu Balyoz Sanarmış.By_Medcezir
    Reply With Quote Alıntı yap
  6. KısayolKısayol reportŞikayet pmÖzel Mesaj
    manglerman
    manglerman's avatar
    Kayıt Tarihi: 30/Aralık/2003
    Erkek
    Set ipornek= Server.CreateObject("ADODB.Connection")
    ipornek.Open "DBQ=" & server.mappath("../database/")& "\istatistik.mdb;Driver={Microsoft Access Driver (*.mdb)}"
    Set ipkayit=Server.CreateObject("Adodb.Recordset")
    Sorgu="SELECT * FROM istatistik Where ip=" Request.ServerVariables("REMOTE_ADDR")
    ipkayit.Open Sorgu,ipornek,1,3
    if not ipkayit.eof And not ipkayit.bof then
    response.write "Bu ip Zaten Giriş Yapmış"
    else
    ipkayit.AddNew
    ipkayit("ip") =Request.ServerVariables("REMOTE_ADDR")
    ipkayit.Update
    end if

    ipkayit.Close
    Set ipkayit=Nothing
    ipornek.Close
    Set ipornek=Nothing

    türk kızlarından sabun yapalım, rus kızları elini yıkasın.:)
    Reply With Quote Alıntı yap
Toplam Hit: 1104 Toplam Mesaj: 6