Const ForReading = 1
Const ForWriting = 2
Dim fso, textfile,  fs 
Dim text,  WSHShell 
Dim AusgabeText 
 
Set WSHShell = WScript.CreateObject("WScript.Shell")
set oArgs = Wscript.Arguments
If oArgs.Count > 0 Then
	textfile = oArgs.item(0)
	msgbox textfile
	mp3file = oArgs.item(1)
	msgbox mp3file
else
msgbox("Keine Parameter mitgegeben.")
end if

textfile = "was-audio-1.log"
mp3file = "G:\Eigene Musik\was-audio-1.mp3"
textfile2 = "was-audio-2.log"
mp3file2 = "G:\Eigene Musik\was-audio-2.mp3"

Alles ist m?glich ..