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

Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » Скриптовые языки администрирования Windows » VBS/WSH/JS - [решено] Скрипт запуска музыки. Как исправить?

Настройки темы

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

Pozia

Ветеран

Сообщения: 2756
Благодарности: 211

Профиль | Отправить PM | Цитировать

Есть 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 то вся выделенная музыка в тотоле при нажатии кнопки поместится в список винамп. Как подправить скрипт чтобы сразу же начиналось воспроизведение песен, а то песни просто добавляются?

Отправлено: 12:08, 15-11-2009