| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Запуск скрипта! [D6, XP]

serko ©   (2006-05-13 21:21:00) 

Я ручками выполняю в коммандной строке скрипт так:
cscript.exe "C:\Program Files\TrafInsp\scripts\addcach1u.vbs" 123 СерёгаБ. 2,0 /sn:Server

Как мне его запустить через Delphi?

PS Там 4 параметра команд. строки!

---

serko   (2006-05-15 18:40:00) [1]

Спасибо! Работает!

---

Шпиён   (2006-05-15 17:12:00) [2]

Попробуй так:

ShellExecute(0, nil, 'cmd', ' /k cscript.exe Get.js 65535 "abcde fgh"', nil, sw_ShowNormal);

cmd /k Carries out the command specified by string but remains

---

serko   (2006-05-15 13:09:00) [3]

Ребят ну помогите!

---

serko   (2006-05-14 23:46:00) [4]

> Шпиён   (13.05.06 23:36) [4]

Не могу проверить срабатывает скрипт или какая то ошибка выскакивает!
Как сделать чтобы окно коммандной строки сразу не закрывалось?

---

Шпиён   (2006-05-13 23:36:00) [5]

Второй пример:

ShellExecute(0, nil, 'wscript.exe', '"D:\program files\Get.js" 65535 "abcde fgh"', nil, sw_ShowNormal);


---

Шпиён   (2006-05-13 23:28:00) [6]

Пример:
(с двумя параметрами):

uses ShellAPI;
................
ShellExecute(0, nil, 'wscript.exe', 'Get.js 65535 abcde', nil, sw_ShowNormal);


Скрипт Get.js:

var objArgs = WScript.Arguments;
var d =new Date(objArgs(0)*1000);
var s = objArgs(0)+" = " +d;
var ss = objArgs(1);
WScript.Echo(s);
WScript.Echo(ss);


---

serko   (2006-05-13 23:16:00) [7]

Та я смотрел ShellExecute, но у меня почему то не получается!

Покажите на примере!

---

Жуков Олег   (2006-05-13 21:48:00) [8]

См. ShellExecute или CreateProcess. ShellExecute попроще.

---

Наверх