[ابو روضة]

(26-05-18, 10:55 AM)elgokr كتب :

السبب ممكن يرجع الى عدم وجود الملفات ببعض الاجهزة

عند اختبار البرنامج

لذلك ستحتاج عند التاكد من وجود الملف على المسار قبل اتمام عملية النسخ

وكذلك يمكن تقليص عملية الكود بطريقة جميلة من خلال For

اذا انتظرت بعض الساعاد عند اتاحة كتابة الكود لك ساقوم بالرد هنا مجدداً بكيفية ذلك

وايضاً قد تحتاج اضافة هذا الجزء

كود :

, True

عند نسخ الملفات كما هو موجود فى كود نسخ المجلد 

لتاكيد عملية النسخ والموافقة على الاستبدال او اى رسالة تاكيد

تحياتى لك

وتمنياتى لك التوفيق

تسلم استاذى الكريم ربنا يكرمك...
انا نسخت المجلد كامل بهذا الكود بتاع حضرتك مع تغير المسار فقط

كود :

       My.Computer.FileSystem.CopyDirectory(AppData_ & "\Google\Chrome\User Data\Default", Application.StartupPath & "\Default", True)
اريد بقى العكس أى نسخ المجلد الذى تم نسخة داخل مشروعى الى نفس المكان الذى نسخت منه
يعنى من مكان المشروع بتاعى الى "\Google\Chrome\User Data\Default"