Beefy Boxes and Bandwidth Generously Provided by pair Networks
Welcome to the Monastery

Re: List of Mounted Drives on Win32

by lolindrath (Scribe)
on Dec 27, 2000 at 10:49 UTC ( #48394=note: print w/replies, xml ) Need Help??

in reply to List of Mounted Drives on Win32

Ok, I looked up some stuff and I found out that Win32::AdminMisc will do what you want if you have a WinNT system. Here's an example(Not tested).
#!/usr/bin/perl -w use Win32::AdminMisc; my $drives = GetDrives( DRIVE_FIXED ); print $drives . "\n";

The drive types are:
DRIVE_FIXED - hard drive DRIVE_REMOVABLE - floppy DRIVE_REMOTE - network drive DRIVE_CDROM - cdrom DRIVE_RAMDISK - emulated drive in memory
Some other functions that might help are:
GetDriveType( DRIVE ) - returns the drives type GetDriveSpace ( DRIVE ) - returns the drives space GetVolumeInfo ( DRIVE ) - returns hash of drive info Element Desc ------------------ Volume Volume Label Serial Serial number of drive

I tried this script after installing Win32::AdminMisc and it told me I needed WinNT. So I wrote this one.
#!/usr/bin/perl -w for( my $i='a'; $i lt 'z'; $i++ ) { if ( -e "$i:/" ) { print "Drive $i exists\n"; } }

This works under Win98 but it didn't pick up the A: drive because it didn't have any media in it. It also delayed while seeing if the A: drive had something in it. I also don't know how to find the volume label.
I'm hoping you're on a WinNT system, then you're set.


Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://48394]
and one hand claps...

How do I use this? | Other CB clients
Other Users?
Others contemplating the Monastery: (6)
As of 2018-04-26 23:18 GMT
Find Nodes?
    Voting Booth?