+- 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ığı: Form Üzerinden Filtreleme Kaldırma (/konu-form-uzerinden-filtreleme-kaldirma.html)
Form Üzerinden Filtreleme Kaldırma - mustinba - 31/08/2018
Private Sub OgrenciEkle()
Set db = CurrentDb()
SQL = "SELECT * FROM tbl_Ogrenci_bilgileri WHERE okul_num = " & Me.okul_num & ";"
Set rs = db.OpenRecordset(SQL)
If rs.EOF = False Then
MsgBox Me.okul_num & " nolu cari daha önce girilmiş.."
Me.okul_num.SetFocus
Exit Sub
End If
SQL = "SELECT * FROM tbl_Ogrenci_bilgileri"
Set rs = db.OpenRecordset(SQL)
rs.AddNew
rs!okul_num = Me.okul_num
rs!adi_soyadi = Me.adi_soyadi
rs!sinifi = Me.sinifi
rs!sube = Me.sube
rs.Update
stLinkCriteria = "[okul_num]=" & Me.okul_num
DoCmd.Close
DoCmd.OpenForm "frml_Ogrenci_bilgileri", , , stLinkCriteria
End Sub
bu kod ile frml_Ogrenci_bilgileri formunu açabiliyorum ancak form açıldığında gezinti düğmelerinde "Filtre uygulanmış" dediğinden kayıtlar arası gezinemiyorum form açıldığı zaman filtreyi kod ile nasıl kaldırabilirim.
Cvp: Form Üzerinden Filtreleme Kaldırma - mustinba - 31/08/2018
teşekkürler
yabancı bir forum sitesinde buldum .
Me.FilterOn = False
Me.Refresh