اغزائي اعضاء هذا المنتدى المبدع عند طلب وهو
عند طباعة تقرير اريد ان يظهر مربع حوار اختيار الطابعة الاختيار الطابة التي اريد ان تكون افتراظية ومن ثم طباعة التقريرحيث استخدم نوعان من الطابعات نوع ابسن النقطية ونوع hp الحبرية اريد عند اختار امر طباعة عند ان يظهر مربع حوار اختيار الطابعة ومن ثم طباعة التقرير
أخي الكريم
ضع الكود التالي على زر أمر
On Error Resume Next DoCmd.RunCommand acCmdPrint
ويمكنك وضع أمر فتح التقرير قبل هذا الأمر
أو إنشاء قائمة خاصة بالطباعة
أو الضغط على مفتاحي ( Ctrl + P ) من لوحة المفاتيح
أخي الواصلي
لم أفهم ما تريده بالضبط
اقتباسهل من الممكن اطبع التقرير فقط عند اختيار موافق
نعم فقد جربت الكود الموجود في المثال فلا يتم طباعة التقرير إلا إذا قمت بالضغط على زر موافق من مربع الحوار الخاص بالطباعة .
ياليت أن توضح أكثر وبالتفصيل حتى أعرف ما تريد
On Error GoTo err DoCmd.RunCommand acCmdPrint Dim stDocName As String stDocName = ChrW(1578) & ChrW(1602) & ChrW(1585) & ChrW(1610) & ChrW(1585) & ChrW(49) DoCmd.OpenReport stDocName, acNormal err: If err.Number = 2501 Then MsgBox "لقد تم إلغاء الطباعة", vbMsgBoxRight + vbInformation, "" Else MsgBox "جاري طباعة التقرير", vbMsgBoxRight + vbInformation, "" End If
اخي مصلح الحريصي اشكرك جزيل الشكر على اهتمامك واسف اني قد اتعبتك معي ولكن جعل الله ذلك في موازين حسناتك
وما اريدة هو اني اريد ان يظهرحوار الطابعة وذلك كي اتمكن من اختيار الطابعة ومن ثم عند ضغط موافق يتم طباعة التقرير الذي اريدة وليس واجهة البربنامج
( الفريم ) ارجوا ان يكون ذلك واضحاً ولكم شكري وتقديري لجميع اعضاء المنتدي الشيق !!!!!!!!
الواصلي كتب:اخي مصلح الحريصي اشكرك جزيل الشكر على اهتمامك واسف اني قد اتعبتك معي ولكن جعل الله ذلك في موازين حسناتكوما اريدة هو اني اريد ان يظهرحوار الطابعة وذلك كي اتمكن من اختيار الطابعة ومن ثم عند ضغط موافق يتم طباعة التقرير الذي اريدة وليس واجهة البربنامج
( الفريم ) ارجوا ان يكون ذلك واضحاً ولكم شكري وتقديري لجميع اعضاء المنتدي الشيق !!!!!!!!
اعتقد انه من الممكن وضع جدول اسمه printers
تعبا بياناته بالكود من خلال تعريف متغيرات من نوع printer مثل
Dim X as Printer
حيث يوجد به رقم الطابعة واسمها
هنا هذه البيانات كيف تاتي للجدول وكيف يتعرف الآكسس على اسماء الطابعات المعرفة على الجهاز... هذا ما لا اعرفه واريد تعلمه
ساحاول وارى ما استطيع فعله!
همام
وَمِنَ النَّاسِ مَن يُعْجِبُكَ قَوْلُهُ فِي الْحَيَاةِ الدُّنْيَا وَيُشْهِدُ الله عَلَى مَا فِي قَلْبِهِ وَهُوَ أَلَدُّ الْخِصَامِ
اخي الفاضل الواصلي
جرب هذا البرنامج فقد تجد فيه ما تريد
1. اختر التقرير المطلوب
2. في حالة المعاينة اضغط على معاينة التقرير
3. في حالة طباعة التقرير المططلوب اختر نوع الطابعة المتوفره لديك ثم اضغط زر الطباعة
اليس هذا ما تريده
اذا لم يكن هذا هو المطلوب فأتمنى اخبارنا ماذا تريد ان تفعل بالضبط حتى يتم برمجة الخطوات التي تريدها حرف حرف حتى نصل للمطلوب
شكراً لك اختي زهرة وهذا جميل ولكن لا ريد ان يعرف المستخدم اسما التقارير التي داخ لابرنامج حيقث ان بعض التقارير باسم اجنبي وبعض التقارير تستوجب فتح فريم لتحديد رقم معين وخلافة واحياناً ارغب في طبع من صفحة الي صفحة فكم اتنمي ان تكون الطباعة كما ارغب وهي عن طريق مربع حوار الطابعة ثم تحديد الطابعة ومن ثم تحديد الصفحات ان كان ذلك ممكن ؟؟؟
اخي الواصلي
لا يوجد اي مشكلة اخي الكريم طالما ان هذه هي رغبتك فلن يعجزنا برنامج الاكسيس عن مثل هذه الأمور البسيطه
كل ما عليك هو وضع هذا الكود البسيط في حدث عند النقر على زر امر الطباعة وانظر النتيجه الفوريه
Private Sub PRINT_Click() DoCmd.SelectObject acReport, "REPORT1", True DoCmd.RunCommand acCmdPrint End Sub
وهذا ملفك بعد التعديل
شكراً الف الف شكر اختي زهرة ( انت والله زهرة الخير ) جزاك الله كل خير نعم هذا هو المطلوب فعلاً
انه يعمل بشل جيد ولكن عندما غيرت خصائص النموذج افي شكلي او مشروط الي نعم لم يعمل بشكل الجيد هل هناك حل لهذا ؟
انه يعمل بشل جيد ولكن عندما غيرت خصائص النموذج افي شكلي او مشروط الي نعم لم يعمل بشكل الجيد هل هناك حل لهذا ؟
وذلك كما هو مرفق
الواصلي كتب:انه يعمل بشل جيد ولكن عندما غيرت خصائص النموذج افي شكلي او مشروط الي نعم لم يعمل بشكل الجيد هل هناك حل لهذا ؟انه يعمل بشل جيد ولكن عندما غيرت خصائص النموذج افي شكلي او مشروط الي نعم لم يعمل بشكل الجيد هل هناك حل لهذا ؟
وذلك كما هو مرفق
اخواني الا يوجد حل لهذا الموضوع
الواصلي كتب:اخواني الا يوجد حل لهذا الموضوع
اخي الفاضل الواصلي
السلام عليكم ورحمة الله وبركاته
لقد حاولت بشتى الطرق للحل هذه المشكله ولكن كل الطرق لم تنفع والسبب في ذلك اخي الكريم هو لابد ان يكون التقرير هو المختار بمعنى يكون نشيط وفي حالتك انت النموذج هو النشيط دائما ولا يوجد مجال لجعل التقرير ان يكون نشيط حتى لو تحايلنا عليه بالكود البرمجي فما زال النموذج هو منبثق وشكلي او مشروط وفي هذه الحالة الطابعة تطبع الكائن النشط فقط .
كما انك تريد من البرنامج ان يطبع التقرير وهو مغلق وطبعا هذا لا يمكن تحقيقه .
لهذا حاول ان تتنازل عن بعض الختيارات لتحصل على خصائص مقابله لها بمعنى جرب التنازل عن منبثق وحاول اطبع التقرير او تنازل عن شكلي او مشروط ومن ثم اطبع التقرير .
هذا الموضوع مغلق.
المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية
جارٍ التحقق من المتواجدين…
