Private Sub Form_Load() Dim s$ s = "UPDATE Tablo1 SET EnableA1 = False WHERE EnableA1=True" CurrentDb.Execute s End Sub
=Nz(DLookUp("adet";"Tablo1";"Kimlik=" & CLng([isim]));0)