(30/05/2009, 11:24)Puletin yazdı: Ekte ki örnek işinize yararmı acaba?
Formun Kapandığında olayına da bu kodu yazınız.
Kod:Private Sub Form_Close()
Dim SQL As String
SQL = "UPDATE T_adres_defteri SET Secim = 0 WHERE T_adres_defteri.Secim = -1"
DoCmd.RunSQL SQL
End Sub
Bu örnek benim için çok iyi oldu.. Hem soran arkadaşa hemde üstadlarıma sonsuz teşekkürler...Saygılarımla