[ تمت الإجابة ]كيف لي ان اعمل تقرير يظهر لي السجل الذي عليه العمل

اختي الفاضله

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

ضعي في حدث عند النقر للزر الذي في النموذج والذي من خلاله يتم فتح تقرير الخاص بكِ مثلا ليكن اسم التقرير هو ReNeme الكود التالي ..

- لمعاينة التقرير على السجل الحالي الذي في النموذج

إذا أردت عمل ذلك على حقل نوعه رقمي واسم الحقل مثلا ID فنضع الكود التالي .. تحت زر الأمر الذي في النموذج

Dim stLinkCriteria As String
stLinkCriteria = "[ID] =" & Me![ID]
DoCmd.OpenReport "ReNeme", acViewPreview, , stLinkCriteria

وإذا رغبتي عمل ذلك على حقل نوعه نصي واسم الحقل مثلا Name1 فنضع الكود التالي تحت زر الأمر الذي في النموذج

Dim stLinkCriteria As String
stLinkCriteria = "[Name1]=" & "'" & Me![Name1] & "'"
DoCmd.OpenReport "ReNeme", acViewPreview, , stLinkCriteria

لاحظي الفرق بين الحقل الرقمي والحقل النصي فطريقتهم مختلفة قليلا في علامات التنصيص ""

بالتوفيق

zahrah كتب:

اختي الفاضله

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

ضعي في حدث عند النقر للزر الذي في النموذج والذي من خلاله يتم فتح تقرير الخاص بكِ مثلا ليكن اسم التقرير هو ReNeme الكود التالي ..

- لمعاينة التقرير على السجل الحالي الذي في النموذج

إذا أردت عمل ذلك على حقل نوعه رقمي واسم الحقل مثلا ID فنضع الكود التالي .. تحت زر الأمر الذي في النموذج

Dim stLinkCriteria As String
stLinkCriteria = "[ID] =" & Me![ID]
DoCmd.OpenReport "ReNeme", acViewPreview, , stLinkCriteria

وإذا رغبتي عمل ذلك على حقل نوعه نصي واسم الحقل مثلا Name1 فنضع الكود التالي تحت زر الأمر الذي في النموذج

Dim stLinkCriteria As String
stLinkCriteria = "[Name1]=" & "'" & Me![Name1] & "'"
DoCmd.OpenReport "ReNeme", acViewPreview, , stLinkCriteria

لاحظي الفرق بين الحقل الرقمي والحقل النصي فطريقتهم مختلفة قليلا في علامات التنصيص ""

بالتوفيق

بارك الله فيك اختي ولكن تطلع لي رسالة خطأ

اختي الفاضله

بالتأكيد وانا اختك لا بد ان تظهر لكِ رسالة الخطأ اذا كنتي عملتي كما في الصوره

اولا : ضعي الثلاثة اسطر تحت بعض كما هي في الكود وليست في سطر واحد

ثانيا : انا وضعت لكِ امثله من اسماء الحقول فمثلا Name1 هو حقل نصي

استبدليه بما هو لديك في النموذج وفي التقرير فقد يكون ان اسم الحقل النصي لديك مختلف إلا اذا كان اسم الحقل الخاص بك هو Name فأتركيه كما هو ولا تغيريه ولو ان لي بعض الملاحظات على اسم هذا الحقل لأن كلمة Name محجوزه اساسا في برنامج الأكسيس ويفضل تغيير اسم الحقل الى مثلا sName

ثالثا : اسم التقرير الموجود في الكود هو Rename استبدليه بإسم التقرير الخاص بك

zahrah كتب:

اختي الفاضله

بالتأكيد وانا اختك لا بد ان تظهر لكِ رسالة الخطأ اذا كنتي عملتي كما في الصوره

اولا : ضعي الثلاثة اسطر تحت بعض كما هي في الكود وليست في سطر واحد

ثانيا : انا وضعت لكِ امثله من اسماء الحقول فمثلا Name1 هو حقل نصي

استبدليه بما هو لديك في النموذج وفي التقرير فقد يكون ان اسم الحقل النصي لديك مختلف إلا اذا كان اسم الحقل الخاص بك هو Name فأتركيه كما هو ولا تغيريه ولو ان لي بعض الملاحظات على اسم هذا الحقل لأن كلمة Name محجوزه اساسا في برنامج الأكسيس ويفضل تغيير اسم الحقل الى مثلا sName

