Работа с файлами одного формата в директории.

[Adolf]

Хочу задать такой вопрос, в общем мне надо изменить одинаковую фразу, допустим в файлах формата *.txt, в выбранной мной директории, которая указана в Label1. Формат я указываю в Label2.

Текст, который я ищу находится в Text1, а текст, которым надо заменить, который ищеться в Text2.

Как мне по очередно открывать файл, проводить в нем изменение. Если нет необходимой фразы, то пропускать этот файл и как мне запонить эти файлы, чтобы по новой он не начал все открывать? Просьба привести пример, а то боюсь, что не смогу разобраться.

[Maitris]

Adolf
Цикл по деректории,
Open ... For ... As #1
Close
.

Загружаешь содержимое файла в переменную, затем Replace (Переменная, "ЧтоНайти", "НаЧтоЗаменить", -1, vbTextCompare),
и обратно в этот же файл содержимое переменной с уже замененным текстом, методом Output (с очисткой перед сбрасыванием).

[Adolf]

Maitris
Open ... For ... As #1 - Это для одного файла (ректировать один файл я умею, там все просто), а мне ведь надо все открывать, чтобы я нажал кнопку, а он мне не один отредактировал, а все 50 штук формата *.txt. То есть изменил в каждом открытом файле одну и ту же запись.

[keks-n]

Ну открой сразу все 50! А потом в цикле меняешь!

[HaSH]

По моему можно перебрать файлы в каталоге с пом FSO.
Свойство Couns возвращает коллекцию фалов данного каталого.
Потом в цикле For Each Next их можно перебрать

[Sirik]

лучше dir