التقارير ومشكلة اكسس2002

شوف اخي البرنامج في 2000 يعمل ولكن عن التحويل

اذا كنت تعمل وكانت الواجهة باللغة العربية فسوف يكون هنالك مشكله عند التحويل

والحل هو ان تقوم برجوع الى النسخة 2000 وتذهب الى الوحدات النمطية وتغير جميع الكتابة من اللغة العربية ... الى اللغة الانجليزيه

مثال : عندك جدول الطلاب = students

ما لازم يكون فيها عربي

وعندك الحقل رقم الطالب = stdNo

عزيزي شكرا لردك ولكن المشكلة ماعندي شيئ في الكود مكتوب باللغة العربية

المشكلة عندي فقط عند طباعة تقرير والبرنامج مشغل بواسطة اكسس 2002

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

ترا مالمشكلة ومالحل؟

السلام

تحية وبعد

اخي الكريم :

ارجو التأكد من خائص التقرير هل هو منبثق ان كانت نعم غيرها الى لا

او انشئ تقرير آخر ان كنت تحتاج الى تقرير منبثق

وشكراً

أحسنت ياطيب الله يوفقك لكل مافيه خير وصلاح

صراحة حليت لي مشكلة تاعبتني من زمان

وكلمة شكر لاتكفي في حقك

تحياتي لك

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

------------------------------------------------------------------------------------------

Sub PrintInvoice_Click()

Dim strDocName As String

strDocName = "Invoice"

Dim I As Integer

I = MsgBox("هل تريد معاينة التقرير ?", vbYesNo, strlbl)

If I = vbYes Then

DoCmd.OpenReport strDocName, acViewPreview, "Invoices Filter"

Else

DoCmd.OpenReport strDocName, acViewPreview, "Invoices Filter"

DoCmd.PrintOut acPrintAll

SendKeys "%{F4}", True

End If

End Sub

-------------------------------------------------------------------------------------------

أى أن الحل هنا

DoCmd.PrintOut acPrintAll

SendKeys "%{F4}", True

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

مع تحياتي