Vbscript I/O műveletek
From Joe
(Difference between revisions)
| Line 4: | Line 4: | ||
Értékadás változóba kézzel. Input ablak jelenik meg, az aposztrófban megadott szöveggel. A második paraméterben az ablak szövege adható meg, a harmadik paraméter lesz a változó alapértelmezett értéke.A bevitt adatot a '''valtozo''' kapja meg | Értékadás változóba kézzel. Input ablak jelenik meg, az aposztrófban megadott szöveggel. A második paraméterben az ablak szövege adható meg, a harmadik paraméter lesz a változó alapértelmezett értéke.A bevitt adatot a '''valtozo''' kapja meg | ||
valtozo = InputBox("Kérem az adatot:","Adatveviteli ablak","Próbaadat") | valtozo = InputBox("Kérem az adatot:","Adatveviteli ablak","Próbaadat") | ||
| + | |||
| + | ===Parancssori paraméterek olvasása=== | ||
| + | A példa a parancssor két paraméterét olvassa, és ablakba teszi ki. Kevesebb paraméter megadása esetén hibaüzenet keletkezik.<br> | ||
| + | '''Vbscipt program'''<br> | ||
| + | run.vbs kódja: | ||
| + | Set oWsh = CreateObject("WScript.Shell") | ||
| + | Set oArgs = WScript.Arguments | ||
| + | Wscript.Echo " 1.paraméter=" & oArgs(0) & " 2.paraméter=" & oArgs(1) | ||
| + | '''Program hívása'''<br> | ||
| + | Hívó parancssor: '''run.vbs param1 param2''' | ||
| + | '''programfutás eredménye:'''<br> | ||
| + | 1.paraméter=param1 2.paraméter=param2 | ||
Revision as of 19:53, 2 March 2008
Input ablak
Értékadás változóba kézzel. Input ablak jelenik meg, az aposztrófban megadott szöveggel. A bevitt adatot a valtozo kapja meg
valtozo = InputBox("Kérem az adatot:")
Értékadás változóba kézzel. Input ablak jelenik meg, az aposztrófban megadott szöveggel. A második paraméterben az ablak szövege adható meg, a harmadik paraméter lesz a változó alapértelmezett értéke.A bevitt adatot a valtozo kapja meg
valtozo = InputBox("Kérem az adatot:","Adatveviteli ablak","Próbaadat")
Parancssori paraméterek olvasása
A példa a parancssor két paraméterét olvassa, és ablakba teszi ki. Kevesebb paraméter megadása esetén hibaüzenet keletkezik.
Vbscipt program
run.vbs kódja:
Set oWsh = CreateObject("WScript.Shell")
Set oArgs = WScript.Arguments
Wscript.Echo " 1.paraméter=" & oArgs(0) & " 2.paraméter=" & oArgs(1)
Program hívása
Hívó parancssor: run.vbs param1 param2
programfutás eredménye:
1.paraméter=param1 2.paraméter=param2
