Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  

Показать сообщение отдельно

Ветеран


Contributor


Сообщения: 2710
Благодарности: 1686

Профиль | Отправить PM | Цитировать


js по мотивам приведенных Вами примеров. Пропишите свои файлы и чему соответствуют abc и xyz
Код: Выделить весь код
var inFile='Z:\\Box_In\\test1.txt';

var abc='abc';
var xyz='xyz';

var listFile='Z:\\Box_In\\list.txt'

var outFile='Z:\\Box_In\\test2.txt';

var FSO=WScript.CreateObject("Scripting.FileSystemObject");

try {Txt=FSO.OpenTextFile(inFile, 1, false);}
catch (err) {
	if (err != 0) {
		WScript.Echo("Open file "+inFile+"\nerror: "+err.number+"\n"+err.description);
		WScript.Quit();
	}
}
var strContent = Txt.ReadAll();
Txt.Close();

try {Txt=FSO.OpenTextFile(listFile, 1, false);}
catch (err) {
	if (err != 0) {
		WScript.Echo("Open file "+listFile+"\nerror: "+err.number+"\n"+err.description);
		WScript.Quit();
	}
}
var strRepl;

while (!Txt.eof) {
	try {strRepl = Txt.ReadLine()}
	catch (e) {if (e != 0) break}
	strRepl=strRepl.replace(new RegExp(' ', 'g'), '');
	strContent=strContent.replace(new RegExp(abc+strRepl, 'g'), xyz+strRepl);
}
Txt.Close();

try {Txt=FSO.OpenTextFile(outFile, 2, true);}
catch (err) {
	if (err != 0) {
		WScript.Echo("Open file "+outFile+"\nerror: "+err.number+"\n"+err.description);
		WScript.Quit();
	}
}
Txt.Write(strContent);
Txt.Close();
Попутно предложение: почему бы вместо того, чтобы делать файл list.txt сделать xls-таблицу и обрабатывать Ваш файл макросом из-под Excel?

-------
Даже самая сложная проблема обязательно имеет простое, лёгкое для понимания, неправильное решение. Каждое решение плодит новые проблемы.


Последний раз редактировалось megaloman, 22-03-2018 в 15:44.

Это сообщение посчитали полезным следующие участники:

Отправлено: 15:36, 22-03-2018 | #6