الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

مطلوب كود سريع للاعادة تسمية ملف

مغلق
بدأه mourad3d في 10 فبراير 2005 · 7 رد · 786 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

مطلوب كود سريع للاعادة تسمية ملف

وكود فتح مجلد

تم تعديل هذه المشاركة بواسطة mourad3d في 10 فبراير 2005 في 18:41

#2

لتسمية ملف

Name SourceFile As DestinationFile
#3

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

أخى الفاضل أرجوا ان يكون المثال هو مقصودك

(لاتنسى تغيير الإمتداد من VBP إلى RAR)

فتح مجلد.vbp

{يَا أَيُّهَا النَّاسُ اتَّقُوا رَبَّكُمْ إِنَّ زَلْزَلَةَ السَّاعَةِ شَيْءٌ عَظِيمٌ }الحج1

#4

مشكور shearer دائما انت حاضر لانقاذى

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

#5

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

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

{يَا أَيُّهَا النَّاسُ اتَّقُوا رَبَّكُمْ إِنَّ زَلْزَلَةَ السَّاعَةِ شَيْءٌ عَظِيمٌ }الحج1

#6

ما ذكره الأخ shearer صحيح

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

أولا إذا قمت ب:

Name "C:\a.txt" As "C:\a.txt"

فلن يحدث أي خطأ

أما إذا قمت ب:

Name "C:\b.txt" As "C:\a.txt"

وكان هناك ملف اسمه a.txt

فسيظهر لك خطأ

ولكي لا يحدث خلل في البرنامج ويغلق نفسه فاستخدم الآتي:

On Error GoTo MyErr

Name "C:\b.txt" As "C:\a.txt"

MyErr:

If Err.Number = 58 Then MsgBox ""

حيث أن الرقم 58 هو رقم الخطأ من نوع: يوجد اسم مثل الإسم الذي تريد استخدامه

أرجوا أن يفيدك هذا

#7

إذا أردت الاسبتدال احذف الملف الأول بـ

KILL "C:\t.bat"

ثم اعد تسمية الثانية لنفس مكان الأول ليحل مكانه

#8

مشكوووووووووووووووووووور

هذا الموضوع مغلق.

مواضيع مشابهة

عدد الزوار حالياً

المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية

—الإجمالي—أعضاء مسجّلون—زوار بدون تسجيل

جارٍ التحقق من المتواجدين…