(28/01/2017, 13:05)atoz112 yazdı: sayın U.ALTUN,

bahsettiğiniz talebinize yönelik olarak;

1)

Musteri_ara adlı formun üzerindeki Liste1 adlı listenin TIKLANDIĞINDA olay yordamı içerisindeki kodları

If CurrentProject.AllForms("Mekanik_Siparis").IsLoaded Then



Forms![Mekanik_Siparis]![cari_kod_Tbl_Musteriler] = Forms![Musteri_ara]![Liste1].Column(1)

Forms![Mekanik_Siparis]![Adı_Soyadı] = Forms![Musteri_ara]![Liste1].Column(2)



ElseIf CurrentProject.AllForms("Perde_Siparis").IsLoaded Then



Forms![Perde_Siparis]![cari_kod] = Forms![Musteri_ara]![Liste1].Column(1)

Forms![Perde_Siparis]![Musteri] = Forms![Musteri_ara]![Liste1].Column(2)



End If

DoCmd.Close acForm, "Musteri_ara"

kodları ile değiştiriniz.

2)


Firma_ara adlı formun üzerindeki Liste0 adlı listenin TIKLANDIĞINDA olay yordamı içerisindeki kodları

If CurrentProject.AllForms("Perde_Siparis").IsLoaded Then



Forms![Perde_Siparis]![Firmakodu] = Forms![Firma_ara]![Liste0].Column(1)

Forms![Perde_Siparis]![Firma] = Forms![Firma_ara]![Liste0].Column(2)



ElseIf CurrentProject.AllForms("Mekanik_Siparis").IsLoaded Then



Forms![Mekanik_Siparis]![Firmakodu] = Forms![Firma_ara]![Liste0].Column(1)

Forms![Mekanik_Siparis]![Firma] = Forms![Firma_ara]![Liste0].Column(2)



End If



DoCmd.Close acForm, "Firma_ara"

kodları ile değiştiriniz.

bilginize...iyi çalışmalar,saygılar.

sayın atoz112 kodları eskilerinle değiştirdim yine aynı hataları veriyor ekte hatanın resmini yükledim bakabilirmisiniz. formda stok listesinden seçimde aktif olanlar seçeneği hakkın bir yorum yapmamışınız. o konuyada bakarmısın.
teşekkürler.