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
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
(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
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()));
where koşulunda date kullanmışsınız. Bu koşul nedeni ile sadece günlük kaytları görüyorsunuz. @
berduş hocamızın da belirttiği bu, yordamla ile ilgili değil sorun.
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
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