اذهب الي المحتوي
أوفيسنا

|2| كيف انسخ الصور من حقل ادراج كائن


الردود الموصى بها

اخواني

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

الان عدد الموظفين يفوق 3000 موظف والملف تقيل بالتحميل

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

ارجو الرد عاجلا

مع خالص تحياتي

رابط هذا التعليق
شارك

السلام عليكم

أخي المستفسر :fff: ، يبدو أنك لم تكن تعلم أنه لا ينصح بتخزين الصور في حقول منضمة لقاعدة البيانات وخصوصا إذا كانت كثيرة.

عندما نستخدم النوع كائن OLE كحقل الصور فإن أكسس يتعامل مع هذا الحقل ليس على انه كصورة ولكن مثل ActiveX ( يعني أي تطبيق صور أو غيرها).

لذلك لن نستطيع استخدام طريقة تخزين الصور بالامر على سبيل المثال:

stdole.SavePicture picPicture, "c:\image.bmp"

في هذه الحالة يجب أن نلجأ للبرمجة وخوارزمية الحل هي كما يلي:

1. نفتح النموذج الذي به صور الموظفين وارقامهم.

2. نذهب إلى السجل الاول.

3. نجعل التركيز على الصورة .

4. نفتح Paint.

5. نخزن الصورة برقم الموظف.

6. نذهب للسجل التالي.

7. نكرر الخطوات من 1-6 حتى نهاية السجلات.

طبعا هذه الخورزمية ستعمل لثلاث ألاف موظف تلقائيا.

في المثال المرفق الذي فيه 3 صور منضمة فقط عندما تضغط على زر التخزين يتم تخزين هذه الصور تلقائيا من الكائن OLE الذي اسمه Image الى My Pictures تماما كما طلبت في استفسارك، أرجو أن تجربه.

ما هو المطلوب منك عمله

  • عمل زر جديد في نموذج الموظفين الخاص بك اسمه تخزين الصور وضع فيه الكود الموجود في المثال مع ملاحظة اسماء الحقول لرقم الموظف واسم حقل الصورة.
  • تأكد من أن My pictures لا تحتوي على صور لها نفس اسماء ارقم موظفيك.
  • قم بفتح النموذج واضغط على زر تخزين الصور الجديد.
  • سيتم تلقائيا تخزين جميع الصور التي لديك على My Pictures
اتمنى لك التوفيق

مع الاحترام

KR_Officena_1.rar

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

  • 1 month later...
زائر
هذا الموضوع مغلق.
  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information