16/03/2025, 20:10
simendifer
hayırlı ramazanlar
su aboneliği programı yapmaktayım her ay endeks ölçülüp fatura çıktısı almak istiyorum ilk ölçüm yapılıp fatura aldıktan sonra bir sonraki ay ölçüm yapılıp değeri girilirken önceki ay son endeksin ilk endeks olarak ilk endeks metin kusuna getirmek (yazdırmak) istiyorum onun için şöyle bir kod yazdım ama (Tbl_Sayac alt formu) hata iletisi alıyorum sizce nerde hata var düzenleyebilirmisiniz teşekkürler
If IsNull(DLast("[sonendeks]", "Tbl_Sayac", " abone_ıd =" & Forms![Frm_Sayac]![ Tbl_Sayac alt formu].Form![ abone_ıd] - 1 & " and okumatarihi ='" & Forms![ Frm_Sayac]![ Tbl_Sayac alt formu].Form![ okumatarihi] & "'")) Or DLast("[sonendeks]", " Tbl_Sayac ", " abone_ıd =" & Forms![ Frm_Sayac]![ Tbl_Sayac alt formu].Form![ abone_ıd] - 1 & " and okumatarihi ='" & Forms![ Frm_Sayac]![ Tbl_Sayac alt formu].Form![ okumatarihi] & "'") = "" Then
Me.ilkendeks = 0
Else
Me.ilkendeks = DLast("[sonendeks]", " Tbl_Sayac ", " abone_ıd =" & Forms![ Frm_Sayac]![ Tbl_Sayac alt formu].Form![ abone_ıd] - 1 & " and okumatarihi ='" & Forms![ Frm_Sayac]![ Tbl_Sayac alt formu].Form![ okumatarihi] & "'")
End If
su aboneliği programı yapmaktayım her ay endeks ölçülüp fatura çıktısı almak istiyorum ilk ölçüm yapılıp fatura aldıktan sonra bir sonraki ay ölçüm yapılıp değeri girilirken önceki ay son endeksin ilk endeks olarak ilk endeks metin kusuna getirmek (yazdırmak) istiyorum onun için şöyle bir kod yazdım ama (Tbl_Sayac alt formu) hata iletisi alıyorum sizce nerde hata var düzenleyebilirmisiniz teşekkürler
If IsNull(DLast("[sonendeks]", "Tbl_Sayac", " abone_ıd =" & Forms![Frm_Sayac]![ Tbl_Sayac alt formu].Form![ abone_ıd] - 1 & " and okumatarihi ='" & Forms![ Frm_Sayac]![ Tbl_Sayac alt formu].Form![ okumatarihi] & "'")) Or DLast("[sonendeks]", " Tbl_Sayac ", " abone_ıd =" & Forms![ Frm_Sayac]![ Tbl_Sayac alt formu].Form![ abone_ıd] - 1 & " and okumatarihi ='" & Forms![ Frm_Sayac]![ Tbl_Sayac alt formu].Form![ okumatarihi] & "'") = "" Then
Me.ilkendeks = 0
Else
Me.ilkendeks = DLast("[sonendeks]", " Tbl_Sayac ", " abone_ıd =" & Forms![ Frm_Sayac]![ Tbl_Sayac alt formu].Form![ abone_ıd] - 1 & " and okumatarihi ='" & Forms![ Frm_Sayac]![ Tbl_Sayac alt formu].Form![ okumatarihi] & "'")
End If