VBS/WSH/JS - [решено] Замена одного текста на другой включая кавычки путем VBS через запуск команды в коман

Внимание, важное сообщение: Дорогие Друзья!
В ноябре далекого 2001 года мы решили создать сайт и форум, которые смогут помочь как начинающим, так и продвинутым пользователям разобраться в операционных системах. В 2004-2006г наш проект был одним из самых крупных ИТ ресурсов в рунете, на пике нас посещало более 300 000 человек в день! Наша документация по службам Windows и автоматической установке помогла огромному количеству пользователей и сисадминов. Мы с уверенностью можем сказать, что внесли большой вклад в развитие ИТ сообщества рунета.

Но... время меняются, приоритеты тоже. И, к сожалению, пришло время сказать До встречи! После долгих дискуссий было принято решение закрыть наш проект. 1 августа форум переводится в режим Только чтение, а в начале сентября мы переведем рубильник в положение Выключен

Огромное спасибо за эти 24 года, это было незабываемое приключение. Сказать спасибо и поделиться своей историей можно в данной теме.

С уважением, ваш призрачный админ, BigMac...

VBS/WSH/JS - [решено] Замена одного текста на другой включая кавычки путем VBS через запуск команды в коман

vodashk@vk

Новый участник

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

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

Изменения

Автор: vodashk@vk
Дата: 02-07-2023
Описание: уточнение

Замена одного текста на другой включая кавычки путем VBS

Доброго Всем, как выполнить решение замены текста, включая те где содержат еще и кавычки
текст в файле
MAX_num=10 заменить на MAX_num=auto (замена происходит)
max_time="600" заменить на max_time="0" (замена не происходит)

Есть запуск файла VBS через cmd но он е обрабатывает текст где есть кавычки

Код:

@echo off & title replace & color 1F
setlocal
prompt $G

cscript //Nologo replace.vbs "default_temp" "max_time="600"" "max_time="0""
cscript //Nologo replace.vbs "default_temp" "MAX_num=10" "MAX_num=auto"
cscript //Nologo replace.vbs "default_temp" "use_net=no" "use_net=1"
cscript //Nologo replace.vbs "default_temp" "rom_on=off" "rom_on=on"

Есть файл VBS с именем replace.vbs с кодом замены текста с одного на другой в файле, где по видимому нужно дописать функцию обработки текста с кавычками

Код:

Const ForReading = 1    
Const ForWriting = 2
 
strFileName = Wscript.Arguments(0)
strOldText = Wscript.Arguments(1)
strNewText = Wscript.Arguments(2)
 
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFile = objFSO.OpenTextFile(strFileName, ForReading)
strText = objFile.ReadAll
objFile.Close
 
strNewText = Replace(strText, strOldText, strNewText)
Set objFile = objFSO.OpenTextFile(strFileName, ForWriting)
objFile.Write strNewText  'WriteLine adds extra CR/LF
objFile.Close

Отправлено: 23:27, 02-07-2023

DJ Mogarych

fascinating rhythm

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

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

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

Powershell

Код:

function replace-conf ($in,$key,$value) {
    $in -replace "$key=.*","$key=$value"
}

$txt = gc "D:\temp\log1.txt"

$txt = replace-conf $txt 'max_time' '"auto"'
$txt = replace-conf $txt 'MAX_num' '"999"'

$txt

-------
Powershell 7.x | Powershell 5.1 | ffmpeg (docs)

Последний раз редактировалось DJ Mogarych, 18-07-2023 в 11:26.

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

YuS_2

Отправлено: 11:03, 18-07-2023 | #11