How to count or find folder in a drive?

[code]
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
If Not Page.IsPostBack Then
Dim numberOfFiles As Integer
Dim path As String = "c:\rengan"
numberOfFiles = System.IO.Directory.GetFiles(path).Length
MsgBox(numberOfFiles)
End If
End Sub
[/code]