Retrieve filenames from Directory

liunx

Guest
I am using the system.io to navigate the directory structure on a server and I want to find out if anyone knows how to get a list of files in a certain path. I have pasted the code of how I am navigating the file structure. After the ddlCategory changes I want to fire an event to get all of the filenames under the myPath variable. Thanks in advance for your help.

Shannon


Private Sub rbServer_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles rbServer.SelectedIndexChanged

Dim myPath = "\\192.168.75.120\staging\"
Dim dirs As String() = Directory.GetDirectories(myPath)
Dim dir As String
For Each dir In dirs
Me.ddlClient.Items.Add(Mid(dir, InStrRev(dir, "\") + 1))
Next
Me.ddlClient.Items.Insert(0, "--Select Client--")

End Sub

Private Sub ddlClient_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ddlClient.SelectedIndexChanged
Dim myPath = "\\192.168.75.120\staging\" & Me.ddlClient.SelectedItem.Value & "\"
Dim dirs As String() = Directory.GetDirectories(myPath)
Dim dir As String
For Each dir In dirs
Me.ddlCategory.Items.Add(Mid(dir, InStrRev(dir, "\") + 1))
Next
Me.ddlCategory.Items.Insert(0, "--Select Category--")
End Sub

Private Sub ddlCategory_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ddlCategory.SelectedIndexChanged
Dim myPath = "\\192.168.75.120\staging\" & Me.ddlClient.SelectedItem.Value & "\" & Me.ddlCategory.SelectedItem.Value & "\"
Dim dirs As String() = Directory.GetDirectories(myPath)
Dim dir As String
For Each dir In dirs
Me.ddlSource.Items.Add(Mid(dir, InStrRev(dir, "\") + 1))
Next
Me.ddlSource.Items.Insert(0, "--Select Source--")
End Sub
 
Back
Top