Ahmed_J قام بنشر مارس 12, 2022 مشاركة قام بنشر مارس 12, 2022 السلام عليكم اساتذتي الاعزاء بحث وعملت طوال اليوم لكن لم اصل الى نتيجة لدي ملف اكسس فيه مرفقات عبارة عن مستندات لغرض الارشفة الالكترونية ولا اريد خزنها في قاعدة البيانات حتى لايكبر حجمها مستقبلا طلبي هو : 1- خزن الصور في فولدر بجانب قاعدة البيانات اللي اسمه scanner 2- تشغيل الماسح الضوئي من خلال زر بالاكسس وحقظ الصور في نفس الفولدر Scanner 3- اتمنى ان يكون الحغظ متسلسل وبتاريخ جهاز الحاسوب 4- لو كان عندي اكثر من سحب صورة هل بالامكان تحويل اكثر من صورة الى PDF من خلال كود عن طريق زر الماسح الضوئي تحياتي للجميع ربي يوفقكم اجمعين test.rar رابط هذا التعليق شارك More sharing options...
Ahmed_J قام بنشر مارس 13, 2022 الكاتب مشاركة قام بنشر مارس 13, 2022 up رابط هذا التعليق شارك More sharing options...
aboeyad2007 قام بنشر أبريل 7, 2022 مشاركة قام بنشر أبريل 7, 2022 ارى لديك سجلات موظفين ماترغب تحفظ الصورة لكل موظف على حده؟ باسمه او برقم المعرف ،، او مجلد منفصل لكل موظف 1 رابط هذا التعليق شارك More sharing options...
Ahmed_J قام بنشر أبريل 8, 2022 الكاتب مشاركة قام بنشر أبريل 8, 2022 السلام عليكم شكرا للمتابعة استاذي العزيز المهم هو تشغيل الماسح الضوئي لاكثر من صورة للموظف رابط هذا التعليق شارك More sharing options...
د.كاف يار قام بنشر أبريل 8, 2022 مشاركة قام بنشر أبريل 8, 2022 تفضل هذا التعديل test.zip 2 رابط هذا التعليق شارك More sharing options...
Ahmed_J قام بنشر أبريل 8, 2022 الكاتب مشاركة قام بنشر أبريل 8, 2022 السلام عليكم شكرا لك استاذ @د.كاف يار هل الكود الخاص بالماسح الضوئي هو كود فيدر (Feeder ) يعني يسحب عدة صور دفعة واحدة تحياتي لك رابط هذا التعليق شارك More sharing options...
Ahmed_J قام بنشر أبريل 10, 2022 الكاتب مشاركة قام بنشر أبريل 10, 2022 السلام عليكم استاذي العزيز @د.كاف يار قمت بتجربة الملف على جهازي الملف يقوم بمسح صورة واحدة فقط وليس عدة صور بعد اختيار (decument Feeder) كما في الصور وشكرا لك رابط هذا التعليق شارك More sharing options...
محمد التميمي قام بنشر أبريل 11, 2022 مشاركة قام بنشر أبريل 11, 2022 في 8/4/2022 at 22:47, د.كاف يار said: تفضل هذا التعديل test.zip 4.15 \u0645\u064a\u062c\u0627 \u0628\u0627\u064a\u062a · 25 downloads السلام عليكم بعد اذن صاحب المشاركة الاخ احمد بارك الله بك استاذي الكريم د.كاف يار وجعله الله في ميزان حسناتك عمل في غاية الروعة استاذي الكريم لو تكرمت علينا وانت صاحب الكرم اريد تعديل بسيط على الكود ان تجعل مكان الحفظ في فولدر ويكون اسم الفولدر هو رقم تسلسل الفرد حتى تتجمع كل الكتب الرسمية العائدة للشخص الواحد في هذا الفولدر ولا تختلط مع بعضها الهم احفظ إخواننا من كل سوء ومكروه في هذا الشهر الكريم رابط هذا التعليق شارك More sharing options...
د.كاف يار قام بنشر أبريل 11, 2022 مشاركة قام بنشر أبريل 11, 2022 23 ساعات مضت, Ahmed_J said: السلام عليكم استاذي العزيز @د.كاف يار قمت بتجربة الملف على جهازي الملف يقوم بمسح صورة واحدة فقط وليس عدة صور بعد اختيار (decument Feeder) كما في الصور وشكرا لك تفضل جرب هذا التعديل Database1.zip 2 رابط هذا التعليق شارك More sharing options...
د.كاف يار قام بنشر أبريل 11, 2022 مشاركة قام بنشر أبريل 11, 2022 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) 2 رابط هذا التعليق شارك More sharing options...
محمد التميمي قام بنشر أبريل 12, 2022 مشاركة قام بنشر أبريل 12, 2022 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) شكرا جزيلا على الكود بارك الله بشخصكم الكريم رابط هذا التعليق شارك More sharing options...
Ahmed_J قام بنشر أبريل 17, 2022 الكاتب مشاركة قام بنشر أبريل 17, 2022 السلام عليكم اساتذتي الاعزاء استاذ @د.كاف يار في 11/4/2022 at 18:55, د.كاف يار said: تفضل جرب هذا التعديل البرنامج اصبح لايعمل على الفيدر ويظهر رسالة كما في الصورة رابط هذا التعليق شارك More sharing options...
Ahmed_J قام بنشر أبريل 19, 2022 الكاتب مشاركة قام بنشر أبريل 19, 2022 UP رابط هذا التعليق شارك More sharing options...
د.كاف يار قام بنشر أبريل 20, 2022 مشاركة قام بنشر أبريل 20, 2022 جرب هذا التعديل Database1.zip 1 رابط هذا التعليق شارك More sharing options...
Ahmed_J قام بنشر أبريل 23, 2022 الكاتب مشاركة قام بنشر أبريل 23, 2022 (معدل) السلام عليكم استاتذتي الاعزاء مساء الخير عليكم جميعا استاذي العزيز @د.كاف يار بارك الله فيك هذه الصور هي نفس الجهاز الذي اعمل علية (كانون ) Canon-DR-F120-Feeder قمت بتجربة اخر تعديل لك على الملف البرنامج يعمل يعمل على مسح ضوئي عادي ورقة ورقة كما في الصورة (2) وليس على الفيدر عدة اوراق معا كما في الصورة (1) تحياتي لك تم تعديل أبريل 23, 2022 بواسطه Ahmed_J رابط هذا التعليق شارك More sharing options...
د.كاف يار قام بنشر أبريل 23, 2022 مشاركة قام بنشر أبريل 23, 2022 تمت التجربة بالفعل على نوع مختلف و تم سحب جميع الاوراق بنجاح اتوقع المشكلة لديك في الاعدادات رابط هذا التعليق شارك More sharing options...
Ahmed_J قام بنشر أبريل 23, 2022 الكاتب مشاركة قام بنشر أبريل 23, 2022 العفو استاذ شو تقصد بالاعدادات لدي ماسح واحد هو defult رابط هذا التعليق شارك More sharing options...
Ahmed_J قام بنشر أبريل 24, 2022 الكاتب مشاركة قام بنشر أبريل 24, 2022 استاذ @د.كاف يار السلام عليكم لايعمل البرنامج ابدا لاتوجد اي مشكلة بالاعدادات فقط بدي اوضح شيء الماسح كانون فيه حالتين للمسح الضوئي الاولى يقوم بمسح صورة واحدة فقط كل مرة كمافي الصورة رقم 2 في الموضوع السابق عند وضع المستند في وسط الجهاز الثاني يقوم بمسح عدة مستندات دفعة واحدة عند وضع المستندات في اعلى الجهاز FEEDER عند وضع المستند في اعلى الجهاز تحياتي للجميع رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
من فضلك سجل دخول لتتمكن من التعليق
ستتمكن من اضافه تعليقات بعد التسجيل
سجل دخولك الان