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

أواجه مشكلة بخصوص برنامج صانع التقارير

مغلق
بدأه مازن مصطفى في 26 يوليو 2007 · 11 رد · 1,851 مشاهدة · في قواعد بيانات Microsoft Access
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

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

الأخوة الأعزاء أعضاء ومشرفى ومراقبى منتدانا الحبيب

يوجد بالمنتدى برنامج صانع التقارير (مثال أجنبي ) وقام بتعريبه ووضعه بالمنتدى أخينا كمال النحال بارك الله له

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

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

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

/index.php?showtopic=132702

db3.rar

#2

خي الكريم لم تربط مكتبة الداتا بيس

microsoft ado 3.6 object library

والبرنامج شغال الان

db3.rar

من سار على الدرب وصل

#3

اخي الفاضل مازن

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

اقتباس
يوجد بالمنتدى برنامج صانع التقارير (مثال أجنبي ) وقام بتعريبه ووضعه بالمنتدى أخينا كمال النحال بارك الله له

هذا البرنامج موجود في مكتبة منتدى الأكسيس منذ سنتين Mar 1 2005, 09:22 PM

/index.php?showtopic=58236

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

صانع التقارير رقم 1

الملف المرفق report_bild1.rar ( 40.38k ) عدد مرات التحميل: 2659

صانع التقارير رقم 2 المطور

الملف المرفق report_bild2.rar ( 61.78k ) عدد مرات التحميل: 3166

وقد تم عليه العديد من الإضافات والتحسينات في المشاركات سواء في طريقة استخدامه او في زيادة عدد الحقول حتى وصلت الى 13 حقل وليس 6 حقول فقط

انظر هذا الرابط

/index.php?showtopic=111876

وهذا مثال كامل

zaReportManagerProv.rar

#4

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

أولاً : الأخت الفاضلة الكريمة الأمبراطورة زهرة كوكب المنتدى أشكرك جداً وبارك الله لكى لما تقدميه لرعاياكى وكما تعلمى أختى الفاضلة بأننى حديث العهد بالمنتدى والأكسيس وقد لفت نظرى برنامج صانع التقارير عند تصفحى للمواضيع وأعجبتنى الفكرة كى أستفيد بها فى برنامجى والشكر والدعاء لأبو هاجر على مجهودة والشكر الخاص لحضرتك وقمت بتحميل جميع المشاركات فى هذا الشأن وأعجبنى جداً مشاركتك بالملف zaReportManagerProv وجارى تطبيقه على برنامجى الخاص وأوافى سيادتك بالنتيجة وإن شاء الله ستكون مبهرة مثلك .

ثانياً : أخى الكريم مفرج أشكرك على مرورك الكريم وحلك للغز الذى حيرنى وفعلاً الملف المرفق شغال لكن للأسف لم أفهم قصدك بربط مكتبة الداتا بيس microsoft ado 3.6 object library

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

وشكراً .

#5

أخي الفاضل مازن

اقتباس
ثانياً : أخى الكريم مفرج أشكرك على مرورك الكريم وحلك للغز الذى حيرنى وفعلاً الملف المرفق شغال لكن للأسف لم أفهم قصدك بربط مكتبة الداتا بيس microsoft ado 3.6 object library

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

ما يقصده الإستاذ مفرج هذا شرحه بالصور

1. افتح النموذج في وضع التصميم

2. اضغط على المفتاحين ALT + F11 من لوحة المفاتيح وسوف يفتح لك محرر الفيجول بيسك الذي نضع به الأكواد

3. من شريط القوائم العلوية اختر TOOLS ثم اختر References وتعني المكتبات

post-15367-1185503451_thumb.gif

4. بعد الضغط على References ستفتح لك نافذة المكتبات اختر منها Microsoft DAO 3.6 Object Library وضع امامها علامة الصح فقط ثم اغلق النافذه وقم بتشغيل القاعدة .

post-15367-1185503674_thumb.gif

#6

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

الشكر قليل على الأمبراطورة لكن دعواتى الكثيرة لكى ودائماً فى الأفق الأعلى من التميز شرح جميل يليق بالعظماء ياأجمل زهرة

وسأكون ثقيل وأسأل سؤال آخر فى نفس الموضوع وأرجو عدم الغضب من أسألتى فهل هناك طريقة لأظهار حقول الجدول المختار بالأسم التوضيحى بالعربى مثال حقل (neam) مثلاً فى الأسم التوضيحى (الأسم) ، (id) (الرقم) وهكذا لباقى حقول الجدول .

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

وشكراً

#7

الأخت الغالية الأمبراطورة

هل سؤالى ليس له أجابه أم أصبحت أسئلتى غير مفهومه وأصبحت ثقل على مهامك

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

#8

اخي الفاضل مازن

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

اقتباس
هل سؤالى ليس له أجابه أم أصبحت أسئلتى غير مفهومه وأصبحت ثقل على مهامك

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

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

واجابة على اسئلتك السابقة

اقتباس
وسأكون ثقيل وأسأل سؤال آخر فى نفس الموضوع وأرجو عدم الغضب من أسألتى فهل هناك طريقة لأظهار حقول الجدول المختار بالأسم التوضيحى بالعربى مثال حقل (neam) مثلاً فى الأسم التوضيحى (الأسم) ، (id) (الرقم) وهكذا لباقى حقول الجدول .

لم تحدد الكائن المطلوب اظهار التسمية فيه هل هو مربع القائمة في النموذج ام في التقرير

