Dim sql_cumlesi As String
sql_cumlesi = "INSERT INTO kayitlar (tckimlikno) VALUES ('" & Me.tckimlikno & "')"
DoCmd.RunSQL sql_cumlesi
Ben tablonuzu tamamen inceleyemedim sadece bir alan bırakıp gerisini sildim kaydı ekledi. Gerekli kodunuz şu şekilde olmalı:
AccessTr.Net teknik konular içeren bir sitedir. Bu tip sitelerde en iyi şekilde yardım alabilmeniz için Site Kurallarını mutlaka okumanız ve buna göre hareket etmeniz lazım.