• 29-09-2010, 13:15:58
    #1
    Sitemin veritabanını access den sql'e dönüştürüp import ettim fakat site hata veriyor.Bunun sql veritabanındaki tarih formatı yyyy.mm.dd fakat benim asp kodumda geçen date() formatı ise dd.mm.yyyy olmasından kaynaklandığını düşünüyorum.Sorunu çözmede yardımcı olabilecek bir arkadaş varmı?
    Teşekkürler
  • 29-09-2010, 13:18:35
    #2
    Üyeliği durduruldu
    'MySQL tarih ve saat formatlama
    function mysqltarihsaat(varDate)
    if day(varDate) < 10 then
    dd = "0" & day(varDate)
    else
    dd = day(varDate)
    end if
    
    if month(varDate) < 10 then
    mm = "0" & month(varDate)
    else
    mm = month(varDate)
    end if
    
    if hour(varDate) < 10 then
    hh = "0" & hour(varDate)
    else
    hh = hour(varDate)
    end if
    
    if minute(varDate) < 10 then
    mi = "0" & minute(varDate)
    else
    mi = minute(varDate)
    end if
    
    if second(varDate) < 10 then
    se = "0" & second(varDate)
    else
    se = second(varDate)
    end if
    
    mysqltarihsaat = year(varDate) & mm & dd & hh & mi & se
    end function
    
    SorguTarihi = mysqltarihsaat(now())
    görünüm ise : 0000-00-00 00:00:00
  • 29-09-2010, 13:23:42
    #3
    bendeki kod şöyle problemli yer kırmızı satır
    Alıntı
    '- Kategorideki İlan Adeti: ------------------------------------------------------------------
    Function goster(ilanadet)
    Set adet = Server.CreateObject( "ADODB.Recordset" )
    adet.ActiveConnection = bag
    adet.CursorType= adOpenStatic
    adet.Open "Select * From ilanlar Where kategori_adi='"&klistele("kategori_id")&"' " &_
    "AND ilan_starih > date() " &_
    "AND onay = 'ONAYLI' "
    goster = adet.recordcount
    End Function
    verdiğiniz kodu nereye eklemem lazım.
  • 29-09-2010, 13:26:38
    #4
    Üyeliği durduruldu
    verdiğin kodun üstüne yerleştir ve
    "AND ilan_starih > date() " &_ buradaki date() yerine SorguTarihi ni yazcan
  • 29-09-2010, 14:11:48
    #5
    screamser adlı üyeden alıntı: mesajı görüntüle
    verdiğin kodun üstüne yerleştir ve
    "AND ilan_starih > date() " &_ buradaki date() yerine SorguTarihi ni yazcan
    ben yapamadım,biraz daha açıklayabilirmisin?
  • 29-09-2010, 14:24:42
    #6
    Üyeliği durduruldu
    sql den ilan_starih kısmını datetime olarak değiştir.
    sonra aşağıdaki kodu kullan.

    <%
    'MySQL tarih ve saat formatlama
    function mysqltarihsaat(varDate)
    if day(varDate) < 10 then
    dd = "0" & day(varDate)
    else
    dd = day(varDate)
    end if
    
    if month(varDate) < 10 then
    mm = "0" & month(varDate)
    else
    mm = month(varDate)
    end if
    
    if hour(varDate) < 10 then
    hh = "0" & hour(varDate)
    else
    hh = hour(varDate)
    end if
    
    if minute(varDate) < 10 then
    mi = "0" & minute(varDate)
    else
    mi = minute(varDate)
    end if
    
    if second(varDate) < 10 then
    se = "0" & second(varDate)
    else
    se = second(varDate)
    end if
    
    mysqltarihsaat = year(varDate) & mm & dd & hh & mi & se
    end function
    
    SorguTarihi = mysqltarihsaat(now())
    
    '- Kategorideki İlan Adeti: ------------------------------------------------------------------
    Function goster(ilanadet)
    Set adet = Server.CreateObject( "ADODB.Recordset" )
    adet.ActiveConnection = bag
    adet.CursorType= adOpenStatic
    adet.Open "Select * From ilanlar Where kategori_adi='"&klistele("kategori_id")&"' " &_
    "AND ilan_starih > "& SorguTarihi &" " &_
    "AND onay = 'ONAYLI' "
    goster = adet.recordcount
    End Function 
    %>
  • 29-09-2010, 14:29:40
    #7
    Sağol
    screamser adlı üyeden alıntı: mesajı görüntüle
    sql den ilan_starih kısmını datetime olarak değiştir.
    sonra aşağıdaki kodu kullan.

    <%
    'MySQL tarih ve saat formatlama
    function mysqltarihsaat(varDate)
    if day(varDate) < 10 then
    dd = "0" & day(varDate)
    else
    dd = day(varDate)
    end if
     
    if month(varDate) < 10 then
    mm = "0" & month(varDate)
    else
    mm = month(varDate)
    end if
     
    if hour(varDate) < 10 then
    hh = "0" & hour(varDate)
    else
    hh = hour(varDate)
    end if
     
    if minute(varDate) < 10 then
    mi = "0" & minute(varDate)
    else
    mi = minute(varDate)
    end if
     
    if second(varDate) < 10 then
    se = "0" & second(varDate)
    else
    se = second(varDate)
    end if
     
    mysqltarihsaat = year(varDate) & mm & dd & hh & mi & se
    end function
     
    SorguTarihi = mysqltarihsaat(now())
     
    '- Kategorideki İlan Adeti: ------------------------------------------------------------------
    Function goster(ilanadet)
    Set adet = Server.CreateObject( "ADODB.Recordset" )
    adet.ActiveConnection = bag
    adet.CursorType= adOpenStatic
    adet.Open "Select * From ilanlar Where kategori_adi='"&klistele("kategori_id")&"' " &_
    "AND ilan_starih > "& SorguTarihi &" " &_
    "AND onay = 'ONAYLI' "
    goster = adet.recordcount
    End Function 
    %>