mozers
Silver Member | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору LEX1 Абсолютно верно! Дело именно в слеше в конце имени каталога. Я это не заметил Лови исправленный вариант: Код: ' List2String.vbs ' Скрипт для загрузки выделенных файлов/каталогов в Small CD-Writer ' Создаем кнопку на панели инструментов ' Команда: %COMMANDER_PATH%\WSH\List2String.vbs "%COMMANDER_PATH%\Tools\SCDWriter.exe" ' Параметры: %L ' ------------------------------------------------------------------- Option Explicit Dim WshShell, FSO, sProg, objArgs, FileList, sOneFile, sStringFiles Set objArgs = WScript.Arguments Set WshShell = WScript.CreateObject("WScript.Shell") sProg = WshShell.ExpandEnvironmentStrings(objArgs(0)) If objArgs.Count < 2 Then WshShell.Run """" & sProg & """", 1, False Else Set FSO = CreateObject("Scripting.FileSystemObject") Set FileList = FSO.OpenTextFile(objArgs(1), 1, False) Do While Not FileList.AtEndOfStream sOneFile = FileList.ReadLine If Right(sOneFile, 1) = "\" Then sOneFile = Left(sOneFile, Len(sOneFile) - 1) 'Нужно только для SCDWriter sStringFiles = sStringFiles & """" & sOneFile & """ " Loop WshShell.Run """" & sProg & """ " & sStringFiles, 1, False End If WScript.Quit | Это исправление, кстати, нужно только для Small CD-Writer. Слеш в конце - очень правильная запись каталога. Другие проги это понимают. А как SCDWriter будет отличать файл и одноименный с ним каталог я не представляю... |