ثالثا : اسم التقرير الموجود في الكود هو Rename استبدليه بإسم التقرير الخاص بك

انتي عارفة الإشكال اللي حصل لي

انه لما انسخ الكود من هنا اعمل له لصق في الأكسس يطلع بسطر واحد :)

بارك الله فيك اختي وألف شكر لك تم العمل بالشكل المطلوب

ووالله العظيم ماحصلت مثلك في هالمنتديات ابد

انتي استاذة عظيمة بكل ماتحمله هالكلمة من معنى ويشرفني بأنني أتعلم منك

بارك الله فيك والله يستر عليك

ولكن لدي سؤال آخر بسيط إن شاء الله

العمل الذي هذا لمعاينة التقرير حلو ؟

لو ابغى مثلا في الطباعة ماهو الكود اللازم يا اختي

بارك الله بك أختي الكريمه

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

اذا اردت الطباعه

فكل ما عليك هو نسخ الكود السابق بنفس الطريقة مع تعديل كلمة

acViewPreview

بـ

acViewNormal

حيث الأولى للمعاينة

والثانية للطباعة

بارك الله فيك اختنا ومعلمتنا الفاضلة د / زهرة

سعداء جداً بوجودك بيننا .. اسعدك الله في الدنيا والآخرة

ما شاء الله عليك .. سباقة للخير دائماً ... وانا احاول ان اوضح للاخت السائلة رأيت ردك ... ولكن هي فرصة لأن ارحب بمعلمتنا الغالية

فمرحباً بك ام عهود بين اخوانك وتلاميذك

بارك الله فيك

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

يوسف احمد كتب:

بارك الله فيك اختنا ومعلمتنا الفاضلة د / زهرة

سعداء جداً بوجودك بيننا .. اسعدك الله في الدنيا والآخرة

ما شاء الله عليك .. سباقة للخير دائماً ... وانا احاول ان اوضح للاخت السائلة رأيت ردك ... ولكن هي فرصة لأن ارحب بمعلمتنا الغالية

فمرحباً بك ام عهود بين اخوانك وتلاميذك

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

كلكم فيكم الخير والبركة وماقصرت ام عهود

السلام عليكم شكرا لك اختي الدكتورة زهرةبارك الله بك وادامك قرأت موضوع الاحت حول مشاهدة التقرير او طباعته وجربت على برنامجي نفس الخطوات ولكن ظهرت رسالة خطأ لا اعرف لماذاارجو المساعدةاختك سلاف - سوريا

اخراج مواد دعاية11.rar

بعد اذن اختنا الفاضلة زهرة

النموذج الذى وضعتى صورته يعمل بشكل جيد و لا يوجد به اى خطأ

و لكن يوجد خطأ بسيط فى نموذجين اخرين و لقد تم تعديل الخطأ

اخراج مواد دعاية11.rar

للاسف اخي الكريملم تنجح العملية والملف ما زالت المشكلة به

لا اعرف اختى العزيزة

فالتقرير يفتح معى بدون اى مشاكل كما فى الصورة

يمكنك ان تضغطى debug

لترى مكان الخطأ بالضبط حتى يمكننا معرفة السبب

اخي الفاضلة سلاف

تفضلي برنامجك بعد التعديل

-UPاخراج مواد دعاية11.rar

الاخت الفاضلة والكريمة زهرةادامك اللهجربت الملف التي ارسلتيه لي ولكن الخطا مازال كما في الصورةوكل الشكر لك اختي

11up.rar

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

اعتقد و الله اعلم بانه عند الضغط لطلب طباعة التقرير يتم الالغاء اتماتيك دون تدخل المستخدم

و هذا العيب لا اعتقد بانه في البرنامج انما في نظام التشغيل

جربي تشغيل البرنامج على جهاز اخر و شوفي بعد تعديل الاخوه ما ذا يحصل معك

لاني جربت الملفات المرفقه و اشتغلت بشكل طبيعي

أختي الفاضلة سلاف

البرنامج يعمل بشكل سليم

فقد قمت بتجربته على اكسيس 2003 و اكسيس 2007

كما انني جربت معاينة وطباعة نموذج اخراج مستحضرات ولا يوجد بها اي مشكله

حاولي القيام بتجربة البرنامج على جهاز آخر كما قال لك الأخوة الكرام و سترين انه يعمل بشكل ممتاز