DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
Altın Üyelik Hakkında Bilgi
Private Sub Komut0_Click()
Dim guncelle As String
guncelle = "UPDATE tablo1 SET ONAY=True;"
DoCmd.SetWarnings False
DoCmd.RunSQL guncelle
DoCmd.SetWarnings True
Me.Tablo1_alt_formu.Form.Requery
Private Sub Komut0_Click()
Dim guncelle As String
guncelle = "UPDATE tablo1 SET ONAY=[COLOR=red][B]False[/B][/COLOR];"
.............