I'm working on a PCAnywhere OLE Automation program and basically I want to be able to sift through the thousands of host files that we use to connect to remote machines.
I came up with a slick and cheater way of sorting the file names in the network drive so that I can find them pretty easily:
This basically uses the filelistbox to eliminate possibilities by refreshing the Pattern element of the fileList object.Code:Private Sub searchBox_Change() Dim tempStr As String Dim tempFType As String fileList.Path = "M:\cknapp\pcAW" tempStr = searchBox.Text + tempStr tempFType = "*.chf" fileList.Pattern = tempStr + tempFType fileList.Refresh MsgBox (fileList.Pattern) End Sub
What I want it to do on top of this is search the subfolders that contain more remote files, is there an easy way to do this?




Reply With Quote