Zip Drive

[Lespaul36]

How I can I determine if a drive is a zip drive.

TIA

[Ken Tucker [MVP]]

Hi,

The wmi win32_logicaldisk class has information about the drives.
There is no clear zip drive property but take a look at the drive type,
Caption, Description, and PNPDeviceID. Add a reference to system.management
for to use the wmi. Hope this helps.

http://msdn.microsoft.com/library/de...ogicaldisk.asp

Dim moReturn As Management.ManagementObjectCollection

Dim moSearch As Management.ManagementObjectSearcher

Dim mo As Management.ManagementObject

moSearch = New Management.ManagementObjectSearcher("Select * from
Win32_LogicalDisk")

moReturn = moSearch.Get

For Each mo In moReturn

Dim strOut As String

strOut = String.Format("Drive {0} - Drive Type {1}", mo("Name"),
mo("DriveType"))

Trace.WriteLine(strOut)

Next

Ken

--------------------

"Lespaul36" <le*******@none.net> wrote in message
news:%2****************@TK2MSFTNGP10.phx.gbl...

How I can I determine if a drive is a zip drive.

TIA

[Lespaul36]

I tried that, but it throws an error. I am thinking that mabe it is because
it is an old LPT one.
"Ken Tucker [MVP]" <vb***@bellsouth.net> wrote in message
news:eo*************@TK2MSFTNGP10.phx.gbl...

Hi,

The wmi win32_logicaldisk class has information about the drives.
There is no clear zip drive property but take a look at the drive type,
Caption, Description, and PNPDeviceID. Add a reference to system.management for to use the wmi. Hope this helps.

http://msdn.microsoft.com/library/de...ogicaldisk.asp
Dim moReturn As Management.ManagementObjectCollection

Dim moSearch As Management.ManagementObjectSearcher

Dim mo As Management.ManagementObject

moSearch = New Management.ManagementObjectSearcher("Select * from
Win32_LogicalDisk")

moReturn = moSearch.Get

For Each mo In moReturn

Dim strOut As String

strOut = String.Format("Drive {0} - Drive Type {1}", mo("Name"),
mo("DriveType"))

Trace.WriteLine(strOut)

Next

Ken

--------------------

"Lespaul36" <le*******@none.net> wrote in message
news:%2****************@TK2MSFTNGP10.phx.gbl...

How I can I determine if a drive is a zip drive.

TIA

[Lespaul36]

It isn't really an error from win32_logicaldisk, it was a handling error,
but the response comes back blank for pnpdeviceid. I can find the drive,
but it is a matter of gettng the caption for it. I have it saying
"Removable Drive" from using the FileSystemObject. I found that if I search
through some of the explorer registry keys I can sometimes get the name, but
it is iffy.

It would be nice if I could do it for multiple os versions.

<le*******@none.net> wrote in message
news:Ok**************@TK2MSFTNGP11.phx.gbl...

I tried that, but it throws an error. I am thinking that mabe it is because it is an old LPT one.
"Ken Tucker [MVP]" <vb***@bellsouth.net> wrote in message
news:eo*************@TK2MSFTNGP10.phx.gbl...

Hi,

The wmi win32_logicaldisk class has information about the drives. There is no clear zip drive property but take a look at the drive type,
Caption, Description, and PNPDeviceID. Add a reference to

system.management

for to use the wmi. Hope this helps.

http://msdn.microsoft.com/library/de...ogicaldisk.asp

Dim moReturn As Management.ManagementObjectCollection

Dim moSearch As Management.ManagementObjectSearcher

Dim mo As Management.ManagementObject

moSearch = New Management.ManagementObjectSearcher("Select * from
Win32_LogicalDisk")

moReturn = moSearch.Get

For Each mo In moReturn

Dim strOut As String

strOut = String.Format("Drive {0} - Drive Type {1}", mo("Name"),
mo("DriveType"))

Trace.WriteLine(strOut)

Next

Ken

--------------------

"Lespaul36" <le*******@none.net> wrote in message
news:%2****************@TK2MSFTNGP10.phx.gbl...

How I can I determine if a drive is a zip drive.

TIA