اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

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

قام بنشر

السلام عليكم اساتذتي الاعزاء

بحث وعملت طوال اليوم لكن لم اصل الى نتيجة 

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

طلبي هو :

1- خزن  الصور في فولدر بجانب قاعدة البيانات اللي اسمه scanner 

2- تشغيل الماسح الضوئي من خلال زر بالاكسس  وحقظ الصور في نفس الفولدر Scanner

3- اتمنى ان يكون الحغظ متسلسل  وبتاريخ جهاز الحاسوب

4- لو كان عندي اكثر من سحب صورة هل بالامكان تحويل اكثر من صورة الى PDF من خلال كود  عن طريق زر الماسح الضوئي

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

ربي يوفقكم اجمعين

 

test.rar

  • 4 weeks later...
قام بنشر

ارى لديك سجلات موظفين ماترغب تحفظ الصورة لكل موظف على حده؟

باسمه او برقم المعرف ،، او مجلد منفصل لكل موظف

  • Like 1
قام بنشر

السلام عليكم

شكرا للمتابعة استاذي العزيز

المهم هو تشغيل الماسح الضوئي لاكثر من صورة للموظف

قام بنشر

السلام عليكم

شكرا لك استاذ  @د.كاف يار

هل الكود الخاص بالماسح الضوئي  هو كود فيدر (Feeder ) يعني يسحب عدة صور دفعة واحدة

تحياتي لك

 

 

قام بنشر

السلام عليكم 

استاذي العزيز @د.كاف يار

قمت بتجربة الملف على جهازي

الملف يقوم بمسح صورة واحدة فقط وليس عدة صور   بعد اختيار (decument Feeder)   كما في الصور

وشكرا لك

 

1.jpg

2.jpg

قام بنشر
في 8‏/4‏/2022 at 22:47, د.كاف يار said:

السلام عليكم

بعد اذن صاحب المشاركة الاخ احمد

بارك الله بك استاذي الكريم د.كاف يار وجعله الله في ميزان حسناتك عمل في غاية الروعة

استاذي الكريم لو تكرمت علينا وانت صاحب الكرم

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

الهم احفظ إخواننا من كل سوء ومكروه في هذا الشهر الكريم 

 

قام بنشر
23 ساعات مضت, Ahmed_J said:

السلام عليكم 

استاذي العزيز @د.كاف يار

قمت بتجربة الملف على جهازي

الملف يقوم بمسح صورة واحدة فقط وليس عدة صور   بعد اختيار (decument Feeder)   كما في الصور

وشكرا لك

 

1.jpg

2.jpg

تفضل جرب هذا التعديل

 

Database1.zip

  • Like 2
قام بنشر
9 ساعات مضت, محمد التميمي said:

السلام عليكم

بعد اذن صاحب المشاركة الاخ احمد

بارك الله بك استاذي الكريم د.كاف يار وجعله الله في ميزان حسناتك عمل في غاية الروعة

استاذي الكريم لو تكرمت علينا وانت صاحب الكرم

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

الهم احفظ إخواننا من كل سوء ومكروه في هذا الشهر الكريم 

 

ارفق مثال

و للإستزادة

 

لإنشاء فولدر استخدم الكود التالي

Dim fso As Object, FoldrName As String, fldrpath As String

FoldrName = "hi"  ' اسم الفولد هنا و يمكن استبداله بمربع النص

Set fso = CreateObject("scripting.filesystemobject")

' مسار الفولدر
FoldrName = CurrentProject.path & "\" & FoldrName

' في حال عدم وجود الفولدر حسب المسار اعلاه سيتم انشاء فولدر جديد
If Not fso.FolderExists(fldrpath) Then: fso.createfolder (FoldrName)

 

  • Like 2
قام بنشر
16 ساعات مضت, د.كاف يار said:

ارفق مثال

و للإستزادة

 

لإنشاء فولدر استخدم الكود التالي

Dim fso As Object, FoldrName As String, fldrpath As String

FoldrName = "hi"  ' اسم الفولد هنا و يمكن استبداله بمربع النص

Set fso = CreateObject("scripting.filesystemobject")

' مسار الفولدر
FoldrName = CurrentProject.path & "\" & FoldrName

' في حال عدم وجود الفولدر حسب المسار اعلاه سيتم انشاء فولدر جديد
If Not fso.FolderExists(fldrpath) Then: fso.createfolder (FoldrName)

 

شكرا جزيلا على الكود

بارك الله بشخصكم الكريم

قام بنشر

السلام عليكم اساتذتي الاعزاء

استاذ @د.كاف يار

في 11‏/4‏/2022 at 18:55, د.كاف يار said:

تفضل جرب هذا التعديل

البرنامج اصبح لايعمل على الفيدر  ويظهر رسالة كما في الصورة

 

1.jpg

قام بنشر (معدل)

السلام عليكم استاتذتي الاعزاء

مساء الخير عليكم جميعا

استاذي العزيز @د.كاف يار بارك الله فيك هذه الصور هي نفس الجهاز الذي اعمل علية  (كانون )  Canon-DR-F120-Feeder

قمت بتجربة اخر تعديل لك على الملف

البرنامج يعمل يعمل على مسح ضوئي عادي ورقة ورقة  كما في الصورة (2)  وليس على الفيدر  عدة اوراق معا كما في الصورة (1)

تحياتي لك

 

1.png

2.png

تم تعديل بواسطه Ahmed_J
قام بنشر

استاذ @د.كاف يار

السلام عليكم

لايعمل البرنامج ابدا

لاتوجد اي مشكلة بالاعدادات

فقط بدي اوضح شيء الماسح كانون  فيه حالتين للمسح الضوئي

الاولى يقوم بمسح صورة واحدة فقط كل مرة كمافي الصورة رقم 2 في الموضوع السابق عند وضع المستند في وسط الجهاز

الثاني يقوم بمسح  عدة مستندات دفعة واحدة عند وضع المستندات في اعلى الجهاز FEEDER عند وضع المستند في اعلى الجهاز

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

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

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

Important Information