• Home
 · 
• Windows System Services
 · 
• Simple code to list all the drives in the Machine

Simple code to list all the drives in the Machine

Simple code to list all the drives in the Machine

API Declarations


'Use Reference : Microsoft Scripting Runtime
'Controls Used : ComboBox , Command Button, Form

Dim fs as Scripting.FileSystemObject
dim drv as drives,dr as drive



Rate Simple code to list all the drives in the Machine

• 1
• 2
• 3
• 4
• 5

(1(1 Vote))

set fs = CreateObject("Scripting.FileSystemObject")
set drv = fs.Drives
for each dr in drv
    Combo1.Additem dr.DriveLetter
next
End Sub