Vbscript

From Joe

Revision as of 04:20, 19 December 2011 by 94.198.60.30 (Talk)

Vbscript programozási példák alapvető példák

Well put, sir, well put. I'll cetrlainy make note of that.

Külső program indítása

A Vbscript program a mindenkori bejelentkezett felhasználó jogosultságával fut. A példa egy egyszerű szöveges szerkesztőt a Notepad-ot indítja el.

Set futtato = CreateObject("WScript.Shell")
Set objExec = futtato.Exec("notepad")

Külső program indítása és várakozás a bezárásra

A Vbscript program a mindenkori bejelentkezett felhasználó jogosultságával fut. A példa egy egyszerű szöveges szerkesztőt a Notepad-ot indítja el. Az előző példa azzal a funkcióval bővült, hogy 100ms időközönként várakozik az elindított külső program státuszára. Amíg az fut, az értéke 0. Ha a státusz érték megváltozik, egy ablakban megjelenik a változó értéke.

Set futtato = CreateObject("WScript.Shell")
Set objExec = futtato.Exec("notepad")
Do While objExec.Status = 0
 WScript.Sleep 100
Loop
WScript.Echo "Visszatérési érték: " & objExec.Status
Personal tools