Thank you, I'll repost there as well. It honestly doesn't matter if it's done in VB or VB script. I've been able to figure out how to search a file for the string.
Dim objFSO, strLine, objReadFile
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objReadFile = objFSO.OpenTextFile("C:\temp\Test.txt", 1, False)
Do Until objReadFile.AtEndOfStream
strLine = objReadFile.ReadLine
strLine = trim(strLine)
if instr(strLine, "123456") Then
'save this file to folder C:\temp\saveEnd If
Loop
set objFSO = nothing
I'm just not understanding how to do it for every file in the folder, and once it finds the string, how to save it to the other folder.