count file types in a folder.

  • Thread starter Thread starter creecros
  • Start date Start date
C

creecros

Guest
So Heres what I have so far.


Private Sub Label1_Click(sender As Object, e As EventArgs) Handles Label1.Click
Dim FolderBrowserDialog As New FolderBrowserDialog
Dim countEm As Integer

FolderBrowserDialog.SelectedPath = "J:\EMAILS"

For Each foundFile As String In My.Computer.FileSystem.GetFiles(FolderBrowserDialog.ShowDialog(Me), FileIO.SearchOption.SearchAllSubDirectories, "*.msg")
countEm += 1
Next

Label1.Text = CStr(countEm)

End Sub





And this is the error message i am getting:

An unhandled exception of type System.IO.DirectoryNotFoundException occurred in mscorlib.dll


Looking for help. Thanks in advanced.

Continue reading...
 
Back
Top