Jump to content

DriveGetDrive


zvd
 Share

Recommended Posts

How would I show all the drives in one message box instead of a box for each connection?

Thanks

$drives = DriveGetDrive("network")

If IsArray($drives) Then

For $i = 1 To $drives[0]

$unc = DriveMapGet($drives[$i])

Msgbox(0, $drives[$i], $unc)

Next

EndIf

Link to comment
Share on other sites

maybe this

Dim $alldrives = ""
$drives = DriveGetDrive("network")
If IsArray($drives) Then
    For $i = 1 To $drives[0]
        $unc = DriveMapGet($drives[$i])
        $alldrives = $alldrives & $drives[$i] & "  " & $unc & @CRLF
    Next
EndIf

MsgBox(0, "All Drives", $alldrives)

8)

not tested

NEWHeader1.png

Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...