With DoCmd
.SetWarnings False
.RunSQL "insert into cek(koçanno,çekno)" & " select [Forms]![KOCAN]!Kocanno,i "
.SetWarnings True
End With
Bu komutla cek tablosuna kayıtları ekleyebiliyorum. Bu komutu Döngü içerisine sokmak istediğimde sürekli aynı kayıt üzerine yazıyor. Cek tablosuna yeni kayıt ekleyebilmem için hangi komutu eklemem gerekiyor.

::::::......Can You Buy Freedom?.........::::::
::::::......Does Money Buy Freedom?....:::::
::::::......Does Money Buy Freedom?....:::::