Skript vypíše všechny nalezené disky, jako např. A:, C:
$var = DriveGetDrive( "all" )
$all = ""
If NOT @error Then
; MsgBox(4096,"", "Found " & $var[0] & " drives")
For $i = 1 to $var[0]
; MsgBox(4096,"Drive " & $i, $var[$i])
$all = $all & $var[$i] & " "
Next
EndIf
MsgBox(4096,"Disky:", "Nalezeny disky" & @CRLF & $all)
Pavel