Re: Help s primitivnim vbs

From: Petr Pokorny (mail@pp21.cz)
Date: 19. 07. 2003, 16:06 CEST 

snuffer <snuffer@seznam.cz>:

> Call MsgBox("Tady je nejaky text", 64, "")
> ...
> s parametrem, ve kterem bude ten text. Tedy treba nejak
> takle: "d:/path/box.vbs" "%VAR%",
> ...
> Je to, prosim, JEDNODUSE resitelne v intencich toho jednoducheho .vbs?

Ano, je.

Hodne jednoduse takhle:

----------
Call MsgBox(WScript.Arguments(0), 64, "")
----------

Trochu sloziteji, ale malinko elegantneji pak takhle:

----------
If WScript.Arguments.Count > 0 Then
  Arg = WScript.Arguments(0)
Else
  Arg = "nejakej help text, ze chces argument"
End If
Call MsgBox(Arg, 64, "")

----------

Uzij si to ;o))

-pp21-

This archive was generated by hypermail 2.1.3 : 19. 07. 2003, 16:06 CEST