How do you enumerate a specific set of files

[Guest_imported]

I've got a directory - C:\images - filled with stuff. In that directory are files named fred1.tga, fred2.tga, fred3.tga... I want to create a collection of objects that represent files named fred*.tga so that I can access FileSize and CreationDate in a loop. How do I do it?

 

[sfriday]

this will enumerate all the files in a folder


strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2&quot
Set colFiles = objWMIService. _
ExecQuery("Select * from CIM_DataFile where Path = '\\Scripts\\'&quot
For Each objFile in colFiles
Wscript.Echo objFile.Name
Next



Regards
Steve Friday

 

[Guest_imported]

Thanks Steve,
I was able to get that far using one of Microsofts example scripts, but what I was wondering, is how to create a collection of only the fred*.tga files.

 

[sfriday]

Can you not just issue an if statement within the FOR Each section to pick out your files,

IE
For Each objFile in colFiles
IF mid(objfile.name,11,4) = "fred" _
and right (objfile.name,3) = tag then
msgbox objfile.name & " " & objFile.LastAccessed
End If
Next


presuming mid(objfile.name,11,4) = C:\scripts\fred



Regards
Steve Friday