Forums Neueste Beiträge
 

[XP] vbs Skript

14/11/2010 - 18:45 von Walt Gallus | Report spam
Guten Tag

wie kann ich in diesem von Ralf Bauer stammenden Skript dafür sorgen,
dass die Anwendung minimiert starte?


' Datei: RestartTwixTel.vbs
'
' Funktion: Startet TwixTel wie gewohnt.
' Beim Beenden von TwixTel kann gewàhlt
' werden, ob TwixTel beendet oder neu
' gestartet werden soll.

Option Explicit
Dim WshShell,Command
Dim Return,Prompt,Title,Result

Command = "c:\programme\twixtel\twixtel.exe"
Prompt = "Möchten Sie TwixTel beenden?"
Title = "TwixTel Restarter"

Set WshShell = WScript.CreateObject("WScript.Shell")
WScript.Sleep 60000
While RestartTwixTel()
' Leere Schleife
Wend
Set WshShell = Nothing
WScript.Quit

Function RestartTwixTel()
Return = WshShell.Run(Command, 1, True)
Result=MsgBox(prompt,36,title)
If Result = 6 Then
RestartTwixTel = False
else
RestartTwixTel = True
end if
End Function


Dank und Gruss
Walt Gallus
 

Lesen sie die antworten

#1 Hans-Peter Matthess
14/11/2010 - 21:39 | Warnen spam
Walt Gallus:

wie kann ich in diesem von Ralf Bauer stammenden Skript dafür sorgen,
dass die Anwendung minimiert starte?

Return = WshShell.Run(Command, 1, True)



Indem du aus der "1" eine "7" machst.

hpm

Ähnliche fragen