[ تمت الإجابة ]كيفية معرفة إحتواء التقرير على بيانات للطباعة أم لا ؟

وعليكــم السـلام ورحمة الله وبركاتـه..

أخي لاحظ ملفك بعد التعديل في التقرير Report1 في حدث عند عدم وجود بيانات

آمل أن أكون أفدتك ...

Report_Print_view.rar

أخى bakkar2000

استخدم الكود التالى عند الضغط على زر الأمر View

	Dim c
	c = DLookup("s", "Query1")
	If (IsNull(c)) Then
		MsgBox "عفواً لا توجد بيانات" 
		Cancel = -1
	Else
	DoCmd.OpenReport "Report1", acViewPreview, "", "", acDialog
	End If

بالتوفيق

بســم الله الـرحمــن الرحيــم

أخى  / أبو رهف أسف لكنك لم تأتى بجديد

أخى الكريم / هانى عوض

شكراً لك أفدتنا بتطبيق الفكرة لكن للأسف لم تفلح لأنة تم تحميل التقرير أولاً 

لكن ما اريده هو عدم تحميل التقرير أصلاًعند عدم إحتواءة على بيانات لذلك لجأنا للأزرار فى النموذج

أرجوا المحاولة من خلال فكرة من أفكارك المنيرة

جزاك الله خيراً 

يا أخى bakkar2000 راجع الكود مرة أخرى... فالكود لا يوجد به أى خطأ

ومرفق ملفك بعد التعديل

تحياتى

HUpReport_Print_view.rar

بســم الله الـرحمــن الرحيــم

أخى الكريم / محمد عوض 

السلام عليكــم ورحمـة الله وبركاتــه ،،

مثالك بالفعل رائع مثلك بارك الله لك

اقتباس

أخى الكريم / محمد عوض

السلام عليكــم ورحمـة الله وبركاتــه ،،

مثالك بالفعل رائع مثلك بارك الله لك

فعلاً المثال رائع .. ولكنك بالتأكيد تقصد هانى عوض.

تحياتى

محمد ندا