(18/02/2016, 02:18)mehami yazdı: Lakin TC yazımı sonrası eşleştirme ve sistem tarihi ve saatini ilgili kişi için veritabanına yazdırma işini halledemedim(
Örnek çalışma ekte olup;öneri ve yardımlarınızı bekliyor saygılar sunuyorum..
eşleştirme olayı için Dlookup kodu ile tc kimlik numarasının personel tablosunda olup olmadığını kontrol ettirmelisin
If Nz(DLookup("Kimlik", "Personel", "[tc]='" & Me.Metin0 & "'"), 0) <> 0 Then
DoCmd.SetWarnings False
DoCmd.RunSQL "INSERT INTO ana ( tc, giris_tarih, gir_saat ) VALUES ('" & [Metin0] & "','" & Date & "', '" & Time() & "')"
DoCmd.SetWarnings True
DoCmd.Close acForm, "sifrem1"
Else
MsgBox ("Bu isimde personel yok.")
End If
End Sub
bu kod sifrem1 isimli formdaki Komut2 isimli komut butonunun tıklandığında olayına yazılacak kod.
Çıkış için benzeri kod ekleyeceksin, ancak insert into yerine update sorgusu olacak.
Ayrıca, birincil anahtar olan veya otomatik sayı olan iki alan ilişkilendirilmez.