1 (изменено: griha09, 2020-12-03 16:54:12)

Тема: 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

2

Re: VBS: Ошибка:Не удается найти указанный файл.

Видимо

"""" & youtube_dl & ssylka

должно быть

"""" & youtube_dl & """ """ & ssylka
( 2 * b ) || ! ( 2 * b )