From Joe
(Difference between revisions)
|
|
| Line 1: |
Line 1: |
| - | '''Vbscript programozási példák''' alapvető példák
| + | You can always tell an expert! Thanks for cnotirtbuing. |
| - | | + | |
| - | * [[Vbscript fájl műveletek]]
| + | |
| - | * [[Vbscript I/O műveletek]]
| + | |
| - | | + | |
| - | 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
| + | |
| - | | + | |
| - | [[category:Vbscript]]
| + | |
Current revision as of 04:20, 19 December 2011
You can always tell an expert! Thanks for cnotirtbuing.
