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

Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » Программирование и базы данных » VBS/WSH/JS - [решено] Как запустить по очереди 2 сценария с помощью скрипта

Ответить
Настройки темы
VBS/WSH/JS - [решено] Как запустить по очереди 2 сценария с помощью скрипта

Аватара для BKPB

Старожил


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

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


Есть скрипт, он запускает .cmd, не отображая окон сценария.
Скрытый текст
Set WshShell = CreateObject("WScript.Shell")
WshShell.Run chr(34) & "1.cmd" & Chr(34), 0
Set WshShell = Nothing


Как сделать, чтобы он запускал два .cmd по очереди. (1.cmd и 2.cmd).

Отправлено: 14:24, 25-06-2017

 

Забанен


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

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


BKPB, здесь не Run нужно использовать, а Exec, чтобы в stdin можно было бы запилить вызов командных сценариев.
Код: Выделить весь код
(function() {
  with (new ActiveXObject('WScript.Shell')) {
    var exe = Exec('cmd /q /k echo off');
    exe.StdIn.WriteLine('1.cmd');
    exe.StdIn.WriteLine('2.cmd');
    exe.StdIn.WriteLine('exit');

    var res = exe.StdOut.ReadAll();
    WScript.echo(res);
  }
})();

Отправлено: 15:20, 25-06-2017 | #2



Для отключения данного рекламного блока вам необходимо зарегистрироваться или войти с учетной записью социальной сети.

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


Аватара для BKPB

Старожил


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

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


greg zakharov,
Выскакивает ошибка

Скрытый текст
Сценарий: С: \Users\Администратор ПК\Desktop\Setup.vbs
Строка: 1
Символ: 1
Ошибка: Предполагается наличие инструкции
Код: 800А0400
Источник: Ошибка компиляции Microsoft VBScript

Отправлено: 15:43, 25-06-2017 | #3


Забанен


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

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


Ну дык переведите код с JScript в VBScript и будет Вам блэкджек.

Отправлено: 16:16, 25-06-2017 | #4


Аватара для BKPB

Старожил


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

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


greg zakharov, Спасибо, что помогаешь, но я вообще в этом ничего не понимаю.
Пожалуйста, помоги это сделать.

Отправлено: 17:00, 25-06-2017 | #5


Забанен


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

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


Код: Выделить весь код
Dim objWShell : Set objWShell = CreateObject("WScript.Shell")
Dim objExec : Set objExec = objWShell.Exec("cmd /q /k echo off")
objExec.StdIn.WriteLine("1.cmd")
objExec.StdIn.WriteLine("2.cmd")
objExec.StdIn.WriteLine("exit")
WScript.Echo objExec.StdOut.ReadAll
Set objWShell = Nothing
С Вас сто рублей

Отправлено: 17:12, 25-06-2017 | #6


Аватара для BKPB

Старожил


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

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


Что то ни то, запускается окно wscript.exe и висит пока не закроешь.
А файлы .cmd не выполняются.
Скрытый текст
---------------------------
Windows Script Host
---------------------------


“бЇҐе. ‚«*¤Ґ«м楬 д*©«* (Ё«Ё Ї*ЇЄЁ) "C:\Windows\System32\drivers\etc\hosts" пў«пҐвбп Ї®«м§®ў*⥫м "COMPUTER\Ђ¤¬Ё*Ёбва*в®а ЏЉ".




Џђ€Њ…—ЂЌ€…. CACLS бзЁв*Ґвбп гбв*ॢ襩, ४®¬Ґ*¤гҐвбп ЁбЇ®«м§®ў*вм ICACLS.





Џа®б¬®ва Ё Ё§¬Ґ*Ґ*ЁҐ бЇЁбЄ®ў гЇа*ў«Ґ*Ёп ¤®бвгЇ®¬ (ACL) Є д*©«*¬





CACLS Ё¬п_д*©«* [/T] [/M] [/L] [/S[:SDDL]] [/E] [/C] [/G Ё¬п:¤®бвгЇ]


[/R Ё¬п [...]] [/P Ё¬п:¤®бвгЇ [...]] [/D Ё¬п [...]]


Ё¬п_д*©«* Џа®б¬®ва бЇЁбЄ®ў гЇа*ў«Ґ*Ёп ¤®бвгЇ®¬.


/T €§¬Ґ*Ґ*ЁҐ бЇЁбЄ®ў гЇа*ў«Ґ*Ёп ¤®бвгЇ®¬ ¤«п гЄ*§***ле д*©«®ў


ў ⥪г饬 Є*в*«®ЈҐ Ё ў«®¦Ґ**ле Є*в*«®Ј*е.


/L ђ*Ў®в* б б*¬®© бЁ¬ў®«ЁзҐбЄ®© ббл«Є®©, * *Ґ б ®ЎкҐЄв®¬.


/M €§¬Ґ*Ґ*ЁҐ ACL ⮬®ў, Ї®¤Є«озҐ**ле Є Є*в*«®Јг.


/S Ћв®Ўа*¦Ґ*ЁҐ бва®ЄЁ SDDL ¤«п DACL.


/S:SDDL ‡*¬Ґ** ACL ** гЄ*§***лҐ ў бва®ЄҐ SDDL


(*Ґ ЁбЇ®«м§гҐвбп б Є«оз*¬Ё /E, /G, /R, /P Ё /D).


/E €§¬Ґ*Ґ*ЁҐ бЇЁбЄ* гЇа*ў«Ґ*Ёп ¤®бвгЇ®¬ ў¬Ґбв® ҐЈ® §*¬Ґ*л.


