[Kareem2021]

{{{{بسم الله الرحمن الرحيم}}}}

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

الي الاخواء في الامنتدي الجميل هل من طريقة

عمل برنامج لتغير اسم قرص النظام مثال

هل وقت قرص النظام بشكل هد

القرص المحلي ©

القرص المحلي (D)

القرص المحلي (E)

القرص المحلي (F)

القرص المحلي (G)

القرص المحلي (H)

انا لم بدي اغير اسم القرص الي اي حرف اخر

لزم اروح علي ادارة الكمبيوتر ومن ادارة الكمبيوتر الي ادارة الاقرص

وبعدي كليك يمن وتغير الحرف

انا بدي شي مريح من خلال برنامج بالفجوال بيسك يغير اسم

القرص اي قرص كيف اي قرص 

السي 

الديء

الاي

الفء

الجي

الاتش

مش مهم انا الفكر عوز برنامج يغير اسم القرص 

وشكرء لكم والي الاخو في المنتدي والمشرفين علي 

خدمين الناس المبتدين مثالي

[aldery]

تفضل أخي جرب هذا الكود أنا لم أجربه ولكن نقلته لك أتمنى أن يعمل لديك 

كود :

Dim OldName, NewName As String
OldName = "OLDFILE"
' Define file names.
NewName = "NEWFILE"
' Rename file.
Rename(OldName, NewName)

OldName = "C:\OLDDIR\OLDFILE"
NewName = "C:\NEWDIR\NEWFILE"
' Move and rename file.
Rename(OldName, NewName)