I'm lost - I need a script to cycle through a directory - parse files

[tcspine]

In detail, I need to parse 'msinfo32' files that have been converted to text and pull from them 'computer name' and 'system model'.

The files I need to parse are named after the user (first initial, middle initial, last name).

I don't want to have to input the file name to do this, and I need it to go through the whole directory without having to have the filename hard coded.

 

[SteveDubuc]

Have you tried something like this:

Dim objFSO, objFile
Set objFSO = CreateObject ("Scripting.FileSystemObject")

For Each objFile In objFSO.GetFolder ("C:\DataFolderName").Files ' or wherever your data Is
ParseFile objFile.Path
Next

Sub ParseFile (ByVal strFile)

Dim objInFile
Dim strLineIn

Set objInFile = objFSO.OpenTextFile (strFile, 1)

' Read the file line by line
Do While Not objInFile.AtEndOfStream
strLineIn = objFile.ReadLine
' insert code to do whatever you want to
' do with the data contained in strLineIn
Loop

objInFile.Close
Set objInFile = Nothing

End Sub