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.
(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.
sayın U.ALTUN,
EK'te;
bahsettiğiniz talebinize yönelik olarak hazırlanmış örnek uygulama mevcuttur.inceleyebilirsiniz.
YAPILAN İŞLEMLER
eklediğiniz hata resmi de dahil olmak üzere,sorunlarınızın kaynağının nedenleri,
1) Mekanik_Siparis ile Perde_Siparis adlı formlar üzerinde yer alan denetimlerin ve formların adlarında düzeltmeler yapıldı.
2) Perde_Siparis adlı form üzerine Müşteri ve Firma bilgilerinin aktarılmasını sağlamak için butonlar ve içeriklerine kodlar dahil edildi.
önceki ve sonraki hallerini karşılaştırmak sureti ile her iki form üzerinde yapılan değişiklikleri inceleyebilirsiniz.
son olarak;
lütfen,kod sayfasında üst menüde yer alan DEBUG - COMPILE komutunu kullanmak sureti ile,kodlarınızda yer alan nesne (form,sorgu,tablo,v.s...) adlarının ve aynı zamanda bu nesnelerdeki alan adı ve denetim adlarının kontrollerini yapmayı ihmal etmeyiniz.böylece,belki de bu hususlardan kaynaklı sorunlara maruz kalmaksızın direkt kendinizin de çözüm sağlayabilmek imkanını elde edebilir ve uygulamanızı sorunsuz kullanabilirsiniz.
bilginize...iyi çalışmalar,saygılar.
sayın atoz112
elinize sağlık çok güzel olmuş uyarılarınızı bundan sonra dikkate alçağım formdaki stok listesini açınca sadece aktif olanların görünmesini istiyorum sorguda ölçütünü aktif olarak ayarladım fakat yine hepsini veriyor ne yapmam gerekiyor ilginizi bekliyorum.
her şey için teşekkürler.
sayın U.ALTUN,
Alıntı:formdaki stok listesini açınca sadece aktif olanların görünmesini istiyorum sorguda ölçütünü aktif olarak ayarladım fakat yine hepsini veriyor
ifadenize yönelik olarak;
eğer kast ettiğiniz,
Tbl_Siparisler adlı tabloyu gerektiği gibi veriler ile doldurduktan sonra,
tbl_Siparisdetay Sorgu adlı sorgu üzerindense,bu sorgunun DURUM adlı sütununun KRİTER satırına "Aktif" ifadesini yazmanız yeterli olmuyor mu?
çünkü;direkt olarak,tbl_Siparisdetay adlı tablo kayıt kaynağını oluşturduğu için,kriter atamasında bulunamıyorsunuz haliyle.
fakat şunu da belirtmekte fayda var kanısındayım.Mekanik ve Perde Sipariş formlarındaki alt form olarak kullandığınız formun kaynağını sorgu olarak kullanınız ki (örneğin;tbl_Siparisdetay Sorgu adlı sorgu ile olabilir);bu kriter belirleme işlemini de akabinde gerçekleştirebilesiniz.bu alt formun kaydetme işlemi için de,bir buton dahil ederek ya da üzerindeki denetimlerin olay yordamlarına bu kaydetme işlemini sağlaması için yönlendirmelerde bulunabilirsiniz.
eğer kast ettiğiniz başka bir husus ise,lütfen ekran görüntüsü ile daha net açıklamada bulunmaya gayret ediniz.
bilginize...iyi çalışmalar,saygılar.
sayın U.ALTUN,
EK'te;
bahsettiğiniz talebinize yönelik olarak,
Tbl_Siparisler ve tbl_Siparisdetay adlı tablolarda ve aynı zamanda Mekanik ve Perde Sipariş adlı formlarda yer alan alt formların üzerinde gerekli düzenlemelerin yapılması neticesinde hazırlanmış örnek uygulama mevcuttur.inceleyebilirsiniz.
bilginize...iyi çalışmalar,saygılar.