الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

كيف افتح تقرير من نموذج

مغلق
بدأه سامي الحربي في 20 فبراير 2002 · 12 رد · 914 مشاهدة · في مراجعة المواضيع
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

كيف استطيع ان افتح تقرير من نموذج بشرط ان يفتح التقرير على نفس السجل المفتوح في النموذج

اي هناك نموذج به عدد 10 سجلات والنموذج المفتوح على السجل رقم 7 والمطلوب ان افتح التقرير من النموذج على سجل رقم 7 ويكون على الطابعة مباشرة وليس في طريقة التصميم أو المعاينة

وشكرا

#2

ولنفرض أن :

1 _ المفاح الأساسي في الجدول هو رقم الموظف

2 _ اسم النموذج نموذج الموظفين

3_ واسم مربع النص على النموذج رقم الموظف

أنشيء استعلام وضع فيه الحقول التي تريد أن تظهر في التقرير وفي صف معايير في الإستعلام تحت حقل المفتاح الأساسي أكتب

[forms]![نموذج الموظفين]![رقم الموظف]

4 _أنشيء تقرير مبني على ذلك الأستعلام واسمه مثلاً تقرير عن موظف0

5 _ ضع زر أمر على النموذج واكتب عنوانه طباعة معلومات الموظف الحالي0

6_ أكتب في حدث النقر الخاص بزر الأمر التالي:

     DoCmd.OpenReport "تقرير عن موظف", acViewNormal, "", "", acNormal

جرب واخبرنا هل هذا ما تريد

#3

الاخ 5060

شكرا على ردك

ولكن للاسف لم استطع عمل المطلوب لا اعلم اين الخلل

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

وشكرا على الاهتمام

#4

الأخ سامي

لا مجال للأسف إن شاء الله

طريقتك صحيحة ما عدى الأتي :

أجعل مصدر النموذج (( الجدول )) وليس الاستعلام

عدل التعبير في الإستعلام كالتالي:

 [forms]![ 1 ]![ 2]

استبدل الرقم " 1 " باسم النموذج و " 2 " باسم مربع النص الخاص برقم الموظف الموجود على النموذج أو أنسخ التعبير الموجود في الرد السابق وألصقه في الإستعلام

ملاحظة :

السبب أن الطريقة لم تتم معك بالشكل الصحيح هي أن رقم الموظف يأتي في النهاية بمعنى أبدأ الكتابة من اليمين افتح قوس مربع واكتب Forms ثم أغلق القوس وضع علامة تعجب ثم أفتح قوس مربع وضع اسم النموذج " الموظفين " ثم أغلق القوس ثم علامة تعجب ثم أفتح قوس مربع ثم اسم مربع النص الموجود على النموذج والمسمى " رقم الموظف " 0000 واضح 000

أخبرنا بالنتيجة

#5

طرق أخرى :

ضع في حدث نقر زر أمر :

DoCmd.OpenReport "اسم التقرير", acViewPreview, , , acHidden
Reports![اسم التقرير].Filter = "تسلسل=" & Me![تسلسل]
Reports![اسم التقرير].FilterOn = True
DoCmd.OpenReport "اسم التقرير"
DoCmd.Close acReport, "اسم التقرير"

طريقة ثانية :

في حدث عند نقر زر أمر ضع :

DoCmd.OpenReport "اسم التقرير", , , , , "طباعة سجل محدد"

وفي حدث عند الفتح للتفرير ضع :

If Me.OpenArgs = "طباعة سجل محدد" Then
Me.Filter = "تسلسل=" & Screen.ActiveForm![تسلسل]
Me.FilterOn = True
End If

وللجميع تحياتي

#6

الأخ ابو حمود

ياليت تعطي فكرة عن عبارة " Args " لأنني صراحة أجهل هذه العبارة وعملها0

و شكرا

#7

Args هي كلمة تستخدم في النماذج والتقارير عند فتحها لتحديد الكائن الذي فتحها أو للتحقق من شرط معين ، وبالإمكان أن تكون نص أو رقم أو صح أو خطأ وذلك لتطبيق شيء معين على النموذج أو التقرير المفتوح ، ففي المثال السابق طبقنا عليه الفلتر في حالة كون OpenArgs تساوي "طباعة سجل محدد" .

إذا كان لك سؤال عنها فأسأل .

ولك تحياتي

#8

الاخ الكريم 5060

اشكرك لتعاونك فلقد تم الامر بكل سهوله بعد تواصلك معي ولك كل الشكر والتقدير

الاخ ابو حمود

حاولت بجميع الطرق الموضحة من قبلكم ولكن دون جدوى هل هذة الطريقة تنطبق على طريقة الاخ 5060 بأن اعمل استعلام و....

ام بدون استعلام فأنا جربتها مباشرة بنفس النموذج المشروح من قبل 5060 ولم افلح ارجوا التوضيح

#9

الأخ ابو حمود

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

*********************************************

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

تحياتي للجميع

#10

الأخ سامي

الطريقتين اللتين ذكرت لك لاتستخدمهما مع طريقة الأخ 5060 ، فطريقته هي في مصدر التقرير والتي ذكرت لك بدون استخدام العبارة الاسنادية التي ذكرها 5060 وبمعنى آخر امسح هذه العبارة :

[forms]![ 1 ]![ 2]

ولايهم عندها كون مصدر التقرير استعلام أو جدول .

ولك تحياتي

#11

السلام عليكم...

ضع هذه في الاستعلام الذي ياتي منه التقرير

Like [Forms]![[Form01]![sRNO]

جرب ورد علي خبر..

وشكراً

(g)

#12

الاخ الكريم نعم / لا

وإن شاء الله ماتقول لا

لم افهم طريقة تماماً ولكن نسخت الكود الذى ذكرت ووضغته مفي خانة رقم الصنف في الاستعلام الذي هو مصدر للتقرير دون اي تغيير في محتوياته ((هل عملي صحيح)) ولكن عند تشغيل النموذج المطلوب منه اصدار التقرير تظهر رسالة مفادها { ادخل قيمة معلمة }

واسمح لي ان اسألك سوال وهو

لدي خمسة جداول

1- الاختصارات

2- المخزن

3- المبيعات

4- المشتريات

5- المرتجعات

ويحتوي كلا منها على عدة حقول ولكن الأهم حقلين بها جميعا وهي

1- رقم الصنف (مفتاح أساسي)

2- اسم الصنف (مفتاح أساسي)

والجدول الرئيسي هو الاختصارات بحيث إذا سجلنا أي رقم واسم صنف به مباشرة تظهر في الجداول الأخرى

راجى من الله العلى الكريم ان ينفع بك المسلمين لمى يحبه الله ويرضاة وان تنال الاجر الكبير

وشكرا

واسف على تأخري في الرد

#13

السلام عليكم

اشكر لك الاهتمام بالموضوع وجزاك الله خير

البريد هو ويفظل على اكسس 2000 اذا امكن

s1s2mh@hotmail.com

هذا الموضوع مغلق.

مواضيع مشابهة