السلام عليكم ورحمة الله وبركاته
اتذكر ان هناك موضوع في حالة كون نتيجة حقل فارغ تظهر فيه عبارة لا يوجد
فمن لدية الخبرة افادتنا
في حالة كون الحقل فارغ فإن التقرير سيكون فارغ أيضا
والمطلوب جعل النص في الحقل الفارغ به عبرة لا يوجد
وشكرا لكم مقدما
السلام عليكم ورحمة الله وبركاته
اتذكر ان هناك موضوع في حالة كون نتيجة حقل فارغ تظهر فيه عبارة لا يوجد
فمن لدية الخبرة افادتنا
في حالة كون الحقل فارغ فإن التقرير سيكون فارغ أيضا
والمطلوب جعل النص في الحقل الفارغ به عبرة لا يوجد
وشكرا لكم مقدما
الحل نعم هو المطلوب لكن الحقل في المثال على التاريخ
فكيف يكون في حقل نوع الحقل نص وليس تاريخ او رقم
اخي الكريم طلال
السلام عليكم ورحمة الله وبركاته
اليك الطريقه التالية لحل المشكله
لنفترض ان لديك جدول يسمى TA وبه عدد من الحقول مثل
A ......... نوعه نص
B ........ نوعه نص
C ........ نوعه رقم
D ........ نوعه نص
E ........ نوعه رقم
F ........ نوعه نص
كما في الصوره التالية
سنقوم الان بإنشاء استعلام مبني على هذا الجدول ونضع التعبير التالي في خانة عرض SQL
SELECT IIf([A]<>"",[A],"الحقل فارغ") AS Expr1, IIf(<>"",,"الحقل فارغ") AS Expr2, IIf([C]<>0,[C],"الحقل فارغ") AS Expr3, IIf([D]<>"",[D],"الحقل فارغ") AS Expr4, IIf([E]<>0,[E],"الحقل فارغ") AS Expr5, IIf([F]<>"",[F],"الحقل فارغ") AS Expr6, * FROM TA;
السبب في استخدام هذا التعبير هو وضع كلمة الحقل فارغ والتعويض عنها للقيم الخالية في الجدول وكما تعلم لو تم انشاء استعلام مبني على الجدول فستظهر القيم الخالية كما هي في الاستعلام ولكن بواسطة هذه الطريقة سنلاحظ النتيجة كما في الصوره
نقوم الان بإنشاء التقرير وهو مبن على الاستعلام وسيظهر لنا التقرير كما في الصوره
ملاحظة : الحقول الفارغة والتي تظهر بألوان مختلفه هي نتيجة استخدام التنسيق الشرطي في حالة كون الحقل فارغ من البيانات وتستطيع الاستغناء عنها بحذف التنسيق الشرطي اي تكون بلا الوان
وهذه الامثله المطلوبه
هذا المثال لنسخة اوفيس 2003
وهذا المثال هو نفسه ولكن بنسخة اوفيس 2000
اختكم
زهره
الاخ العزيز
لا تشغل بالك كثيراً
ما عليك الا ان تكتب @;"الحقل فارغ" في خاصية التنسيق لمربع النص في التقرير فقط وستفي بالغرض ان شاء الله
أحمد
الاخت زهرة
كيف ممكن يكون في حقل نوعه مذكرة
على فكرة الجدول يكون فارغ بالكامل
اخي الفاضل طلال
السلام عليكم ورحمة الله وبركاته
تم تعديل المثال السابق وجعل حقل النص والرقم " مذكره " لتستوعب اكبر كميه من البيانات سواء في الجدول او النموذج او التقرير مع وضع التنسيق الشرطي اذا كان الحقل فارغ تظهر عبارة " الحقل فارغ " وتستطيع الكتابه فيه وبهذا تختفي عبارة " الحقل فارغ " من الحقل واليك المثال بعد التعديل
اختكم
زهره
بارك الله فيكم...
في حالة اذا ماكان التقرير بالكامل ليس فيه بيانات فانه يظهر كلمة error
ولمنع ذلك فقد كنت استخدم الكود التالي عند الحدث On No Data:
msgbox "لا توجد بيانات بالتقرير" cancel = true
وذلك حتى تظهر الرسالة وتمتنع طباعة التقرير
وعند تكرار نفس الشئ في قاعدة بيانات جديدة لم ستجب لهذا الامر وظهرت رسالة تقيد بوجود خطأ برمجي فما هو السبب ؟؟
طبتم واهتديتم :)
===================================
إقرأ معي
رابط متجدد لكتاب أقرؤه فشاركني فيه
======
فضائح الرافضة ومخازيهم حين يكتب عنها أحد خصومهم فهذا شيء متوقع ،فإن كتب عنها أحدهم فهو شيء غير مألوف ، وإن كان الكاتب أحد مراجعهم وأخص خواصهم فهذا شيء متناهي الغرابة ، وإن علمت أن الكاتب قد قتل بعد نشر الكتاب فقد حان وقت قراءة الكتاب
الكتاب :
حسين الموسوي - لله تم للتاريخ ، كشف الأسرار وتبرئة الأئمة الأطهار
اضغط على الصورة لتحميل الكتاب
-----------
كتب سابقة
اختي الكريمة ..
هو سؤال ذو مقدمة.
ملخص السؤال هو..
لماذا لا يعمل الكود
cancel =true
رغم انه كان يعمل في قاعدة بيانات سابقة
وكانت وظيفته عدم فتح التقرير عند عدم وجود بيانات.
شكرا :D
طبتم واهتديتم :)
===================================
إقرأ معي
رابط متجدد لكتاب أقرؤه فشاركني فيه
======
فضائح الرافضة ومخازيهم حين يكتب عنها أحد خصومهم فهذا شيء متوقع ،فإن كتب عنها أحدهم فهو شيء غير مألوف ، وإن كان الكاتب أحد مراجعهم وأخص خواصهم فهذا شيء متناهي الغرابة ، وإن علمت أن الكاتب قد قتل بعد نشر الكتاب فقد حان وقت قراءة الكتاب
الكتاب :
حسين الموسوي - لله تم للتاريخ ، كشف الأسرار وتبرئة الأئمة الأطهار
اضغط على الصورة لتحميل الكتاب
-----------
كتب سابقة
اخي ايهاب عثمان
السلام عليكم ورحمة الله وبركاته
اعتقد ان هذا الكود يجب ان يوضع في حدث عند عدم وجود بيانات في التقرير لكي لا تتم الطباعة بهذه الطريقه
Private Sub Report_NoData(Cancel As Integer)
MsgBox ("لا توجد بيانات للطباعة")
Cancel = True
End Subاما عند عدم وجود بيانات في التقرير ولا تريده ان يظهر فإستخدم هذا الكود في حدث عند عدم وجود بيانات في التقرير
DoCmd.SetWarnings False MsgBox "عفواً.. لا توجد بيانات", vbCritical + vbOKOnly, "تنبيه" DoCmd.CancelEvent DoCmd.SetWarnings True
هذا الكود يقوم في بدايته بإيقاف رسائل خطأ الاكسيس ثم يتأكد هل هناك بيانات في التقرير ام لا ومن ثم يظهر لك الرساله بأنه لا توجد بيانات في التقرير ثم يتولى الكود الذي بعده عملية الاغلاق ومن ثم اعادة تشغيل رسائل الخطأ للاكسيس
او تضع هذا الكود في حدث عند عدم وجود بيانات في التقرير
On Error Resume Next MsgBox "لا توجد بيانات في التقرير", , "تنبيه" DoCmd.CancelEvent
هذا الكود مهمته عند وجود اخطأ ينتقل مباشرة لاظهار الرساله " لاتوجد بيانات في التقرير " ومن ثم يقوم بعملية الاغلاق
حاول تجربة الاكواد وان شاء الله تسير الامور معاك على خير
اختكم
زهره
تم تعديل هذه المشاركة بواسطة zahrah في 8 سبتمبر 2005 في 15:03
لا داري ما اقول
غير ان ادعو لك بالبركة
وان يتحمل الله عنا مالك علينا من حق في نشر العلم وافادة الجميع
طبتم واهتديتم :)
===================================
إقرأ معي
رابط متجدد لكتاب أقرؤه فشاركني فيه
======
فضائح الرافضة ومخازيهم حين يكتب عنها أحد خصومهم فهذا شيء متوقع ،فإن كتب عنها أحدهم فهو شيء غير مألوف ، وإن كان الكاتب أحد مراجعهم وأخص خواصهم فهذا شيء متناهي الغرابة ، وإن علمت أن الكاتب قد قتل بعد نشر الكتاب فقد حان وقت قراءة الكتاب
الكتاب :
حسين الموسوي - لله تم للتاريخ ، كشف الأسرار وتبرئة الأئمة الأطهار
اضغط على الصورة لتحميل الكتاب
-----------
كتب سابقة
اخي ايهاب عثمان
وبقية الاخوان جميعا
هذا مثال لتلافي رسائل الخطأ في التقارير سواء عند المعاينة او عند الطباعة مع امكانية وضع اطار محيط للتقرير وكذلك تضليل حقل بلون وتضليل الاخر بلون اخر تختاره لتعم الفائده للجميع
اختكم
زهره
الأخت زهرة جزاك الله خير على جهودك
المطلوب لدي جدول به حقل رئيس من نوع مذكرة وهو حقل وحيد
في كون هذا الحقل فارغ اي لا يوجد سجلات
أن يظهر في التقرير مكانه عبارة لا يوجد
جزاك الله خيرا نعم هو المطلوب
هذا الموضوع مغلق.