Ahmed_J

السلام عليكم استاذ @ابوخليل آسف على التاخير كنت مسافر كل شيء تمام بارك الله فيك وشكرا لك

السلام عليكم استاذ @ابوخليل ربي يحفظك من كل مكروه كل شيء تمام البرنامج يحفظ الملف في مساره الصحيح ويحفظه برقم الكتاب وبصيغة pdf المشكلة الوحيدة : عدم ظهور ملف pdf عند تحميله من الماسح الضوئي عند تحميلة مباشرة من النموذج بعد عمل كل الاعدادات المطلوبة الا بعد اغلاق وفتح النموذج مرة اخرى او الانتقال الى السجل التالي او السجل السابق يظهر الملف بصورة اعتيادية. لكنني انتبهت على ملاحظة عند تشغيل الماسح الضوئي (الكود يذهب مباشرة الى آخر كود موجود والماسح لسه يعمل) لذلك لايجد المسار الصحيح له خطرت لي فكرة ان اضع بين كود تشغيل الماسح ونهاية الكود فاصل زمني (PauseTime = 20) لمدة 20 ثانية وفعلا نجحت الفكرة وظهر ملف pdf في النموذج لكن هذه طريفة غير صحيحة لان المدة ثابتة (20) ثانية بينما ممكن اعمل مسح ضوئي لاكثر من كتاب اتمنى توضحت المشكلة والفكرة لديك سؤال: اليس من المفروض ان يكمل الماسح الضوئي عمله ثم ينتقل للخطوة التالية بالكود؟ انا لااعلم تحياتي

السلام عليكم استاذي العزيز @ابوخليل الملف هو برنامج بسيط لارشفة الكتب الرسمية - اذا كان الكتاب صفحة واحدة اقوم بالمسح على شكل صورة jpg وهو موضوع انتهيت منه والحمد لله - اذا كان الكتاب معه مرفقات عديدة اقوم بمسحها على شكل pdf (المشكلة فقط بعدم ظهور الملف في النموذج) عند وضعة بالمسار المحدد 1- نعم لكل ملف pdf سجل خاص به وصفحة بيانات بالنموذج 2- معرف الصورة هو (رقم الكتاب) 3- لااعتقد اني احتاج لجدول فرعي مثال مرفق تحياتي Desktop.rar

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

الخي العزيز قلت لك لابد من وضع (plugins) بجانب البرنامج لكي يعمل pdf اما الجودة براحتك لديك خيارات جودة من (40%) الى (95%) تحياتي

السلام عليكم اخي زياد العزيز الصورة الاولى خاصة باخراج الملف pdf الصورة الثانية خاصة بالدقة

السلام عليكم السؤال الاول : يجب تثبيت ادوبي اكروبات و (iview462_plugins) لكي يعمل pdf السؤال الثاني: يمكنك تعديل الخيارات باقل جود ممكنة تحياتي

استاذ @ابوخليل انا عاجز عن شكرك الله يبارك فيك ان شاء الله في ميزان حسناتك بانتظار الخطوة الاخيرة ان شاء الله التي لم تكتمل (اظهار ملف PDF في النموذج)

السلام عليكم استاذ @ابوخليل الله يبارك فيك ويجعلها في ميزان حسناتك 1- تم تجربة الصور وكل شيء تمام وفي المسار المحدد للصور Dim mypath As String mypath = Application.CurrentProject.Path & "\My_Archive\Import\My_Pictures\" Shell ("c:\Program Files (x86)\irfanview\i_view32.exe /batchscan=(Ahmed,,,,," & mypath & " ,jpg,0) /scanhidden") 2- تم تجربة pdf وكل شيء تمام وفي المسار المحدد للpdf Dim mypath As String mypath = Application.CurrentProject.Path & "\My_Archive\Import\My_pdf\" Shell ("c:\Program Files (x86)\irfanview\i_view32.exe /batchscan=(Ahmed,,,,," & mypath & " ,pdf,0) /scanhidden") 3- تم تثبيت (IrfanView) 32 bit وتثبيت iview462_plugins 4- تم ضبط اعدادات IrfanView كما في الصور 1 , 2 ولتقليل حجم ملف pdf لانه في الاعدادات الافتراضية يكون حجمه اكثر من (20 MB) 5- الخطوة الاخيرة ان شاء الله التي لم تكتمل (اظهار ملف PDF في النموذج) ملاحظة 1 : عند اغلاق النموذج وفتحه مرة اخرى او عند الانتقال للصفحة الاخير والعودة للصفحة الحالية يظهر الملف في النموذج وفي المسار المحدد ملاحظة 2: اذا بقي اسم الملف (Ahmed.pdf) كما هو فانه سيتم المسح الضوئي فوق الملف السابق في كل مرة وكذلك فتح نفس الملف في كل صفحات الاكسس اذ يمكن اضافة عليه مثلا رقم الكتاب في الحقل (A)لكي يصبح لكل ملف اسم مختلف عن الاخر وشكرا لك استاذي العزيز Desktop.rar

