Çek Koçanı Takip hk

Merhaba Arkadaşlar ,

Çek takibi için bir uygulama yapmam lazım. Örneği olan varmı?
Mesela koçanın başlangıç ve bitiş numarasını girip çek oluşturup o çekleri verdikçe bilgileri girmek istiyorum.

Merhaba Arkadaşlar,

Koçan formunda bulunan "Kaydet ve Çek Oluştur" butonu tıkladığımda aşağıdakilerin yapılması konusunda yardımcı olabilirmisiniz?

* Koçan no 1 den başlayıp 100 e kadar olsun. Kaydet dediğimde cek tablosunda 1denbaşlayıp 100 kadar çek girmesini istiyorum. Kısaca cek baslangiç ile bitiş aralağı baz alınarak, koçanımda 100 tane çek varsa Çek Kaydet değimde cek tablosunda çek numaralarını ve koçan numarasını kaydedecek. Daha sonra ben o çek numaralarını çağırarak veri gireceğim.

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.

bende bunun gibi bir program yapmaya calisiyorum ama isin icinden cikamadim yaptiginiz calismayi paylasabilirmisiniz. birde cevap yazan olmamis bu soruyu cozebildinizmi

With DoCmd

.SetWarnings False

.RunSQL "insert into cek(koçanno,çekno)" & " select [Forms]![KOCAN]!Kocanno,i "

.SetWarnings True

End With

burada hep aynı kayıt üzerinde olduğunuzdan INSERT INTO ile form üzerinde görünen verileri veritabanına defalarca eklersiniz. Ekleme işleminden hemen sonra

DoCmd.GoToRecord , , acNewRec

Yazarsanız formda yeni bir kayıt açarsınız. Burada yazdıklarınızdan sonra kaydet tuşuna basınca kaydetme işlemi yeni bir kayıt olarak eklenir.