VB Question

[davidhall80]

I get a data dump of 70 text files each week. I then run a batch to combine them and open it up in excel. The only problem is some of the 70 files don't always come thorough. If I am supposed to have the following 6 txt files dumped into my drive each week.

david.txt
Sally.txt
Micheal.txt
Robin.txt
Jack.txt
Jill.txt

But only david.txt, Sally.txt, & Jill.txt come through. Can I write in VB to tell me that Micheal.txt, Robin.txt, & Jack.txt weren't part of my batch. Maybe a message box or something....Thanks in advance....The search of course would be on the names of the txt files in a folder called "Data Dump" on my desktop.

 

[jindon]

Not really sure what you wanted though....

Sub test()
Dim myDir As String, e, msg As String
myDir = CreateObject(WScript.Shell").SpecialFolders("Desktop") & "\Data Dump\"
For Each e In Array("david","Sally","Micheal","Robin","Jack","Jill")
     If Dir(myDir & e & ".txt") = "" Then msg = msg & e & ".txt" & vbLf
Next
MsgBox IIf(Len(msg)>0, "Missing" & vbLf & msg, "All files are in the folder")
End Sub

 

[davidhall80]

For this line of code....I'm getting this message "Compile Error: Expected: list separator or)"


myDir = CreateObject(WScript.Shell").SpecialFolders("Desktop") & "\Data Dump\"


Any ideas??

 

[davidhall80]

I got it...I was missing a " before the "WScript"...Thanks a ton...it worked.