تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[vb6.0] كود نسخ ملف من مكان لأخر
#41
Idea تمام تم تنفيذ الشرط الأول ولكن لم يتم تنفذ باقي الكود وهي ان يعطي رساله تفيد بالنسخ
الرد }}}
تم الشكر بواسطة:
#42
(22-03-17, 08:58 PM)mero zarad كتب : Idea تمام تم تنفيذ الشرط الأول ولكن لم يتم تنفذ باقي الكود وهي ان يعطي رساله تفيد بالنسخ

أخي mero ماذا تعني بتنفيذ الشرط الأول؟ هل خرج البرنامج من الحدث؟
لأنك كتبت ما يلي: Exit Sub والتي تعني أن ينفذ ما قبلها ثم يخرج
فطلب إظهار رسالة تفيد بتمام عملية النسخ يأتي في حالة عدم الخروج من الحدث

أنظر في المرفق كيف وضعت أنا الأمر بإظهار رسالة تفيد بتمام عملية النسخ في الكود الخاص بزر تحديد مكان النسخ.
تحياتي Wink Heart


الملفات المرفقة صورة/صور
   

.rar   copier10.rar (الحجم : 2.4 ك ب / التحميلات : 32)
الرد }}}
تم الشكر بواسطة: sendbad100 , mero zarad
#43
السلام عليكم

اعتقد انه لا داعي لاستخدام تشكبوكس لكل مسار او لكل تكست
يكفي ان تشيك على التكست اذا كان فيه مسار نسخ واذا فارغ يتوقف

ايضا ليكون الكود اكثر احترافية يجب التاكد ان المسار صالح او موجود.

بالنسبة للخروج من الكود التي استخدمها اخي mero zarad اعتقد انها صحيحة لان ايقاف النسخ في حال لم يحدد اي مسار للنسخ اليه.

والله الموفق
الرد }}}
#44
(23-03-17, 03:27 AM)sendbad100 كتب : السلام عليكم

اعتقد انه لا داعي لاستخدام تشكبوكس لكل مسار او لكل تكست
يكفي ان  تشيك على التكست اذا كان فيه مسار نسخ واذا فارغ  يتوقف

ايضا ليكون الكود اكثر احترافية  يجب التاكد ان المسار صالح او موجود.

بالنسبة   للخروج من الكود   التي استخدمها  اخي   mero zarad     اعتقد انها  صحيحة لان ايقاف النسخ  في حال لم يحدد اي مسار للنسخ اليه.

والله الموفق

السلام عليكم  أخي    sendbad100
1
- اعتقد انه لا داعي لاستخدام تشكبوكس لكل مسار او لكل تكست

يكفي ان  تشيك على التكست اذا كان فيه مسار نسخ واذا فارغ  يتوقف

نعم أنا استخدمت checkbox واحد للنسخ دفعة واحدة ، لكن الأخ mero طلب chrckbox لكل مسار لست أدري لماذا؟ علما أنني قدمت كل الاحتمالات: بالكوموند، وبـ check واحدة لجميع المسارات وأخيرا check لكل مسار مما يعني أنه قد يرغب بالنسخ في بعض المسارات ويستثني بعضها
والقصد هنا التعليم وللمتعلم أن يختار ما يناسبه من بين كل الخيارات


2- ايضا ليكون الكود اكثر احترافية  يجب التاكد ان المسار صالح او موجود.
بما أن المسار محدد سلفا ما يعني أن المسار موجود أصلا لأنه تم اختياره فلا داعي للتأكد

3- بالنسبة   للخروج من الكود   التي استخدمها  اخي   mero zarad     اعتقد انها  صحيحة لان ايقاف النسخ  في حال لم يحدد اي مسار للنسخ اليه.

إذا لم يحدد أي مسار  يخرج من الحدث واذا حدد المسار تظهر الرسالة هذا صحيح
أنا كنت أقرأ من الهاتف وبالنظارات فلم أنتبه للرسالة الأولى 

عموما أشكرك على كل الملاحظات وهذا يدخل ضمن تبادل الأفكار قصد توضيح الرؤى والتعليم بالدرجة الاولى
ألف شكر
Heart
الرد }}}
#45
الف شكر لكل من ساهم في حل المشكلات التي كانت تقابلني في تصميم برنامجي  Heart

