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

إقتباس :

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

[attachment=13535]



السلام عليكم ورحمة الله
في المرفقات مثال حول نسخ ملف من مجلد إلى مجلد أخر
إما بتنفيذ الأمر بكوموند أو عى طريق Check1
عليك باتباع نفس الطريقة والشكل وغير الروابط حسب ما يناسب برنامجك
تحياتي

ملاحظة: عاجل      أنظر مشاركتي رقم 22 في الصفحة الثالثة تجد الكود النهائي والشامل: البحث عن الملف بكوموند وإدراج مساره ، تحديد مكان النسخ بكوموند، النسخ الفردي لأماكن مختلفة ، والنسخ لأماكن مختلفة دفعة واحدة وفي أي مكان و في أي قرص

بالإضافة إلى إمكانية إنشاء مجلد جديد في أي مكان تريد.

الف شكر
بس لو في تعديل بسيط هو اني اقدر أحدد مكان الملف المراد نسخه ثم بعد ذلك يتم نسخه الي كثر من مكان عن طريق ان يكون مكان 1 ومكان 2 ومكان 3 وكل مكان نختاره يكون عن طريق اتشك بوكس
والف شكر مره أخري

[attachment=13543]


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

تفضل أخي ما طلبت

في  التكست  المشترك على اليمين تكتب المسار كاملا للملف المراد نسخه .


في بقية التكستات تكتب المسارات المختلفة للأماكن المراد النسخ إليها

السلام عليكم ورحمة الله
الف شكر

[attachment=13549]

السلام عليكم

أضف إلى الفورم الأداة: ِCommonDialog1

وجرب الكود النهائي:
حيث أضفت command1 من أجل اختيار الملف بدل أن ترهق نفسك بالكتابة
وأضفت command2 من أجل تحديد الأماكن المختلفة بدل كتابة المسارات المختلفة
و Command3 اختياري من أجل النسخ في محتلف الأماكن دفعة واحدة أو تستعمل  Check6 لنفس الغرض
أيضا: Check1   و   Check2   و   Check3    و  Check4    و  Check5 خاصة بالنسخ المنفرد لكل مكان

أعتقد أن هذه الطريقة سوف تعجبك كثيرا

 دعواتك بالخير وراحة النفس ودوام النعمة والثبات على الإيمان في الدنيا والآخرة

السلام عليكم

أرجو منكم إبداء أراءكم حول الموضوع

يعطيك العافية اخي جورج

عمل جميل جداً

ما قصرت
تاكد بانه يصعب علينا مناقشة كل المواضيع

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

وشكرا

السلام عليكم

شكرا
أخي عبد العزيز هل أدخلت اسم ومسار الملف المراد نسخه؟

أعتقد أنك لم تدخل اسم ومسار الملف المراد نسخه في التكست المنفرد على اليمين Text1

اعتقد أن هذا هو السبب ، أعد المحاولة ثم أخبرني بالنتيجة

لقد تأكدت الآن من السبب وهو كما ذكرت   أنظر الصورتين الأولى اسم الملف ومساره في Text1
النتيجة سليمة
في الصورة الثانية لم أدخل اسم ومسار الملف والنتيجة خطأ في النسخ  (لا يمكن نسخ شيء غير موجود)
تحياتي