اذا كان في النموذج في مربع القائمة فلا يمكن لأن تسميات الحقول هي عبارة تسميات افتراضية Fields مأخوذه من الجدول المخفي TableFields لهذا لا يمكن تغيير اسماء هذه الحقول وإلا لن تحصل على حقول مختاره من القائمة كما ان هناك أمر آخر وهو ان الكود البرمجي يقوم بإنشاء استعلام مؤقت وقت الحاجة وبعد اختيار الحقول المطلوبه لعرضها في التقرير وعند الضغط على مسح القائمة يتم حذف الإستعلام المؤقت مباشرة .

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

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

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

zaReportManagerProv_UP.rar

ملاحظة :

اقتباس
الأخت الغالية الأمبراطورة

اتمنى في المشاركات القادمة ان شاء الله عدم وضع مثل هذا التعبير لأنني لا زلت مبتدأه وأجهل الكثير

فيكفي ان تقول فقط الأخت الفاضله زهره - او تقول الأخت زهره فهذا افضل .

#9

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

الأخت الفاضلة زهرة المنتدى

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

ثانياً : بخصوص تلقيبك بالأمبراطورة فكما تتذكرى فى أول مشاركة لى بالمنتدى وبعد حلولك الرائعة والسهلة والمفيدة ذكرت بأننى لن أناديكى إلا بهذا اللقب لأنك تستاهلى أكثر منه 000 ولكن نزولاً لرغبه الأمبراطورة فلكى الأمر والطاعة لأن من علمنى حرفاً سيرت له عبداً يازهرة المنتدى .

ثالثاً : بالنسبة لأمنيتك أن يأتي ذلك اليوم لأراك قد اخذت مكاني في الإشراف والمراقبة لمنتديات الفريق العربي .000 فأشكرك على هذه المجامله الرقيقة لأن هذا حلم بعيد المنى وصعب جدااااااااا تحقيقه أنا نفسى فقط أن أستطيع أحفظ كيفية إدخال الأكواد وعملها لأستطيع حل مشاكلى والمساعدة بكل ماأستطيع فى هذا المنتدى الرائع وهذا هو حلمى .

رابعاً : البرنامج الذى أقوم بعمله هو لشئون العاملين بالشركة التى أعمل بها وسأقوم أنا بأستخدامه أيضاً وجميع البيانات التى تطلب هى باللغة العربية وكنت أعمل بها على الوورد ورغبت فى أستغلال البرمجة لعمل كل ماكنت أقوم به على الوورد ليعمل بالأكسيس والحقول بذلك أصبحت مشكلة فهل ليس لى أى خيار سوى تغيير الحقول باللغة العربية ؟

خامساً : سؤال آخر لو رغبت فى أن أضع عنوان للجدول المختار داخل التقرير لطباعته وهذا العنوان يتغير حسب متطلبات الحقول المختارة فكيف يتم عمل ذلك من داخل وضع مربع نص داخل النموذج ليظهر عنوان للجدول مثال فى تقرير بيانات وظيفية العنوان (بيان بمؤهلات العاملين لعام 2000) ومثال تقرير بعنوان آخر (بيانات العاملين الوظيفية) وآخر (بيان بالمسير الوظيفى للمهندس/000"أسم العامل" 0بالدرجة 00"الدرجة الوظيفية"0) وهذا الأسم والدرجة يأتى من خلال النموذج وأختياره لطباعته لوحده دون باقى العاملين .

وأشكرك جداً

#10

أخي الفضل مازن

يمكن عمل عناوين مختلفه لتقرير واحد والطريقة هي : ان تقوم اولا بعمل جدول به حقل واحد نصي وتضع به اي عناوين تريد كما في المثال المرفق ثم تقوم بعمل مربع تحرير وسرد في النموذج مبني على هذا الحقل . اما في التقرير فتقوم بإسناد تعبير الحقل في مربع نص مصدره الحقل الذي في النموذج انظر التقرير الذي في المثال .

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

طباعة او معينة السجل الحالي

/index.php?showtopic=109567

طباعة ومعاينة السجل الحالي

/index.php?showtopic=104791

معاينة السجل الحالي

/index.php?showtopic=70677

ايضا هذا الشرح من خلال المشرف فهد الدوسري

/index.php?showtopic=50618

حوار 9

= محمد : لدي تقرير اسمه مثلاً ReNeme وأريد من خلال النموذج أن أقوم بمعاينة هذا التقرير أو طباعته ولكني أريد أن يعرض لي هذا التقرير أو يطبع لي السجل المعروض حالياً على النموذج وليس جميع البيانات .. فكيف الطريقة ؟

= فهد الدوسري : لنفترض أن لديك من ضمن حقول هذا التقرير والنموذج حقل نوعه رقمي واسمه ID وحقل آخر نوعه نصي واسمه Name1 لكي نقوم بالربط بين النموذج والتقرير عن طريق أحد هذين الحقلين سواء الحقل الرقمي أو الحقل النصي فنعمل ما يلي :-

- ضع في حدث عند النقر للزر الذي في النموذج والذي من خلاله يتم فتح تقرير 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

- أما لطباعه التقرير ..

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

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

وإذا أردت عمل ذلك على حقل نوعه نصي واسم الحقل Name1 فضع الكود التالي ..

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

Tables.rar

#11

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

بارك الله فيك اختنا زهرة وحفظك

#12

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

الأخت الفاضلة زهرة كوكب المنتدى

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

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

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

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

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

عدد الزوار حالياً

المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية

—الإجمالي—أعضاء مسجّلون—زوار بدون تسجيل

جارٍ التحقق من المتواجدين…