وإليكم البرنامج بعد اكتمال الهدف منه وفي انتظار أرائكم ومقترحاتكم لتحسين البرنامج كما تفضل اخي   sendbad100 في إضافه تاريخ وساعة النسخ وفي جعل لبرنامج لا يمسح الملف الموجود قديما ويعطي رساله تفيد بوجود هذا الملف من قبل ويقوم بعمل نسخه جديده 

والف شكر مره أخري للجميع
Heart Heart Heart Heart Heart


الملفات المرفقة
.rar   save 1.rar (الحجم : 7.12 ك ب / التحميلات : 39)
الرد }}}
#46
لزيادة الفائدة في سؤال لي من فترة 

اجاب استاذي / احمد منصور  برطيقة رائعة ومشروحة جيداً   بطريقتين جميلتين للنسخ الملف حتى عندما يكون مفتوحاً  وهي الطريقة المتبعة من الاخ / [b]الخير طهوري[/b] 

وايض الشكر موصول لاخي / [b]محمد العبيدي    هو ايضا اجاب بطريقة مختلفه.[/b]

يمكن الاطلاع على الموضوع للفائدة 

http://vb4arb.com/vb/showthread.php?tid=17863

لا اخفي عليكم للاستاذ / احمد منصور فضل كبير علي  ولا املك الان ان ادعو له في ظهر الغيب.


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

اسال المولى عز وجل ان يفتح عليه من اوسع ابوابه وان يجزية الف خير والف عافية وكل من يحب.

السلام عليكم 

هذا كود التاكد من وجود المفل قبل نسخة  // او التاكد من صحة المسار 


PHP كود :
If Dir(Trim(Text1.Text)) = "" Then
  MsgBox 
"لم يتم العثور على المف المطلوب نسخة"
 
 Exit Sub
  End 
If
 
  
الرد }}}
#47
السلام عليكم
لو سمحتم لو حبيت أضيف للبرنامج السابق check أخري عند الضغط عليها يتم تحديد جميع أماكن النسخ أيكون check يعمل علي تحديد الكل فكيف يكون الكود الخاص بتلك الإضافه 
بالإضافه الي الكود الخاص برساله تفيد بوجود الملف الذي تم نسخه من قبل وعمل نسخه إضافيه منه 

والف شكر 
الرد }}}
تم الشكر بواسطة:
#48
(24-03-17, 07:51 PM)وعليكم السلام mero zarad كتب : السلام عليكم
لو سمحتم لو حبيت أضيف للبرنامج السابق check أخري عند الضغط عليها يتم تحديد جميع أماكن النسخ أيكون check يعمل علي تحديد الكل فكيف يكون الكود الخاص بتلك الإضافه 
بالإضافه الي الكود الخاص برساله تفيد بوجود الملف الذي تم نسخه من قبل وعمل نسخه إضافيه منه 

والف شكر 

اضفت  checkbox جديد طلع اسمة  Check25  طبق الفكرة في الكود التالي

PHP كود :
Private Sub Check25_Click()
If 
Check25.Value 1 Then
Check1
.Value 1
Check2
.Value 1
Else
Check1.Value 0
Check2
.Value 0
End 
If 
الرد }}}
#49
السلام عليكم
لو سمحت ياجماعه عند عمل البرنامج بصيغة exe ونقله علي جهاز آخر البرنامج لا يعمل ارجو الافاده

السلام عليكم 

لو سمحت ياجماعه عند عمل البرنامج بصيغة exe ونقله الي جهاز آخر يعطي رساله وهذه صورة الرساله ارجو الافاده


الملفات المرفقة صورة/صور
   
الرد }}}
تم الشكر بواسطة:
#50
(26-03-17, 10:54 AM)mero zarad كتب : السلام عليكم
لو سمحت ياجماعه عند عمل البرنامج بصيغة exe ونقله علي جهاز آخر البرنامج لا يعمل ارجو الافاده

السلام عليكم 

لو سمحت ياجماعه عند عمل البرنامج بصيغة exe ونقله الي جهاز آخر يعطي رساله وهذه صورة الرساله ارجو الافاده

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

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

والذي بدوره سوف يضيف مكتبة الأدوات التي يحتاجها إلى الجهاز الثاني

تحياتي   Heart Smile
الرد }}}
تم الشكر بواسطة: sendbad100 , sendbad100



التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم