AccessTr.neT - SQL Sorguda tarih formatında null sıkıntısı

Sayfalar: 1 2

Saygı değer Hocalarım ve yardımcı olabilecek arkadaşlarım, Şimdiden sizlere teşekkürü borç biliyorum. Öncelikle projem çok büyük bir kısmını koymamda sıkıntı dolayısıyla bu nedenle örnek koyamadığım için özür dilerim. Sıkıntım tam olarak şu şekildedir: VT de tarih ile ilgili hücreler metin değil Tarih formatın da kayıt tutmakta, dolu olan tarihlerde yani teslim edilenler de (Case 3) sorgulamam da sıkıntı yok listeyi sağlıklı şekilde alıyorum. Ancak henüz tarih girili olmayan devam denlerde (Case 2) ise "" (Boşluk) yada Null kullanmama rağmen veriler listelenmiyor, bunlar dışında nasıl bir komut verebilirim acaba ?? Ayrıca Case 1 de listeleme ile birlikte veriler arasınsa arama yapabiliyorken diğerlerinde komutu doğru kullanmayı başaramadım...

Kod:
Select Case Tercihim

Case 1 'Bütün İşler

KONTROL = "SELECT Servis_Tbl.ID, Servis_Tbl.Cari, Servis_Tbl.Gsm, Servis_Tbl.Urun, Servis_Tbl.Marka, Servis_Tbl.Model, Servis_Tbl.Tutar, Servis_Tbl.Alinan, Servis_Tbl.Kalan, Servis_Tbl.Kayit_Tarihi, Servis_Tbl.Teslim_Tarihi FROM Servis_Tbl WHERE (((Servis_Tbl.Cari) Like Forms!Ana_Frm!Aranan2 & " * ") And ((1)=1)) ORDER BY Servis_Tbl.ID DESC"

    Me!Liste.RowSource = KONTROL

    Liste.Requery

    Liste.Selected(1) = True

Case 2 'Devam Edenler

KONTROL = "SELECT Servis_Tbl.ID, Servis_Tbl.Cari, Servis_Tbl.Gsm, Servis_Tbl.Urun, Servis_Tbl.Marka, Servis_Tbl.Model, Servis_Tbl.Tutar, Servis_Tbl.Alinan, Servis_Tbl.Kalan, Servis_Tbl.Islem_Tarihi, Servis_Tbl.Teslim_Tarihi FROM Servis_Tbl WHERE Islem_Tarihi = Null ORDER BY Servis_Tbl.ID DESC"

    Me!Liste.RowSource = KONTROL

    Liste.Requery

    Liste.Selected(1) = True

Case 3 'Teslim Edilenler

KONTROL = "SELECT Servis_Tbl.ID, Servis_Tbl.Cari, Servis_Tbl.Gsm, Servis_Tbl.Urun, Servis_Tbl.Marka, Servis_Tbl.Model, Servis_Tbl.Tutar, Servis_Tbl.Alinan, Servis_Tbl.Kalan, Servis_Tbl.Kayit_Tarihi, Servis_Tbl.Teslim_Tarihi FROM Servis_Tbl WHERE Teslim_Tarihi <> Null ORDER BY Servis_Tbl.ID DESC"

    Me!Liste.RowSource = KONTROL

    Liste.Requery

    Liste.Selected(1) = True

sayın megasoftware,

bahsettiğiniz talebinize yönelik olarak;

Kod:
IsNull([Islem_Tarihi])

Kod:
nz([Islem_Tarihi],date())

Kod:
[Islem_Tarihi] Is Null

bu kodlardan herhangi birini deneyebilirsiniz.

Alıntı:projem çok büyük bir kısmını koymamda sıkıntı dolayısıyla bu nedenle örnek koyamadığım için özür dilerim

ifadeniz için de;
örnek uygulamanızı,içeriğinde farazi gerçek dışı veriler ve sonuçları görebilmek üzere de birkaç kayıt olacak şekilde ve tüm proje zaten şart değil aksine bu sonuçları görmeyi gerektirecek nesnelerin (tablo,sorgu,form) olması yeterli.