/C Џа®¤®«¦Ґ*ЁҐ ЇаЁ ®иЁЎЄ*е ®вЄ*§* ў ¤®бвгЇҐ.


/G Ё¬п:¤®бвгЇ ђ*§аҐиҐ*Ёп ¤«п гЄ*§***ле Ї®«м§®ў*⥫Ґ©.


„®бвгЇ: R - звҐ*ЁҐ


W - §*ЇЁбм


C - Ё§¬Ґ*Ґ*ЁҐ (§*ЇЁбм)


F - Ї®«*л© ¤®бвгЇ


/R Ё¬п Ћв§лў а*§аҐиҐ*Ё© ¤«п Ї®«м§®ў*⥫п (в®«мЄ® ў¬Ґб⥠б /E).


/P Ё¬п:¤®бвгЇ ‡*¬Ґ** а*§аҐиҐ*Ё© гЄ*§***®Ј® Ї®«м§®ў*⥫п.


„®бвгЇ: N - *Ґв


R - звҐ*ЁҐ


W - §*ЇЁбм


C - Ё§¬Ґ*Ґ*ЁҐ (§*ЇЁбм)


F - Ї®«*л© ¤®бвгЇ


/D Ё¬п ‡*ЇаҐв ** ¤®бвгЇ Ї®«м§®ў*⥫п.


„«п ўлЎ®а* *ҐбЄ®«мЄЁе д*©«®ў ЁбЇ®«м§говбп Ї®¤бв**®ў®з*лҐ §**ЄЁ.


‚ Є®¬**¤Ґ ¬®¦*® гЄ*§*вм *ҐбЄ®«мЄ® Ї®«м§®ў*⥫Ґ©.





‘®Єа*йҐ*Ёп:


CI - **б«Ґ¤®ў**ЁҐ Є®*⥩*Ґа*¬Ё.


ACE **б«Ґ¤гҐвбп Є*в*«®Ј*¬Ё.


OI - **б«Ґ¤®ў**ЁҐ ®ЎкҐЄв*¬Ё.


ACE **б«Ґ¤гҐвбп д*©«*¬Ё.


IO - в®«мЄ® **б«Ґ¤®ў**ЁҐ.


ACE *Ґ ЇаЁ¬Ґ*пҐвбп Є ⥪г饬г д*©«г Ё«Ё Є*в*«®Јг.


ID - **б«Ґ¤®ў**ЁҐ.


ACE **б«Ґ¤гҐвбп ®в ACL தЁвҐ«мбЄ®Ј® Є*в*«®Ј*.



---------------------------
ОК
---------------------------

Отправлено: 17:38, 25-06-2017 | #7


Забанен


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

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


Если Вы ничего в этом не понимаете, но получив готовое решение говорите о неработоспособности последнего, чего Вы ожидаете в ответ? Объяснения того, что в итоге приведет к тому с чего все начиналось? Может стоит приложить хоть минимум усилий со своей стороны, изучив хотя бы основы WSH? Иначе, знаете ли, никак не помочь. Если кто захочет Вам разжевать, то ждите, ибо уже надоело помогать копипастерам, не обессутьте.

Отправлено: 18:35, 25-06-2017 | #8


Ветеран


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

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


Цитата greg zakharov:
не обессутьте. »
Звучит двояко .

Отправлено: 19:02, 25-06-2017 | #9


Аватара для BKPB

Старожил


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

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


Да я не понимаю в написании, но понимаю одно, я нашёл этот скрипт:

Скрытый текст
Set WshShell = CreateObject("WScript.Shell")
WshShell.Run chr(34) & "1.cmd" & Chr(34), 0
Set WshShell = Nothing


и запустив его он выполняет то, для чего и написан. (Запускает 1.cmd и скрывает окна этого .cmd)

А если я запускаю ваш скрипт, .cmd файлы либо не срабатывают либо не вносят изменения (что именно я не могу сказать) т.к окна не отображаются.
Но зато запускается окно wscript.exe с кракозябрами и висит пока не закроешь.

То есть, тут явно что то не так.

Вот мои файлы:
[IMG][/IMG]

И не злитесь по пустякам.
Подожду может кто ещё попробует помочь.
Я и подумать не мог что это сложно сделать.

Последний раз редактировалось BKPB, 25-06-2017 в 21:39.


Отправлено: 21:23, 25-06-2017 | #10



Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » Программирование и базы данных » VBS/WSH/JS - [решено] Как запустить по очереди 2 сценария с помощью скрипта

Участник сейчас на форуме Участник сейчас на форуме Участник вне форума Участник вне форума Автор темы Автор темы Шапка темы Сообщение прикреплено

Похожие темы
Название темы Автор Информация о форуме Ответов Последнее сообщение
VBS/WSH/JS - Сканирование документов по сети с помощью скрипта A-n_G_e-L Скриптовые языки администрирования Windows 4 25-07-2016 09:29
VBS/WSH/JS - как воспроизвести звук с помощью скрипта в Windows 7 Melkii Скриптовые языки администрирования Windows 3 14-08-2012 10:01
VBS/WSH/JS - [решено] Как запустить bat'ник из скрипта напрямую? vivera864864 Скриптовые языки администрирования Windows 1 28-05-2011 14:26
[решено] Как создать учетные записи с помощью скрипта? fm72 Microsoft Windows NT/2000/2003 4 29-09-2005 14:01
Как создать файл с помощью CGI скрипта. lehha Программирование и базы данных 1 20-11-2003 09:48




 
Переход