Сохранение кода сайта в файл - VB

Узнай цену своей работы

Формулировка задачи:

Доброго времени суток. Никто не подскажет, как можно реализовать сохранение конкретной странички сайта (например с этой темой) на диск в файл. Желательно сделать с помощью VB, но рассмотрю и другие варианты решения. Важен результат Заранее спасибо.

Решение задачи: «Сохранение кода сайта в файл»

textual
Листинг программы
  1. 'URL файла в Интернете
  2. sUrlRequest =  "http://www.cyberforum.ru/visual-basic/thread1133440.html"
  3. 'создание объекта XMLHTTP
  4. Set oXMLHTTP = CreateObject("MSXML2.XMLHTTP")
  5. 'подключение
  6. 'oXMLHTTP.Open "GET", sUrlRequest, False, MyName, MyPassword
  7. oXMLHTTP.Open "GET", sUrlRequest, False
  8. 'получение файла
  9. oXMLHTTP.Send
  10. 'создание и открытие текстового файла для сохранения
  11. set fso = CreateObject("Scripting.FileSystemObject")
  12. fso.CreateTextFile "c:\test.txt", True
  13. Set f = fso.OpenTextFile("c:\test.txt", 2, True)
  14. 'сохранение
  15. f.WriteLine(oXMLHTTP.Responsetext)

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

9   голосов , оценка 4 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Бесплатно
Оформите заказ и авторы начнут откликаться уже через 10 минут
Похожие ответы