Belirli Sayıdaki Tüm Kayıtları Ekleme

1 2
19/05/2024, 17:41

karaayhan

tüm siparişlerdeki sağ ve sol yön adetlerinin sayısına göre
satış tablosuna eklenmesini istiyorum

for next ile, ilgili kayıt eklenebilir mi?
veya ekleme sorgusu ile tüm kayıtları eklenebilir mi?
19/05/2024, 23:08

karaayhan

Dim a As String, b As String

a = Me.tblsatis_alt_formu![SolYön]
b = Me.tblsatis_alt_formu![SağYön]

For sayac = 1 To a
DoCmd.SetWarnings False
DoCmd.OpenQuery ("sol"), acViewNormal
DoCmd.SetWarnings True
Me.tblsatis_alt_formu.Requery
Next sayac


For ekle = 1 To b
DoCmd.SetWarnings False
DoCmd.OpenQuery ("sağ"), acViewNormal
DoCmd.SetWarnings True
Me.tblsatis_alt_formu.Requery
Next ekle


bu kodlar ile ekleme yapıyorum ancak sadece ekrandaki kayıtları ekliyor tüm siparişleri eklemeliyim
20/05/2024, 00:29

atoykan

Ne yapmak istediğinizi daha anlaşılır bir Türkçe ile ifade ederseniz yardımcı olmaya çalışalım.
20/05/2024, 19:36

karaayhan

(20/05/2024, 00:29)atoykan yazdı: Ne yapmak istediğinizi daha anlaşılır bir Türkçe ile ifade ederseniz yardımcı olmaya çalışalım.



**her bir siparişte bulunan;
sağ ve sol yön kapıların adetleri mevcut
bu adetler sayısınca
kayıt çoğaltmak istiyorum.
26/05/2024, 19:35

karaayhan

konu ve soru hala anlaşılmamış durumdaysa kapatalım hocam
27/05/2024, 22:08

ozanakkaya

Formdaki butonun tıklandığında olayındaki kod ile, Sorgu1'in Sql kaynağındaki kod değiştirildi.
1 2