Тема: VBS: Ошибка:Не удается найти указанный файл.
Решил на основе проги youtube-dl сделать себе скриптик по получению параметров видеоролика в youtube.
list_txt="c:\00\0\list.txt" 'список с ссылками
output_txt="c:\00\0\output.txt" 'сюда пишем результаты
youtube_dl="c:\00\0\youtube-dl.exe"
Set fso = CreateObject("Scripting.FileSystemObject")
Set WSHShell = WScript.CreateObject("WScript.Shell")
Schityvanie
'Создаём процедуру
Sub Schityvanie
Set infile = fso.OpenTextFile(list_txt, 1)
Set outfile = fso.OpenTextFile(output_txt, 2, True)
Do While Not infile.AtEndOfStream
'считываем строку из list.txt в переменную ssylka
ssylka = infile.ReadLine
'выполняем
RetCode = WSHShell.Run ("""" & youtube_dl & ssylka &""" --simulate --get-title --get-id --get-duration --get-format --get-description",2,True)
'пишем в output_txt
outfile.WriteLine(RetCode)
Loop
infile.Close
outfile.Close
End Sub
Set WSHShell = Nothing
на строку 23
RetCode = WSHShell.Run ("""" & youtube_dl & ssylka &""" --simulate --get-title --get-id --get-duration --get-format --get-description",2,True)
система упорно матерится что нет файла c:\00\0\youtube-dl.exe
Сценарий: c:\00\0\скачиваем только название доделать.vbs
Строка: 23
Символ: 1
Ошибка: Не удается найти указанный файл.
Код: 80070002
Источник: (null)
хотя файл есть, ссылка на него верная. В чем проблема не понятно?
На всякий случай добавлю ссылку на архив с прогой и list.txt https://yadi.sk/d/SFHIroYsYe5j-Q