Getting Drive Info with KERNEL32.DLL

This code has been declared by its author to be Public Domain code.

Getting Drive Info with KERNEL32.DLL by Klaas

2003

This short proggy lists all used driveletters ...

wert=CallDLL ("kernel32.dll", "GetLogicalDrives")
For i=0 To 25
	ShiftedData=wert Shr i
	BitValue = ShiftedData And 1;
	If BitValue<>0
		Print Chr(65+i)+":\\"
	EndIf
Next
WaitKey
End

Comments

None.

Code Archives Forum