السلام عليكم ورخمة الله وبركاته ...,
أخواني و إخوتي لدي قاعدة البيانات على الشبكة و في القاعدة هذه يوجد صور في التقارير و وضعت الصور في المجلد في القرص المحلي C:\Rep و يوجد قاعدة البيانات في المجلد C:\Shared Documents
ماهي الطريقة لإظهار الصور لدى جميع الحواسيب على الشبكة؟
وشكراً لكم
اخي الفاضل
قم بنقل مجلد الصور Rep الى المجلد الذي به قاعدة قاعدة البيانات ثم استخدم هذا الكود
Me.Pic=Application.CurrentProject.Path & "\Rep\"
بالتوفيق
شكراً لكي أخت زهرة على مرورك و على أجابتك.
لوتكرمتي أين أضع هذه الكود؟
مع العلم أن هناك آلاف الصور وتم حفظهما بمسار بالرقم التلقائي هكذا C:\Rep\5785
وجزاكي الله ألف خير
تم تعديل هذه المشاركة بواسطة Mrhb في 29 يناير 2012 في 18:16
اخي الفاضل
لنفترض ان اسم مربع الصوره هو PIC في التقرير
والمجلد الذي به الصور هو Rep
واسم حقل رقم الصوره التلقائي هو ID مثل ( 5785 )
لذا سنضع الكود في حدث عند الفتح للتقرير بهذه الطريقة
Me.Pic=Application.CurrentProject.Path & "\Rep\" & Me.ID & ".JPG"
قم بالتغيير لما هو موجود لديك من اسماء الحقول في التقرير
بالتوفيق
شكراً لكي أختي زهرة
سأجرب هذا الكود و سأخبرك غداً بعد التجربة
بارك الله بكي و الله يرحم والديك
تم تعديل هذه المشاركة بواسطة Mrhb في 29 يناير 2012 في 19:56
السلام عليكم ورحمة الله وبركاته أخي الفاضلة (( زهرة ))
أختي انا جربت الكود الذي وضعته في المشاركتك الأخيرة في حدث عند فتح التقرير و في النموذج يوجد زر للمعاينة وعند ضغط معاينة التقرير ولم يفتح أي شي
ولم ينفع معي الكود ولا أدري لماذا ...,
تم تعديل هذه المشاركة بواسطة Mrhb في 30 يناير 2012 في 14:25
Mrhb كتب:السلام عليكم ورحمة الله وبركاته أخي الفاضلة (( زهرة ))
أختي انا جربت الكود الذي وضعته في المشاركتك الأخيرة في حدث عند فتح التقرير و في النموذج يوجد زر للمعاينة وعند ضغط معاينة التقرير ولم يفتح أي شي
ولم ينفع معي الكود ولا أدري لماذا ...,
اخي الفاضل
هل استخدمت الكود كما هو ام قمت بالتغيير فيه لما يوجد لديك من اسماء الحقول في قاعدة البيانات
اذا كنت استخدمت نفس الكود كما هو فلن يعمل معك لأنني وضعته لك كمثال فقط لكي تغير فيه حسب ما هو موجود لديك من حقول
لذا ضع الحقول الخاصة بك هنا لكي نعدل الكود بناء على نفس الحقول لديك
بالتوفيق
السلام عليكم ورخة الله وبركاته أختي الفاضلة زهرة
انا جربت كودين ولم ينفع أي كود معي مع العلم أني قد غيرت أسماء الحقول كما يوجد في قاعدة البيانات
وهناك مربع صورة في التقرير بإسم imageframe و أيضاً يوجد مربع نص غير مرئي لمسار الصورة
تم تعديل هذه المشاركة بواسطة Mrhb في 30 يناير 2012 في 18:54
Mrhb كتب:السلام عليكم ورخة الله وبركاته أختي الفاضلة زهرة
انا جربت كودين ولم ينفع أي كود معي مع العلم أني قد غيرت أسماء الحقول كما يوجد في قاعدة البيانات
ضع قاعدة البيانات مع مجموعة من الصور الموجوده في المجلد ليتم التعديل عليها
او على اقل تقدير ضع مثال مشابه لما هو موجود لديك بالضبط لتقوم بعد ذلك بالتعديل بنفس الكيفية
بالتوفيق
أختي الفاضلة زهرة
هل من الممكن أن توضح لي على الكود الأخير
Pic = imageframe or Pic = imagepath او ان أتركه نفس الشي؟
وشكراً
وإني أخاول أن أرفع لك المثال غداً لأن القاعدة الأصلية حجمها أكثر من 80 م ب بدون الجداول.
تم تعديل هذه المشاركة بواسطة Mrhb في 30 يناير 2012 في 20:19
اخي الفاضل
اذا كان يوجد لديك مسار الصوره جاهز imagepath و مربع اظهار الصوره imageframe
فكل ما عليك فعله هو وضع هذا الكود في حدث عند الفتح للنموذج
Me.ImageFrame.Picture = Me.ImagePath
وسوف تظهر الصور في التقرير
بالتوفيق
أختي زهرة بارك الله بكي وشكراً لكي
يوجد نفس الكود في التقرير و التقرير يعمل بشكل جيد على الجهاز الذي فيه القاعدة البيانات و لكن لم يظهر الصور على الكمبيوتر آخر بالشبكة
مع العلم بأن النماذج ليس فيهم الصور بل يوجد مسار الصور فقط في النموذج أما الصور يوجد في المجلد C:\Rep و يوجد زر أمر في النموذج لمعاينة التقرير فيظهر الصورة عند ضغط الزر
تم تعديل هذه المشاركة بواسطة Mrhb في 30 يناير 2012 في 21:33
Mrhb كتب:أختي زهرة بارك الله بكي وشكراً لكي
يوجد نفس الكود في التقرير و التقرير يعمل بشكل جيد على الجهاز الذي فيه القاعدة البيانات و لكن لم يظهر الصور على الكمبيوتر آخر بالشبكة
مع العلم بأن النماذج ليس فيهم الصور بل يوجد مسار الصور فقط في النموذج أما الصور يوجد في المجلد C:\Rep و يوجد زر أمر في النموذج لمعاينة التقرير فيظهر الصورة عند ضغط الزر
اخي الفاضل
هل يوجد ربط بين القاعدة الرئبيسية وقاعدة الجداول !!!
بكل تأكيد يوجد هناك ربط ولهذا خذ مسار الربط ( الخاص بالجداول ) من الكمبيوتر الذي على الشبكه ثم قم بتعديله ليوافق مسار الصور وسوف تظهر الصور في التقرير
بالتوفيق
السلام عليكم ورحمة الله وبركاته أختي الفاضلة زهرة
أختي فعلاً هناك فيه الربط بين الجداول وتم نسخ القاعدة البيانات من الكمبيوتر الذي فيه قاعدة البيانات و لصقت على الأجهزة أخرى عددهما تقريباً 10 و تم ربط البرنامج من جميع الأجهزة على الشبكة مع الكمبيوتر الرئيسي و البرنامج يعمل بشكل جيد ( كل شي تمام ) بس هناك يوجد التقارير لكل سجل صورة من تقريره مأخوذه من الأسكانر و تم حفظها في المجلد C:\Rep فأصبح المسار التقرير هكذا C:\Rep\1243.jpg.
على حسب من كلامك فهمت أختي زهرة أن غير مسار لجميع الصور هكذا MainComputer\C:\Rep\1243\\
هناك أختي الفاضلة أكثر من 5 آلاف تقارير فكيف يمكن أن غير مسار لجميع التقارير أم هناك فيه الكود لتغيير مسار الصور بدفعة واحدة؟
وآسف على الإطالة أختي الكريمة
تم تعديل هذه المشاركة بواسطة Mrhb في 31 يناير 2012 في 16:31
اخي الفاضل
هل 1234 هو رقم الصوره !!!!
وهل لهذا الرقم حقل في الجدول !!!
بمعنى رقم الصوره jpg.1234 يمثل رقم الـ ID في الجدول اذا كان كذلك فإستخدم هذا الكود
Me.ImageFrame.Picture ="\\MainComputer\C:\Rep\" & ID & ".JPG"
ID هو حقل رقم الصوره في الجدول او في التقرير
بالتوفيق
،نعم أختي الكريمة بالفعل 1234 هو رقم الصورة
و أيضاً يوجد الحقل في القاعدة البيانات بنفس الرقم 1234
و إن شاء الله سأجرب الكود أعلاه و سأخبركي بعد التجربة
و الله يجزيك خير ويبارك فيكِ
المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية
جارٍ التحقق من المتواجدين…
