folder Tahribat.com Forumları
linefolder Asp - Php - Cgi - Perl
linefolder Asp De Çevrimiçi Üye Gösterimi (Yardım!). Bir El Atın.



Asp De Çevrimiçi Üye Gösterimi (Yardım!). Bir El Atın.

  1. KısayolKısayol reportŞikayet pmÖzel Mesaj
    camarade
    ontedi
    ontedi's avatar
    Kayıt Tarihi: 04/Eylül/2005
    Erkek

    Arkadaşlar kullanıcının durumunu (çevrimiçi-çevrimdışı) olup olmadığını göstereceğim. Ama kodda hata alıyorum.

     

    Yazdığım kod

    Session.LCID = 1033
    ZamanMiktari = DateAdd("n", -5, Now())
    set durumRS = Server.CreateObject("Adodb.Recordset")
    durumRS.OPEN "Select * From UyelerTablosu WHERE uyeID="&strUyeID&" AND songiristarihi >= #"&ZamanMiktari&"#", DBBaglanti,1 ,3

    if durumRS.eof then
    strDurum = "<font color='red'>Çevrimdışı</font>"
    else
    strDurum = "<font color='green'>Çevrimiçi</font>"
    end if
    durumRS.close
    set durumRS = nothing

     

    Aldığım hata

    Hata Tipi:
    Microsoft VBScript derleme hatası (0x800A0401)
    Deyim sonu gerekli
    /s/profil.asp, line 146, column 126
    durumRS.OPEN "Select * From UyelerTablosu WHERE uyeID="&strUyeID&" AND songiristarihi >= #"&ZamanMiktari&"#", DBBaglanti,1 ,3 if durumRS.eof then

    Normalde uyeID siz kullandığım zaman çevrimiçi olan kullanıcıları görüntüleyebilmekteyim. Ama kullanıcı olduğu zaman hata veriyor. Bir el atın dostlar.


    Matematikçi ve Yazılımcı. http://www.ontedi.com ve http://www.cizgi.site Siteme beklerim herkesi.
  2. KısayolKısayol reportŞikayet pmÖzel Mesaj
    pesimistzombie
    pesimistzombie's avatar
    Kayıt Tarihi: 14/Haziran/2006
    Erkek

    durumRS.OPEN "Select * From UyelerTablosu WHERE uyeID="&strUyeID&" , DBBaglanti,1 ,3

     

    GecenSure = DateDiff("s",durumRS("tarih"),now())


    if not GecenSure<600 Then
    strDurum = "<font color='red'>Çevrimdışı</font>"
    else
    strDurum = "<font color='green'>Çevrimiçi</font>"
    end if
    durumRS.close
    set durumRS = nothing

    yapmayı denesen? ordaki 600 yaklaşık 5 10 dkya tekabül ediyor 


    :|
  3. KısayolKısayol reportŞikayet pmÖzel Mesaj
    camarade
    ontedi
    ontedi's avatar
    Kayıt Tarihi: 04/Eylül/2005
    Erkek
    Vay hocam sağolasın ya. Oldu sayende. Yakında çok dehşet bir site çıkaracağım ortaya. :)

    Matematikçi ve Yazılımcı. http://www.ontedi.com ve http://www.cizgi.site Siteme beklerim herkesi.
  4. KısayolKısayol reportŞikayet pmÖzel Mesaj
    FOXXLY
    FOXXLY's avatar
    Kayıt Tarihi: 19/Haziran/2006
    Erkek

    hacım alp hocamın bana öğrettiği kodlar bunlar ;

     

    <%
    zaman = foxxly1("songiris")
    if datediff("n", zaman, now()) <= 10 then
    %>
    <img src="online.gif">
    <%
    else
    %>
    <img src="offline.gif">
    <%
    end if
    %>

     sorunsuz çalışmaktadır

    vt de songiris die b tablo aç, oraya üyenin her sayfada gezdiğinde saati update etsin öle bi kod yaz tamamdur 


    kelimeler albayım bazı anlamlara gelmiyor.
  5. KısayolKısayol reportŞikayet pmÖzel Mesaj
    Tuna
    Tuna's avatar
    Kayıt Tarihi: 17/Temmuz/2005
    Erkek

    ontedi 

    Lcid = Session.Lcid
    Session.Lcid = 1033

    kodların

    Session.Lcid = Lcid

    şeklinde yaparsan senin kodda çalışır sanırm.

     

    arkadaşlar peki bunun aynını mysqlda nasıl kullanırız ?

    pesimist senin yazdığın kodtaki rs("tarih") kısmını bir fonksiyonla 1.1.1111 vs şekinde tarihe çevirsek datediff , mysqlda çalışırmı ? yani rs("tarih") mysqlda 1-1-2000 , bunu fonksiyonla 1.1.2000 yapsak diyorum?

Toplam Hit: 1076 Toplam Mesaj: 5