.vbs - zavření okna MsgBox, kam napsat parametry příkazu

[tux]

A jak to napíšu do tý smyčky?
A další dotaz, pokud dám příkaz ke spuštění toho cmd, je nějakej parametr aby to cmd bylo pořád aktivní dokud se nezavře?

[Uziv00]

Jak do smyčky - můžeš si např. vytvořit funkci, kterou budeš ze smyčky volat. taky můžeš každý běh smyčky přičítat proměnnou, takže když to potřebuješ jen jednou, tak testneš proměnnou a pokud bude větší než jedna, tak funkci volat nebudeš. Na něco určitě přijdeš.
K cmd. Metoda volání object.Run je zde: http://msdn.microsoft.com/en-us/library ... 85%29.aspx
Nevím, jestli ti to pomůže, ale nic víc to neumí.

[tux]

Nechápu Jak mám prostě udělat to aby se mi furt mačkal ten caps a hned při tom vyskočil MsgBox?

[Uziv00]

Tak jestli to chceš tak, aby během msgbox pořád mačkal capslock, tak to nejde.

[tux]

A nejdou třeba udělat 2 VB scripty který by se nějak narvali do jednoho souboru a až jeden script doběhne k tomu loop tak poběží dál a spustí se ten druhej?

[Uziv00]

Můžeš to udělat tak, že je budeš mít v jednom souboru, pak si tu část se smyčkou nahraješ třeba do tempu a spustíš. Horší to bude s ukončením - budeš muset zjistit, který proces wscript.exe obsluhuje který skript.

[tux]

Jak? Ukončení už neřeším, to nepotřebuju

[Uziv00]

Normálně. Vytvoříš si textový soubor, pomocí writeline do něj napíšeš řádky, uzavřeš, přejmenuješ na vbs a pomocí run spustíš. Příkazy poradí strejda google. Já zápis do textového souboru používám pro logování práce skriptu, tak aspoň něco:

' vytvoreni objektu pro pristup k souborum
Set fso = CreateObject("Scripting.FileSystemObject")
logFile = path & "logfile.txt"

' nastaveni streamu pro zapis txt
Set txtStream = fso.OpenTextFile(LogFile, 8, True)

text = "Nelze načíst uživatele " & User & " na počítači: " & CompName
txtStream.WriteLine text
txtStream.Close

Parametry OpenTextFile:
LogFile - cesta k souboru
8 - je ForAppend tj. rozšíření. Jinak existuje Read a Write, hodnoty nevím z hlavy, ale google poradí.
True - Pokud soubor neexistuje, bude vytvořen.