deneme yanılma usulü veya karşılıklı soru cevap durumuna mahal vermeksizin,direkt örnek üzerinden çözüm elde etmeniz daha muhtemel.

bilginize...iyi çalışmalar,saygılar.

sayın megasoftware,

aşağıdaki kodları deneyebilirsiniz.

Kod:
Select Case Tercihim

Case 1 'Bütün İşler

KONTROL = "SELECT Servis_Tbl.ID, Servis_Tbl.Cari, Servis_Tbl.Gsm, Servis_Tbl.Urun, Servis_Tbl.Marka, Servis_Tbl.Model, Servis_Tbl.Tutar, Servis_Tbl.Alinan, Servis_Tbl.Kalan, Servis_Tbl.Kayit_Tarihi, Servis_Tbl.Teslim_Tarihi FROM Servis_Tbl WHERE (((Servis_Tbl.Cari) Like Forms!Ana_Frm!Aranan2 & " * ") And ((1)=1)) ORDER BY Servis_Tbl.ID DESC"

    Me!Liste.RowSource = KONTROL

    Liste.Requery

    Liste.Selected(1) = True

Case 2 'Devam Edenler

KONTROL = "SELECT Servis_Tbl.ID, Servis_Tbl.Cari, Servis_Tbl.Gsm, Servis_Tbl.Urun, Servis_Tbl.Marka, Servis_Tbl.Model, Servis_Tbl.Tutar, Servis_Tbl.Alinan, Servis_Tbl.Kalan, Servis_Tbl.Islem_Tarihi, Servis_Tbl.Teslim_Tarihi FROM Servis_Tbl WHERE [Islem_Tarihi] Is Null ORDER BY Servis_Tbl.ID DESC"

    Me!Liste.RowSource = KONTROL

    Liste.Requery

    Liste.Selected(1) = True

Case 3 'Teslim Edilenler

KONTROL = "SELECT Servis_Tbl.ID, Servis_Tbl.Cari, Servis_Tbl.Gsm, Servis_Tbl.Urun, Servis_Tbl.Marka, Servis_Tbl.Model, Servis_Tbl.Tutar, Servis_Tbl.Alinan, Servis_Tbl.Kalan, Servis_Tbl.Kayit_Tarihi, Servis_Tbl.Teslim_Tarihi FROM Servis_Tbl WHERE Teslim_Tarihi Is Not Null ORDER BY Servis_Tbl.ID DESC"

    Me!Liste.RowSource = KONTROL

    Liste.Requery

    Liste.Selected(1) = True

alternatifler olarak;NZ Fonksiyonu ya da IIF Fonksiyonu da kullanılabilir.örneği incelemek daha uygun olacaktır.bilginize...iyi çalışmalar,saygılar.

Sayın Atoz112 Hocam Kod sorunsuz çalıştı ayrıca Case 1 de sıralanan tüm veriler içinde arama sağlıklı yapılıyor ancak case 2 ce case 3 de bunu başaramadım arama textine ne yazarsam yazayım listede bir değişiklik olmuyor. Bu konuda da bir örnekle yardımcı olursanız çok müteşekkir olurum. Saygılarımla...

sayın megasoftware,

örnek uygulamanızı,uygun içerikte ve nitelikte olacak şekilde konunuza dahil etmenizi halinde,
daha geçerli çözüm paylaşımları edinmeniz muhtemeldir.

zamanı doğru değerlendirebilmek adına,örneğiniz üzerinden gidilmesi daha yerinde olacaktır.

bilginize...iyi çalışmalar,saygılar.

(06/05/2016, 17:36)atoz112 yazdı: [ -> ]sayın megasoftware,

örnek uygulamanızı,uygun içerikte ve nitelikte olacak şekilde konunuza dahil etmenizi halinde,
daha geçerli çözüm paylaşımları edinmeniz muhtemeldir.

zamanı doğru değerlendirebilmek adına,örneğiniz üzerinden gidilmesi daha yerinde olacaktır.

bilginize...iyi çalışmalar,saygılar.

Sayın hocam örnek ektedir. Yardım için şimdiden Tekrar teşekkürler... Ozur

Sayfalar: 1 2