2 -
, odeme.kimde,
alanından sonra fazladan bir virgül vareğer sorgunuzu aşağıdaki gibi düzenlerseniz çalışır
[tarih] yerine [odmTrh] aldım
Dim SqlSirala, txtSira As String
SqlSirala = " SELECT odeme.Kradsoyad, odeme.KrTc, odeme.Kvadsoyad, odeme.KvTc, odeme.odmTrh, odeme.KrTcOdmTrh, odeme.kimde " & _
" FROM odeme " & _
" WHERE ((([odmTrh]) Between " & CLng(Me.Metin79) & " And " & CLng(Me.Metin82) & "));"
Me.Liste5.RowSource = SqlSirala
3 - kod sayfanızın en başında virgül koyulmuş debug yaparsanız gösterir4 - ((([tarih] Between " & Me.Metin79 & " And " & Me.Metin82 & "));" açılan ve kapanan parantez sayısı eşit olmalı [tarih] sonra bir kapama parantezi eksik