منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب - مشكلة في حفظ عدة ملفات دفعة واحدة في الأرشفة الالكترونية

السلام عليكم ورحمة الله
هذا البرنامج من تصميم الأخ أمير الزبيدي والأخ احمد منصور
قمت بتطوير ة ولكن واجهتني مشكلة عند الحفظ بحيث يقوم بعمل نسخ مستند واحد فقط الي مجلد المستندات
كما في الصورة
[attachment=26941]

ملاحظة لادراج ملف اضغط F9

هل من مساعدة??

حاولت ومازالت المشكلة قائمة

مازالت المشكلة

وعليكم السلام ورحمة الله وبركاته

أهلا بك أخي الكريم, قم بإستبدال كود الإجراء PHOTO بهذا :

PHP كود :

Public Sub PHOTO(RowNumber As Integer)
'On Error Resume Next: Err.Clear

                 '  [Directory]نسخ الصورة في المجلد الجديد
          FileCopy fox.TextMatrix(RowNumber, 5), App.Path & "\awidanPC" & "\" & fox.TextMatrix(RowNumber, 2)
          DoEvents
                 'لوضع المسار الجديد للصورة داخل قاعدة البيانات
          fox.TextMatrix(RowNumber, 5) = App.Path & "\awidanPC\" & fox.TextMatrix(RowNumber, 2)

End Sub 

وفي كود الحفظ عدل هذا السطر :

PHP كود :

Call PHOTO 

ليصبح هكذا :

PHP كود :

Call PHOTO(i) 

بالتوفيق .

تسلم اخي بجرب وبرد لك خبر شكرا لمرورك الكريم

اهلا استاذي الغالي احمد منصور
الشرح تم بنجاح
تسلم ياغالي
مشكور جدا جدا جدا

منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

awidan76

awidan76

awidan76

awidan76

Ahmed_Mansoor

awidan76

awidan76