السلام عليكم استاذ @Foksh شكرا على تعبك معي كل فيديوات الاستاذ محمد عبد الغفار انا شاهدتها شكرا لك لابد من وجود فكرة اخرى up

استاذي العزيز يقوم بتحويل التقرير الى pdf وليس الصور شكرا لك بارك الله فيك

السلام عليكم بالعكس ان مستمتع معك استاذي العزيز شكرا لك لكن يظهر خطا اعتقد يريد مكتبة حملت اكثر من واحدة لكن للاسف

استاذ @Foksh شكرا لك لكن الملف عند التحويل معطوب لايعمل

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

السلام عليكم استاذي العزيز @ابوخليل الله يبارك فيك شكرا كثيرا استاذي العزيز المشكلة عندي ليست بتحويل الصورة الى pdf ؟ ملاحظة : هذا الكود شغال 100% حيث يقوم بتحويل الصورة من الماسح الضوئي الى pdf مباشرة ويحفظها في المسار C:\temp بأسم Ahmed01.pdf كما في الصور 1و2 . Shell ("c:\Program Files (x86)\irfanview\i_view32.exe /batchscan=(ahmed,1,1,2,0,c:\temp,pdf,1) /scanhidden") علما بانني قمت بتثبيت برنامج (.IrfanView.exe) والاضافة (view462_plugins.exe) الذي سبب المشكلة في عدم التعرف على pdf لديك استاذي العزيز: قم بتحميل الاضافة (view462_plugins.exe) ويعمل لديك ان شاء الله المطلوب : اريد عن تشغيل الماسح الضوئي يحفظ ملف pdf في المسار (My_Archive-Import-My_pdf) واظهار pdf في النموذج. كما في الصورة 3. وشكرا

up

up

السلام عليكم طبعا اكيد شكرا للملاحظة

السلام عليكم اساتذتي الاعزاء من خلال بحثي المتواصل من خلال الانترنت وجدت من الصعب جدا ان تجد كود او موديول واحد يقوم بتشغيل كافة انواع الماسحات الضوئية لكثرة انواعها وموديلاتها. اخيراً استقر الحال على البرنامج الوسيط (IrfanView) وهو بستطيع التعامل مع اكثر من جهاز ماسح ضوئي سواء كان (flat) او (feeder). قمت بتجربته والنتائج كانت جيدة واستطعت سحب صور متعددة وتحويلها الى pdf مباشرة وصورة واحدة بعدة امتدادات مثل jpg * مرفق برنامج ارشفة الكترونية بسيط وطريقة عملة هو اختيار نوع المستند اما pdf ويظهر مستعرض الويب او IMAGE ويظهر مستعرض الصور المطلوب: التعديل على الكود لحفظ ملف pdf او jpg في مسار بجانب قاعدة البيانات (My_Archive-Import-My_pdf) او (My_Archive-Import-My_Pictures) واظهار الملفات في مستعرض الصور او pdf في فاعدة البيانات مع اسم ورقم الكتاب. وشكرا لكم Desktop.rar

السلام عليكم استاذ @ابوخليل عاشت ايدك كلوا تمام فقط لدي طلب اخير ان كان ممكن البرنامج يعمل على ماسح ضوئي عادي ( صورة صورة) المطلوب: هل ممكن تعديل الكود الموجود بالبرنامج ليصبح (feeder) ياخذ الصور متتاليه لان لدي جهاز كانون كما في الصورة بار ك الله فيكم تحياتي

استاذ @ابو جودي كلامك دقيق جدا صحيح هو يفعل ذلك واعتقد من خلال الوحدة النمطية يدقق المجلد الاخير (my pdf) لانه موجود البرنامج يقوم بانشاء مجلد وانا لااريد ذلك ابدا اريد ان يحفظ الصورة في مسارها فقط تحياتي

UP

استاذ @ابو جودي استاذ @Moosak تظهر هذه الرسالة ان الملف موجود مسبقا اعتقد يجب ان تكون الصورة بعد المجلد (my pdf)

السلام عليكم استاذ @ابو جودي ظهرت رسالة الخطا التالية استاذ @زياد الحسناوي لدي جهاز كانون عادي بالمنزل FLAT لكن البرنامج يسمح بالسحب المتكرر بعد ظهور رسالة تاكيد تحياتي

استاذ @ابو جودي السلام عليكم قمت بتغيير السطر وظهر الخطا التالي تحياتي