directory searching 1

[simanek]

Hi,

I want to create a script that i can put in scheduler that will traverse a directory and list all of the files. Unfortunately, I know VERY little about VB so I was hoping someone could point me in the right direction or to a couple of online resources. I'm very new to visual basic so if there is a better way than vb to solve my problem please let me know. Thanks much. Mike
~~~~
simanek@uiuc.edu
"It's a Swingline!"
~~~~

 

[jerasi]

Here is a sample...
Create a new form and put a command buuton on it (called Command1), add the reference "Microsoft Scripting Runtime" to your list of references (Project->References...)
Add this code...

Private Sub Command1_Click()
Dim fso As New FileSystemObject
Dim myFolders As Folders, myFiles As Files
Dim aFolder As Folder, aFile As File

'looping for all the folders.
Set myFolders = fso.GetFolder("C:\myFolder&quot.SubFolders
For Each aFolder In myFolders
MsgBox aFolder.Name
Next aFolder

Set myFiles = fso.GetFolder("C:\myFolder&quot.Files
For Each aFile In myFiles
MsgBox aFile.Name
Next aFile

Set fso = Nothing
End Sub