ayman14

شكرا على ردك سيد ابا جودي اخي الكريم المسؤلة لا تحتاج قاعدة او مثل فالكود لجلب جدول الصنف موجود لو تمعنت جيدا في الكود لوجدت \ اسم الصنف وكود الصنف موجودين في الكود ما اريده هو كود (Caption.Picture) لتظهر صورة الصنف في الازرار

كل عام والجميع بالف خير لدي نمودج وبه عدة ازرار عند فتح النمودج يثم توزيع اسماء الاصناف على الازرار لكل صنف له صورة في الجدول فهده الفكرة ثم العمل عليها ما اريده هو تكملت الكود لتوزيع كل صورة صنف في زر Set Rs = CurrentDb.OpenRecordset("select Id , NmEtm ,PrEtm , PcEtm from Etms"): Rs.MoveLast: Rs.MoveFirst For Each C In Me.Controls If Not Rs.EOF Then C.Caption = Rs(1): C.Tag = Rs(0): Rs.MoveNext C.Visible = True Else C.Visible = False End If Next وهدا هو الكود المستخدم

شكرا لك الاخ خلف على ما اعتقد الكود ممتاز جدا فهدا ما احبه في الاكسس الاكواد بسيطة و تقوم بالمطلوب بوركت

برك الله فيك استاد ابو ياسين

وعليك السلام اخي الكريم لم استطع ارسال الرسالة ليست لدي صلاحيات مازلت عضو جديد تم تعديل على الكود يمكن استخدامه في اي برنامج وسيتم وضعه في هدا المنتدى ليستفيد منه كل من يبحث عن اضافة اختيار طابعة معينة لتكون الافتراضية Print.rar

استادي العزيز بارك الله فيك ثم عمل جدول ياخد اسماء الطابعات تلقائيا واستخدمت الكود الاخير ثم بنجاح والمشكل لم انتبه لها وهي في اعدادات التقرير كنت سابقا اخترة نوع الطابعة وعند تغييرها الى الطابعة الافتراضية عمل بشكل ممتاز كان الخطا مني وليس من الامثلة التي استخدمتها وبنسبة للكود الاخير ممتاز جدا لانني لااحب كثرة الاكواد وانت سيد العارفين(hlopaet_prv) مشكور استادنا

وعليك السلام اخي الكريم المثال لم يقم بتغيير شيء مازالت الطابعة الافتراضية هي هي كما ان المثال بعيد جدا عن ما اريد الامر بسيط كما في الفجوال بيسك كود يتعامل مع لوحة تحكم طابعات ويختار طابعة لتكون الافتراضية

وعليك السلام اخي الكريم المثال لايصلح لما اريده ما اريده هو قائمة منسدلة تحوي مجموعة طابعات الموجودة في جهازي وليس كتابتها يدويا وعند اختيار من القائمة نوع الطابعة تصبح افتراضية للبرنامج بالتوضيح اريد كود يتحكم في تشغيل طابعة من الجهاز وجعلها افتراضية

سلام عليكم اخواني الافاضل مشكلة واريد لها حل من خبراء الاكسس عند تصميم البرنامج والانتهاء اجد مشكلة الطابعة و الاكسس يستخدم الطابعة الافتراضية وجدت عدة امثلة اجنبية وعربية رغم العربية احسن وادق لكن لم تظبط معي عند استخدام احد الامثلة نجحت الفكرة تمت طباعة من الطابعة المختارة وعند طباعة فاتورة تغيرت من الطابعة المختارة الى الطابعة الافتراضية والجهاز يوجد فيه ثلاث طابعات واريد اختيار طابعة محددة لمرة واحدة فقط دون الرجوع كل مرة واختيار الطابعة فما الحل اخواني لا احب ان اجعل اعدادت طابعة مع نمودج فاتورة اريد فورم غير مرتبط بفورم فواتير