تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
لتغيير اسماء محركات الأقراص
#1
كاتب الموضوع : AhmedEssawy

اكتب في قسم التصاريح واعتماداً على دوال مكتبة kernel32 :


كود :
Option Explicit
Private Declare Function SetVolumeLabel Lib "kernel32" Alias _
"SetVolumeLabelA" (ByVal lpRootPathName As String, _
ByVal lpVolumeName As String) As Long
وفي الكود :


كود :
Dim lAns As Long

On Error Resume Next
lAns = SetVolumeLabel(DriveLetter, NewDriveVolume)
ChangeVolumeLabel = (lAns <> 0)

End Function
حيث أن البارميتر الأول هو اختصار القرصC مثلاً فيما البارمتير الآخر هو الاسم الذي تريده لهذا القرص .
}}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  الحل الأمثل لتغيير حجم الفورم حسب دقة عرض الشاشة ENG.MPROG 9 4,623 01-08-13, 06:20 AM
آخر رد: derbaliammar

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


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