ask-rus
|
 Posted: Fri Nov 13, 2009 17:55 Post subject: |
 |
|
| Batya wrote: | | Rodny wrote: | | Работает только "/INSERT %p%n" для одного файла. |
Тогда так:
| Code: | TOTALCMD#BAR#DATA
c:\Путь\к\скрипту\MultiRun.vbs 0
c:\Полный\путь\Aimp2.exe /INSERT {{%L}}
c:\Полный\путь\Aimp2.exe
Добавить в плейлист Aimp
-1
|
|
Cцeнapий: C:\Documents and Settings\Acкep\Paбoчий cтoл\MultiRun.vbs
Cтpoкa: 9
Cимвoл: 1
Oшибкa: Фaйл нe нaйдeн
Кoд: 800A0035
Иcтoчник: Oшибкa выпoлнeния Microsoft VBScript
MultiRun.vbs
| Code: | ' Sample: Создаем кнопку на панели инструментов:
' Команда: %COMMANDER_PATH%\Utils\WSH\MultiRun.vbs
' Параметры: %L
' _________________________________________________________
Set objArgs = WScript.Arguments
Set WshShell = WScript.CreateObject("WScript.Shell")
Set FSO = CreateObject("Scripting.FileSystemObject")
Set FileList = FSO.OpenTextFile(objArgs(0), 1, False)
Do While Not FileList.AtEndOfStream
sFile = FileList.ReadLine
If Right(sFile,1) = "\" Then
WshShell.Run """" & sEditor & """", 1, False
Exit Do
End If
WshShell.Run "rar d " & sFile & " @filesToDelete.lst", 1, False
Loop |
|
|
Rules
Search
FAQ
Memberlist
Usergroups
Register
Profile
Log in to check your private messages
Log in
