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

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

Ветеран


Contributor


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

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


Вот симбиоз батника и js-скрипта. Сохранить файл с расширением .bat, имя обрабатываемого файла передайте в аргументе, на выходе - текстовый файл с протоколом работы
Код: Выделить весь код
@set @E=1; /*

@Echo Off
If "%~1"=="" (
	Cls
	Echo Не указано имя входного файла
	Echo:
	Pause
	GoTo :Eof 
)

cscript //NoLogo /E:jscript "%~dpnx0" "%~1" >"%~dpnx0.txt"
GoTo :Eof

*/
var oArg=WScript.Arguments;
if (oArg.Count()>0) {
	var FileTxt,Txt,err;
	var FileTxt=oArg(0); 
	var FSO=WScript.CreateObject("Scripting.FileSystemObject");
	try {Txt=FSO.OpenTextFile(FileTxt);}
	catch (err) {
		if (err != 0) {
			WScript.Echo("Open file "+FileTxt+"\nerror: "+err.number+"\n"+err.description);
			WScript.Quit();
		}
	}
	var strContent = Txt.ReadAll().replace(/\r|\n/g, '');
	Txt.Close();
	var str1,i;
	var nn=strContent.length;
	WScript.Echo('Symbol\tCount\n======\t=====');
	while (nn>0) {
		str1=strContent.substr(0,1);
		strContent=strContent.replace(new RegExp('['+str1+']','g'),"");
		i=strContent.length;
		WScript.Echo(str1,'\t',(nn-i));
		nn=i;	
	}
}
else {WScript.Echo('using script \n================= \n\n'+'cscript.exe //nologo "scriptname.js" "input text" >"outputfile.txt"');}

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

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

Отправлено: 21:55, 16-10-2017 | #7