Dim myWs
 
textfile = "was-audio-1.log"
mp3file = "g:\was-audio-1.mp3"
textfile2 = "was-audio-2.log"
mp3file2 = "g:\was-audio-2.mp3"
 
Set myWs = CreateObject("Wscript.Shell") 
 
' Copyright Hinweis darf nicht entfernt werden'
 
WScript.Echo "----------------- WAS-Audio Updater 1.0 ---------------------"
WScript.Echo "-------------------------------------------------------------"
WScript.Echo "------ (c) 2008 Andreas Duswald / www.phpdome.de ------------"
WScript.Echo "-------------------------------------------------------------"
 
' Schleife Starten
do
  cnt = cnt + 1  
 
	WScript.Echo " " 
    WScript.Echo "--- WAS-Audio mp3 werden aktuallisiert ......."   
	WScript.Echo "--- Der Vorgang kann einige Zeit in Anspruch nehmen"
	WScript.Echo "--- Dieses Fenster darf nicht geschlossen werden"
 
	comline1 = "was-audio-1.vbs /" & textfile & " /" & mp3file
	comline2 = "was-audio-2.vbs /" & textfile2 & " /" & mp3file2
 
	myWs.run comline1,6,false 
	wscript.sleep 3600
 
	myWs.run comline2,6,false 
	wscript.sleep 3600
 
 
    WScript.Echo " " 
    WScript.Echo "--- Alle WAS-Audio mp3 auf neustem Stand"
    WScript.Echo "-------------------------------------------------------------"
    WScript.Echo date & " - " & time 
    WScript.Echo "-------------------------------------------------------------"
 
 
 
    ' Pause
  'Zeitschleife: 3600000 = 1 Stunde' 
  wscript.sleep 3599520
  cnt = cnt - 1
loop until cnt > 2

Dim textfile, mp3file 
Dim text,  WSHShell 
Dim AusgabeText 
Dim arg()
 
 
Set WSHShell = WScript.CreateObject("WScript.Shell")
Set arg=WScript.arguments
 
textfile = arg(0)
mp3file = arg(1)
 
msgbox textfile
msgbox mp3file
 
'.......

Alles ist m?glich ..