[решено] Скрипт запуска музыки. Как исправить?

Есть VBS скрипт вида:

Код:

Dim Winamp

Winamp = "c:\Program Files\Winamp\winamp.exe" 'Путь к Winamp-у



Set objArgs = WScript.Arguments

Set TempFile = CreateObject("Scripting.FileSystemObject").OpenTextFile(objArgs(0), 1)

Set WS = CreateObject("WScript.Shell")



if objArgs.Count > 1 then

Str = TempFile.ReadLine

if Right(Str,1) = "\" then

Str = Left(Str, Len(Str) - 1)

end if

WS.run chr(34) & Winamp & chr(34) & " " & chr(34) & Str & chr(34)

end if



Do While Not TempFile.AtEndOfStream

Str = TempFile.ReadLine

if Right(Str,1) = "\" then

Str = Left(Str, Len(Str) - 1)

end if

WS.run chr(34) & Winamp & chr(34) & " /add " & chr(34) & Str & chr(34)

Loop

Если в тотале сделать кнопку на запуск этого скрипта с параметром %L то вся выделенная музыка в тотоле при нажатии кнопки поместится в список винамп. Как подправить скрипт чтобы сразу же начиналось воспроизведение песен, а то песни просто добавляются?