Вопрос по синтаксису VBScript
 

Имеется рабочий скрипт вида

dim objExecute, break
const command = "cmd /c net view"

Set wshshell = Wscript.CreateObject("Wscript.Shell")

set ObjExecute = wshshell.Exec (command) 'выполняем команду в оболочке cmd

IsBreak = false 'определяем прерывание

Do While IsBreak = False
if (not ObjExecute.StdOut.AtEndOfStream) then
text = text & objExecute.StdOut.ReadAll ' считываем поток выполнения команды
End if
If IsBreak = true then
Exit do
End if
If ObjExecute.Status = 1 then 'Проверяем статус завершения процесса
IsBreak = true
Else
Wscript.Sleep 100
End if
Loop

Wscript.echo text

Вопрос:

Каким образом можно модифицировать константу command для фильтра - выборки (в теории "cmd /c net view | find /i "pc-sale"")
Т.к. при выполнении сценария wsh ругается с кодом ошибки на незавершенную конструкцию в этой строке, - т.е. ему не нравятся дополнительные кавычки в параметрах фильтра
<off> :) </off>
Куда же их можно удачно внедрить? ;)

dsa

Еще один трабл с кодировкой, когда Wscript.echo text отрабатывается все символы, что в пишуться на русском отображаются как иероглефы. Может кто водскажет как задать вывод Wscript.echo text в кодировке опеределенной?

voler
вероятно у тебя сам текст VBS-скрипта в DOS-кодировке

Нет ты не понял. Текст скрипта у меня в ansi кодировке. А вот та информация что в консоли выводится, она то и в иероглифах.

voler
у тебя случайно TEXT формируется не внешней CMD-командой?.. она может выводить результат в OEM-кодировке

Подскажи как это проверить?

сохрани TEXT в файле, вьюер покажет (к примеру в FAR'е).... для других вариантов нужно знать как формируется TEXT

Латиница "Text" - номально, а вот кирилица "Текст" - иероглефы.

"NET VIEW" формирует результат в OEM-кодировке, нужно перекодировать в ANSI.
Как вариант: http://forum.oszone.net/post-427527-124.html
З.Ы. Кстати, встречал варианты и на VBS, нужно только оформить массив (см. исходник) и вперед. ;)

Господа, а подскажите мне тоже по синтаксису.
Есть скрипт, выполняющий в принципе элементарные операции - последовательный запуск файла(ов) с различными параметрами, выглядит это примерно так: Все бы неплохо, но вот parameter2 не выполняется так как filename.exe не понимает зачем там столько кавычек, а иначе vbs не понимает зачим их там мало...
Вот тот текст в кавычках является частью параметра2 и не может быть ни в одинарных кавычках ни в каких-то других.
Можно побороть?

Не понял.
В твоем примере три параметра:

1. /parameter1
2. /parameter2
3. "Некий текст, который обязан быть в кавычках"

можно и так сказать, но их нельзя разделить.. как бы это объяснить толком...
нет возможности сначала выполнить параметр1 потом параметр 2, а потом параметр3 разными строками например, все они в одной строке и иначе не работают

Blast, sorry, по-прежнему не понимаю.
Я вот использую (для тестирования) твой пример, и он нормально работает. С тремя параметрами. В одной строке.

Хочешь, чтобы было два параметра?

• /parameter1
• /parameter2 "Некий текст, который обязан быть в кавычках"

Но это невозможно. Потому что после /parameter2 идет пробел. То есть, возможно, но для этого в самом filename.exe должна быть особая обработка параметров.

Ну смотри, все это наверное нужно было сразу на живом примере, тем более, что ты поймешь о чем речь :)
вот оно и не работает, именно добавление описания для загрузчика ntldr и не работает из-за кавычек...

выкрутиться можно, не проблема в принципе, то есть взять да и поставить там вместо 4-5 команд вызов cmd с ними, но мне хотелось минимизировать кол-во файлов и в принципе понять возможна ли нужная мне конструкция в vbs

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

Blast, с точки зрения синтаксиса все правильно. В этом легко убедиться, заменив WshShell.Run на MsgBox.
А если так попробовать:
Если команд несколько, почему бы и нет.

DeleteFolder

я понимаю, сам же скрипт рабочий, а тут специфика bcdedit
одно и то же.. bcdedit как таковой не воспринимает наличие двух пар кавычек и поэтому не отрабатывает в полной мере... я просто хотел убедиться, что средствами vbs это не сделать, ну нет так нет.. а жаль ага, оно, спасибо, что поискал за меня :)

При выполнении скрипта они становятся одиночными. Говорю же - замени WshShell.Run на MsgBox.
Хотя это и неважно...

ага, не понял сразу тебя, так будет очень хорошо :)
Если ты не против, то я позже еще попристаю, появилась идея еще кое-что усовершенствовать.. аппетит растет во время еды :)

А есть ли возможность в vbs на начальном этапе выводить окно с чекбоксами для нужных параметров и выполнять их в соответствии с тем какие чекбоксы были отмечены? Я может плохо искал, но не смог найти как это сделать.

это кавычки в VB так экранируются, но у меня сомнения по поводу какие кавычки ему скрипт шлеть (можеть кодировка не та или еще чего...) без стакана тут не разобраться...
Blast, попробуй чтоли WshShell.Run с параметрами указать... а если кавычки совсем убрать? Не прокатит? Пробелы замени на _

не путай VBS и VBA

Sham, а вполне прокатило с %ComSpec% /C :)
бес попутал :)
я не знаю в принципе, то есть в vbs скрипте нельзя?

afaik только InputBox и MsgBox... но с их помощью можно добиться нужного и без галок... напр. с помощью InputBox с текстом "для ..... введите букву\цифру ..... и тд"

Sham, спасиб
в принципе пока достаточно того как работает сейчас