نعم صحيح لقد نسيت يحتاج تعريف آخر ......النسيان مصيبة
ساجرب باذن الله ...ان لم يسبقني احد.
تبين ان المشكلة بسيطة ولم يكن هناك داعي لها
انظر للشرط وجوابه
PHP كود :
If tsp.Text.EndsWith("\") = False Then
tsp.Text = tsp.Text.Insert(tsp.TextLength, "\")
End If
fromf = tsp.Text
عدلته الان وقارنه بالمكتوب من قبل
المثال بعد التعديلات اللازمة
سبب الخطا هو وضع الاسناد الى المتغير fromf بعد تحقق شرط معين وكان يجب اسناده بعد الجملة الشرطية.
ايضا البروقرس بار عدلت عليه ....كل ماكتبته بالمثال يمكنك الاستغناء عنه متى شئت لكني تلافيا للتهنيق والجمود استخدمت ماهو موجود بالمشروع.
تم تحديث المثال
هنا
بحيث يمكنك الاختيار بين النسخ او النقل
شكرا لك اخي سعود وبارك الله فيك ونفع بك وبعلمك
جربت المثالين المرفقات الاول الذي يقوم بالنقل فقط المثال يعمل ولكن لا يبحث داخل المجلدات الفرعية كيف يمكن جعله يقوم بالبحث داخل كافة المجلدات ....
الامر الاخر
كود :
For Each fl As FileInfo In dir.GetFiles("*.txt")
كيف يمكنني تعديل الكود التالي بحيث يحتوي مثلا اكثر من امتداد في نفس الوقت ؟؟؟؟ .....
بالنسبة للمثال الذي يحتوي على النقل والنسخ ...
ظهرت لي مشكلة
إقتباس :كيف يمكنني تعديل الكود التالي بحيث يحتوي مثلا اكثر من امتداد في نفس الوقت ؟؟؟؟ .....
هذا بجعل الفلتر هكذا
بدلا عن
إقتباس :كيف يمكن جعله يقوم بالبحث داخل كافة المجلدات
اكيد مسالة الصلاحيات راح توقف قدامك!
وحل هذي بتشغيل البرنامج كمسؤول(يعني لا بد يكون المستخدم الحالي معه صلاحيات كاملة)
التعديل يكون على كود Getfiles بان تضيف لها SearchOption.AllDirectories
فيه
مثال عملته قديما
يبحث عن طريق Environment
كمثال:
PHP كود :
System.Environment.GetFolderPath(Environment.SpecialFolder.MyDocuments)
بالنسبة لرسالة الاخيرة هذا يعني ان المصفوفة all لاتحتوي عناصر.
بارك الله فيك وجزاك كل الخير اخي سعود
هل يمكن اخي تجاهل المجلدات التي تحتوي صلاحيات الادمن بطريقة ما ؟؟؟؟
بحيث لا يتم البحث داخل المجلدات التي تحتوي صلاحيات ادمن ؟؟
لم اجد حل جذري لها لكن ....محاولة (تشغيل البرنامج كمسؤول - تستخدم البحث باستخدام الـ Environments)
وتستخدم الاكواد ضمن Try ولا تكتب شيء عن الخطا......حل بسيط حتى ياتي خبير برمجي.
اضافة لما قدمه اخى سعود
بخصوص تخطى الخطاء والاستكمال
فيمكنك مراجعة الرابط التالى راجع الشرح فى الرد رقم 4 و 6 جيداً
الرابط سيوضح كيفية التخطى الخطاء
واذا كان بعرض رسالة او بدون
ويمكن بدلاً من الرسالة استغلال الفكرة كاعمل ليست
تدرج بها المجلدات التى لم يتمكن من التعامل معها
تحياتى لك
وتمنياتى لك التوفيق
إقتباس :ويمكن بدلاً من الرسالة استغلال الفكرة كاعمل ليست
تدرج بها المجلدات التى لم يتمكن من التعامل معها
فعلا فكرة رائعة جدا ...خصوصا لو البرنامج مرتبط بخادم ما يرسل نوع نظام التشغيل مع رسائل الخطأ ويتم التعامل مع كل نظام وفق رسائل اخطائه
بارك الله فيك و لك وزادك من علمه.
(08-06-19, 02:08 PM)سعود كتب : [ -> ]لم اجد حل جذري لها لكن ....محاولة (تشغيل البرنامج كمسؤول - تستخدم البحث باستخدام الـ Environments)
وتستخدم الاكواد ضمن Try ولا تكتب شيء عن الخطا......حل بسيط حتى ياتي خبير برمجي.
بارك الله فيك اخي سعود وبعلمك ونفع بك
(08-06-19, 04:40 PM)elgokr كتب : [ -> ]اضافة لما قدمه اخى سعود
بخصوص تخطى الخطاء والاستكمال
فيمكنك مراجعة الرابط التالى راجع الشرح فى الرد رقم 4 و 6 جيداً
الرابط سيوضح كيفية التخطى الخطاء
واذا كان بعرض رسالة او بدون
ويمكن بدلاً من الرسالة استغلال الفكرة كاعمل ليست
تدرج بها المجلدات التى لم يتمكن من التعامل معها
تحياتى لك
وتمنياتى لك التوفيق
بارك الله فيك اخي وجزاك كل الخير
باذن الله لي تجربة والعودة لاخبارك بالنتائج