ابو تميم قام بنشر ديسمبر 8, 2012 قام بنشر ديسمبر 8, 2012 تحية طيبة في المرفق المطلوب في الفورم : عند الضغط على زر ( عرض الملفات المتوفرة ) يتم عرض جميع أسماء الملفات الموجودة داخل المجلد data الموجود مع الملف الرئيسي وعند الضغط على ChecBox لملف معين يظهر لدينا في المربع أعلاه ( إجمالي حجم الملفات المحددة ) حجم الملف المحدد وعند تحديد ChecBox لملف آخر يتم جمع حجم الملفين معا في مربع ( إجمالي حجم الملفات المحددة ) وهكذا مع باقي الملفات وعند وصول ( إجمالي حجم الملفات المحددة ) إلى 2MB يتم إيقاف التحديد أي أنه لا يمكننا تحديد ملف آخر وبعدها نضغط على زر ترحيل الملفات المحددة وهذا الزر يعمل على وضع ملاحظة بجانب اسم المف ( تم الترحيل ) وبعد ذلك يمكننا العودة وتحديد ملفات أخرى كما سبق وهكذا .. جزاكم الله خيرا عرض الملفات وأحجامها.rar
أبو حنــــين قام بنشر ديسمبر 8, 2012 قام بنشر ديسمبر 8, 2012 بالنسبة للسؤال الاول فهو واضح بالنسبة للترحيل فالسؤال غير واضح ماذا ترحل و اين ترحل عرض الملفات 11وأحجامها.rar
ابو تميم قام بنشر ديسمبر 8, 2012 الكاتب قام بنشر ديسمبر 8, 2012 شكرا جزيلا أخي ابو حنين بالنسبة إلى الملف يعطيني خطأ كما في الصورة المرفقةوهو لا يعمل أما بالنسبة إلى الترحيل فهو هنا فقط لإعطاء خيار للبدء بتحديد ملفات جديدة و وضع ملاحظة بجانب الملفات التي تم ربطها سابقا أي أنه كلما حددنا ملفات و وصل حجمها إلى 2MB عندها لا نستطيع تحديد ملفات جديدة حتى يتم الضغط على زر ترحيل البيانات المحددة وظهور رسالة تم التترحيل و وضع ملاحظة لدى الملفات أنها تم ترحيلها وهذا الخيار في ملف العمل سيتم استبدال كود الرسالة بكود آخر يقوم بإرسال الملفات المحددة عبر الايميل بدلا من ظهور رسالة تفيد بأنها تم ترحيلها
أبو حنــــين قام بنشر ديسمبر 8, 2012 قام بنشر ديسمبر 8, 2012 (معدل) الملف يعمل عندي اصف هذا السطر قبل الخطأ و اخبرني Private Sub CommandButton1_Click() '----------------------------- On Error Resume Next '----------------------------- تم تعديل ديسمبر 8, 2012 بواسطه أبو حنين
ابو تميم قام بنشر ديسمبر 8, 2012 الكاتب قام بنشر ديسمبر 8, 2012 أخي ابو حنين مع تعديل الكود أصبح الفورم لا يعمل نهائيا أعتقد أن العبارة Set Files = Application.FileSearch في الكود غير متوافقة مع الأوفيس عندي وهي تعمل فقط على أوفيس 2003 أنا أعمل على أوفيس 2010 شكرا لتعاونكم
ابو تميم قام بنشر ديسمبر 9, 2012 الكاتب قام بنشر ديسمبر 9, 2012 حتى الآن العمل ممتاز جدا أخي ابو حنين جزاك الله خيرا نحن هنا عرضنا الملفات المطلوبة وحددنا أحجامها عند الاختيار ولكن الآن المشكلة هي عندما أختار ملفات بحسب الحجم المطلوب أحتاج إلى ترحيلها وإزالتها من قائمة الاختيار أو حتى حذفها أي أنني عندما أختار المفات لا أستطيع العمل عليها بعد ذلك ولا يمكنني إعادة الاختيار مرة أخرى ولا أستطيع الترحيل أو إجراء ملاحظات عليها ببساطة أنا اخترت الملفات ذات الارقام 1 و 2 مثلا ومجموع أحجامها وصل إلى الحد المطلوب أحتاج إلى إزالتها من قائمة الاختيار واختيار ملفات أخرى وترحيلها ولنفترض حاليا أني أحتاج إلى ترحيلها إلى مجلد آخر اسمه DATA2 بنفس المجلد وبهذه الطريقة نحن أخرجناه من قائمة الاختيار ويمكننا اختيار ملفات أخرى وترحيلها وهكذا ملاحظة أخرى : عندما نقوم باختيار ملفات لا يمكننا معرفة أرقامها ويظهر لدينا في المربع الثاني فقط أحجام الملفات أرجو أن تكون الفكرة واضحة ولكم جزيل الشكر والاحترام
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.