Задать вопрос
@fishmen
Новичёк

Почему при get запросе отказ в доступе vbs?

Здравствуйте,написал такой скриптик ,который считывает информацию в txt с сайта и возвращает ее в переменной http.responseText
В самом файле находится обычная ссылка
Затем я формирую новый гет запрос и вместо урл подсавляю переменную http.responseText - по логике вещей я должен перейти по ссылке с файла (точнее отправить гет) но почему-то получаю ошибку "отказ в доступе" при втором гете хотя в MsgBox переменная http.responseText чётко показывает ссылку прописаную в txt файле

URL="rgho.st/download/7VpxTWRd2/184281bef8df917a0f05581..."
Set WshShell = WScript.CreateObject("WScript.Shell")
Set http = CreateObject("Microsoft.XmlHttp")

http.open "GET", URL, False ' открываем txt со ссылкой
http.send ""

MsgBox http.responseText 'убеждаемся что получили содержимое файла(нашу ссылку)
http.open "GET", http.responseText , False ' подставляем наше значение вместо ссылки для гет запроса
http.send ""

if err.Number = 0 Then


End If
set WshShell = Nothing
Set http = Nothing
  • Вопрос задан
  • 303 просмотра
Подписаться 2 Простой 1 комментарий
Пригласить эксперта
Ваш ответ на вопрос

Войдите, чтобы написать ответ

Похожие вопросы