mar4ello24, если в двух словах, техническая реализация следующая:
В
oFolderItems получаем коллекцию нужных нам файлов с помощью
Shell.Application и фильтрации по маске.
Каждый из них обрабатываем в цикле
For Each ... Next.
В первом
With ... End With помещаем содержимое файла в переменную
sCont с помощью
Scripting.FileSystemObject.
Во втором
With ... End With заменяем все вхождения строки, содержащей искомый текст, на саму себя с присоединением новой строки с текстом, с помощью
VBScript.RegExp.
В третьем
With ... End With помещаем содержимое переменной обратно в файл с помощью
Scripting.FileSystemObject.
Do ... Loop используется вместо
GoTo 
Описания всех применённых
ActiveX с примерами есть по ссылке
Объекты Windows Script Host. Собственно, с применением данных (и многих других)
ActiveX и раскрываются все возможности
WSH, без них скрипты имели бы лишь академический интерес, поэтому мой совет - освоить весь материал по ссылке.
