How to count all directories in root drive?

Question

0.00/5 (No votes)

See more:

Hello I am a bit stuck as to why my label will not count all the directories and sub directories in C:\

I do not wish to count the files, I only wish to get a quick count for all existing Folders in which ever drive I choose.

Here is what i have so far:

Try
                Dim Root As New DirectoryInfo("SearchPath eg. C:\")
                Dim Dirs As DirectoryInfo() = Root.GetDirectories("*.*", SearchOption.AllDirectories)
                Dim count As Integer = Dirs.Length
                For Each DirectoryName In Dirs
                    Label12.Text = count
                Next
            Catch ex As UnauthorizedAccessException
            End Try

If I try to load the program with this I get a path access violation saying documents and settings is protected.

A quick example would be greatly appricated or an explaination of why this does not work would be just as equal.

thank you in advance!!

Posted 8-Aug-12 21:39pm

Dale 2012

Add a Solution

1 solution

Add a Solution

Add your solution here

Treat my content as plain text, not as HTML

Preview 0

…

Existing Members

Sign in to your account

...or Join us

Download, Vote, Comment, Publish.

Your Email
Password
Forgot your password?

Your Email
This email is in use. Do you need your password?
Optional Password

I have read and agree to the Terms of Service and Privacy Policy
Please subscribe me to the CodeProject newsletters

When answering a question please:

Read the question carefully.
Understand that English isn't everyone's first language so be lenient of bad spelling and grammar.
If a question is poorly phrased then either ask for clarification, ignore it, or edit the question and fix the problem. Insults are not welcome.
Don't tell someone to read the manual. Chances are they have and don't get it. Provide an answer or move on to the next question.

Let's work to help developers, not make them feel stupid.

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

Mehdi Gholam · Accepted Answer · 2012-08-08T22:26:00

Solution 1

Use Directory.GetDirectories("c:\") instead.

Also DirectoryInfo takes a valid path, so it should be DirectoryInfo("C:\").

Posted 8-Aug-12 22:26pm

Mehdi Gholam

Comments

Dale 2012 10-Aug-12 4:43am

Ok this is a bit confusing your reply is is saying that I should change

Dim Root As New DirectoryInfo("SearchPath eg. C:\")

to
dim root = directory.getdirectories("C:\")

but then you go to say directoryinfo takes a valid path so it should be directoryinfo ("C:\") ??????

I have got the code to all ready return all folder count for the first level of C:\ but it does not go any further....

I need this to go recrusivly into all area's of the C:\ to return a full folder count to my label...

thank you for your response can you plz add a bit to this so that it works??

cheers!

Mehdi Gholam 10-Aug-12 4:53am

Those are 2 different options.

The code you posted is wrong it should be DirectoryInfo("C:\"), Directory.GetDirectories is another way.