Hi Leute hab eine Frage es muss doch möglich sein zwei Programme auf einmal zu starten z.Bsp., Firewall und Browser. Mit dem WSH müsste es doch möglich sein? Hab schon versucht ein Skript damit zuschreiben, bin aber nicht weitergekommen. Kann mir jemand helfen?
Programmieren - alles kontrollieren 4.935 Themen, 20.621 Beiträge
Set ws = WScript.CreateObject("WScript.Shell")
Ret = ws.run ("Programm1",0)
Ret = ws.run ("Programm2",0)
Hier mal ein ganzer Script, welcher andere VB Scripte aufruft, funktioniert auch mit Windowsprogrammen !
'***********************************************************************
'* tmstimer.vbs Visual Basic Script für Windows Hostscripting
'***********************************************************************
'* NT Serverseitiger Script zum zeitgesteuertem Aufruf der Tandem
'* Mail Service Scripte. Wird durch den Scheduler alle 5 -30 min gestartet
'* Arbeitet mit dem Taclmacro tms (Tandem Mail Service) zusammen
'***********************************************************************
'***********************************************************************
'Dim der Variablen und Konstanten
dim TextLine
dim MSGString
dim Ret
Const ForReading = 1
Const Datei = "twswap.txt"
Const Daten = "\\tgt_dc1\d\ftpdata\tms\"
'Error-Routine einschalten
on error resume next
'Create des Objektes als FileSystemObject und ShellObject
set fs = CreateObject("Scripting.FileSystemObject")
Set ws = WScript.CreateObject("WScript.Shell")
'Ermitteln der angelegten Tandem Mail Service Dateien
MSGString = "cmd /C dir" & Daten & "tm*.vbs /B > " & Daten & Datei
Ret = ws.run (MSGString,0,true)
'Datei tmswap.txt zum lesen öffnen
set fo = fs.OpenTextFile(Daten & Datei,ForReading, true)
'Zeilenweises Auslesen
do while fo.AtEndOfStream true
TextLine = fo.ReadLine
Ret = ws.run (Daten & TextLine,0,true)
loop
'Datei tmswap schließen
fo.close
'Datei tmswap löschen
set Source = fs.GetFile(Daten & Datei)
Source.Delete
WScript.Quit()
'************************************* Ende der Routine ***************************************
Hoffe es hilft Dir weiter
repi