+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Bilgisayar Tarihi Değişince Formda O Günkü Kayıtlar Görünmüyor (/konu-bilgisayar-tarihi-degisince-formda-o-gunku-kayitlar-gorunmuyor.html)
Sayfalar:
1
2
Bilgisayar Tarihi Değişince Formda O Günkü Kayıtlar Görünmüyor - simendifer - 01/05/2025
değerli hocalarım forma kayıtları giriyorum ertesi gün bilgisyarın tarihi değişince bir gün önceki kayıtlar formda görünmüyor ama tabloda kayıtlar var çözemedim yardımlarınızı bekliyorum tablo11 de kayıt sorunu
shıft tusuşuyla prg acınız teşekkürler
RE: Bilgisayar Tarihi Değişince Formda O Günkü Kayıtlar Görünmüyor - berduş - 01/05/2025
altformun kayıt kaynağındaki sorgunun kriteri sadece o günü gösterecek şekilde ayarlanmış o nedenle sadece günlük verileri gösteriyor
ilgili kriteri kaldırırsanız sorun düzelir
RE: Bilgisayar Tarihi Değişince Formda O Günkü Kayıtlar Görünmüyor - simendifer - 01/05/2025
(01/05/2025, 13:24)berduş yazdı: altformun kayıt kaynağındaki sorgunun kriteri sadece o günü gösterecek şekilde ayarlanmış o nedenle sadece günlük verileri gösteriyor
ilgili kriteri kaldırırsanız sorun düzelir
hocam kaldırmadıgım olay yordamı kalmadı gene tarih değişince bir önceki tarihteki veriler forma gelmiyor ama tabloda kayıtlar vae anlamadım bir incelermisiniz mesala bu kırıter vardı onu kaldırdım olmadı
[Tablo1 Sorgu1].[kimlik1], [Tablo1 Sorgu1].[ABONENO]
'Private Sub ABONENO_Change()
'If IsNull(DLast("[sonendeks]", "Tablo1", "ayıd=" & Forms![Tablo11]![Tablo1 Sorgu alt formu].Form![ayıd] - 1 & " and ABONENO='" & Forms![Tablo11]![Tablo1 Sorgu alt formu].Form![ABONENO] & "'")) Or DLast("[sonendeks]", "Tablo1", "ayıd=" & Forms![Tablo11]![Tablo1 Sorgu alt formu].Form![ayıd] - 1 & " and ABONENO='" & Forms![Tablo11]![Tablo1 Sorgu alt formu].Form![ABONENO] & "'") = "" Then
' Me.ilkendeks = 0
'Else
'Me.ilkendeks = DLast("[sonendeks]", "Tablo1", "ayıd=" & Forms![Tablo11]![Tablo1 Sorgu alt formu].Form![ayıd] - 1 & " and ABONENO='" & Forms![Tablo11]![Tablo1 Sorgu alt formu].Form![ABONENO] & "'")
'End If
'End Sub
acaba bu kod da bir hata varmı bunumu kasdediyorsunuz
Public Function ToplamKayit(Tablo11)
Dim rs As DAO.Recordset
Dim db As DAO.Database
Dim strSQL As String
Set db = CurrentDb
strSQL = "SELECT COUNT(*) FROM " & Tablo11
Set rs = db.OpenRecordset(strSQL)
ToplamKayit = rs.Fields(0)
'Bağlantıyı kesiyoruz, değişkenleri Sıfırlıyoruz
rs.Close
Set rs = Nothing
Set db = Nothing
End Function
RE: Bilgisayar Tarihi Değişince Formda O Günkü Kayıtlar Görünmüyor - atoykan - 01/05/2025
Tablo1 Sorgu alt formu'nun kaynağı
SELECT Tablo1.kimlik1, Tablo1.ayıd, Tablo1.ay, Tablo1.ABONENO, Tablo1.ABONE, Tablo1.KÖYÜ, Tablo1.işlemtarihi, Tablo1.ilkendeks, Tablo1.sonendeks, Tablo1.sarfiyat, Tablo1.birimfiyat, Tablo1.subedeli, Tablo1.kdv, Tablo1.kaçakbedeli, Tablo1.arızalısaykulbedeli, Tablo1.toplamtutar, Tablo1.sonodemetarihi, Tablo1.okumatarihi, Tablo1.gunfarkı, Tablo1.eskiborc, Tablo1.sabitücret
FROM Tablo1
WHERE (((Tablo1.işlemtarihi)=Date()));
RE: Bilgisayar Tarihi Değişince Formda O Günkü Kayıtlar Görünmüyor - simendifer - 01/05/2025
selamünaleyküm hocam
önerini dikkate aldım dediğiniz gibi sorguda işlem tarihe =date() yazısını kaldırdım olay düzeldi blg tarihini değiştirdiğimde tüm kayıtlar geliyor
ilgi ve alakana çok teşekkür ederim sağolun
ayrıca berduş hocamada ilgi ve alakasından ötürü çok teşekkür ederim sağolun var olun iyiki varsınız bir date beni bir gün oyaldaı sizde yordu
RE: Bilgisayar Tarihi Değişince Formda O Günkü Kayıtlar Görünmüyor - berduş - 01/05/2025
Bahşettiğiniz sorun formla alakalı değil
@atoykan hocamın bahsettiği kodda WHERE (((Tablo1.işlemtarihi)=Date())); satırı soruna sebep oluyor
Siz sorgu koduna koşul eklemişsiniz o kısım düzeltilmeli