Поиск и замена текста в окне

[Noober]

Есть скрипт который подряд открывает документы (типа блокнота) и дописывает в каждом определенную фразу.
Как сделать что бы он искал в определенном окне фразу и менял её на мою.

 

[Yashied]

Re: Поиск и замена

{TopicNameWarn.SModer}

 

[kaster]

Re: Поиск и замена текста в блокноте

Noober
если предоставишь больше данных, что за текст, как менять, на что менять, то тут вполне можно обойтись и без блокнота ;)

 

[madmasles]

Re: Поиск и замена текста в блокноте

Noober
Попробуйте так:

#include <File.au3>

$sFolder = @ScriptDir & '\MyFolder'
$sTextAdd = 'Текст, который добавляем.'
$sTextSearch = 'Текст, который заменяем.'
$sTextReplace = 'Текст, на который заменяем.'
$sTextOld = ''
$sTextNew = ''

$aFileList = _FileListToArray($sFolder, '*.txt', 1)
If @error Then Exit
For $i = 1 To UBound($aFileList) - 1
	$hFile = FileOpen($sFolder & '\' & $aFileList[$i], 0)
	$sTextOld = FileRead($hFile)
	FileClose($hFile)
	$sTextNew = StringReplace($sTextOld, $sTextSearch, $sTextReplace) & @CRLF & $sTextAdd
	$hFile = FileOpen($sFolder & '\' & $aFileList[$i], 2)
	FileWrite($hFile, $sTextNew)
	FileClose($hFile)
	$sTextOld = ''
	$sTextNew = ''
Next

 

[Noober]

Re: Поиск и замена текста в блокноте

Noober
если предоставишь больше данных, что за текст, как менять, на что менять, то тут вполне можно обойтись и без блокнота ;)

http://img16.imageshack.us/img16/5346/47028861.jpg
Вообще суть такая есть прога, в ней открывается окошко в котором нужно исправить определенную строчку F_STREETYP на F_STREETYPE, дальше она закрывается и идет в низ на следующего и так до конца базы.


Добавлено:

Сообщение автоматически объединено: 16 Июн 2010

madmasles
Версия хорошая но у меня нет файлов, они открываются в отдельном окне.