Solved

Gettings a List of Current Drives

Posted on 2006-07-10
6
215 Views
Last Modified: 2010-04-23
I am using Visual Basic .NET. Is there a way to get a list of the current disk drives (CD-ROM included) on the specific system? For example: C:, D:, E:.. if they exist? Code would help. Thank you.
0
Comment
Question by:Linky
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 3
  • 2
6 Comments
 
LVL 3

Accepted Solution

by:
concept99 earned 50 total points
ID: 17074687
Using WMI is probably your best bet in this situation. Here's the code:

Imports System
Imports System.Management
Imports System.Windows.Forms

Namespace WMISample

    Public Class MyWMIQuery

        Public Overloads Shared Function Main() As Integer

            Try
                Dim searcher As New ManagementObjectSearcher( _
                    "root\CIMV2", _
                    "SELECT * FROM Win32_LogicalDisk")

                For Each queryObj As ManagementObject in searcher.Get()

                    Console.WriteLine("-----------------------------------")
                    Console.WriteLine("Win32_LogicalDisk instance")
                    Console.WriteLine("-----------------------------------")
                    Console.WriteLine("Caption: {0}", queryObj("Caption"))
                    Console.WriteLine("Description: {0}", queryObj("Description"))
                    Console.WriteLine("FileSystem: {0}", queryObj("FileSystem"))
                Next
            Catch err As ManagementException
                MessageBox.Show("An error occurred while querying for WMI data: " & err.Message)
            End Try
        End Function
    End Class
End Namespace
0
 
LVL 2

Author Comment

by:Linky
ID: 17074713
There is no way to do with with DirectoryInfo or something?
0
 
LVL 41

Expert Comment

by:graye
ID: 17074750
The newer version of Visual Basic (version 2005) has the "My" namespace, so if you're using that version, it's as simple as:

For each DriveLetter as string in My.Computer.FileSystem.Drives
    ' do something
Next
0
Independent Software Vendors: We Want Your Opinion

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

 
LVL 41

Expert Comment

by:graye
ID: 17074763
Oops, my example sucks

For each Drive As System.IO.DriveInfo in My.Computer.FileSystem.Drives
   ' do Something
Next
0
 
LVL 2

Author Comment

by:Linky
ID: 17074774
Im using 2002 so that probably won't work.
0
 
LVL 2

Author Comment

by:Linky
ID: 17075192
That does the trick in my program concept99. Thank you.
0

Featured Post

Online Training Solution

Drastically shorten your training time with WalkMe's advanced online training solution that Guides your trainees to action. Forget about retraining and skyrocket knowledge retention rates.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

A while ago, I was working on a Windows Forms application and I needed a special label control with reflection (glass) effect to show some titles in a stylish way. I've always enjoyed working with graphics, but it's never too clever to re-invent …
It’s quite interesting for me as I worked with Excel using vb.net for some time. Here are some topics which I know want to share with others whom this might help. First of all if you are working with Excel then you need to Download the Following …
NetCrunch network monitor is a highly extensive platform for network monitoring and alert generation. In this video you'll see a live demo of NetCrunch with most notable features explained in a walk-through manner. You'll also get to know the philos…
Visualize your data even better in Access queries. Given a date and a value, this lesson shows how to compare that value with the previous value, calculate the difference, and display a circle if the value is the same, an up triangle if it increased…

630 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question