Тема: VBS: поиск в тексте и вывод на экран
Здравствуйте!
Я совсем новичок в VBS, помогите с простой задачкой.
Есть инишник, File.ini, в котором надо найти значение определённой переменной и просто вывести его в MSGBOX.
Вот кусок из моего работающего скрипта, но там я произвожу замену значения переменной (через InputBox).
File.ini например:
min = 234234
vin = 34567
kin = 88
max = 68865
fax = 04534
кусок кода VBS для поиска и замены значения MAX:
UserName = Trim(InputBox("Ля-ля-ля",, "Сюда вводите"))
Set objFile = objFSO.OpenTextFile("File.ini", ForReading)
strText = objFile.ReadAll
objFile.Close
objRegExp.Pattern = "max\s*=\s*-*\d+"
strNewText = objRegExp.Replace(strText, "max = " &UserName)
Set objFile = objFSO.OpenTextFile("File.ini", ForWriting)
objFile.WriteLine strNewText
objFile.Close
Нужно вывести перед вводом нового значения - старое в msgbox-е. Чтобы знать, что и на что менять.
Я в ступоре.
А в идеале - чтобы текущее значение переменной писалось в поле ввода InputBox (вместо "Сюда вводите")
Реально такое в VBS" ?
Понимаю, что задачка - из простейших, но часа два бился, и без толку...
Заранее - спасибо!