Имя: Пароль:
IT
 
Как получить кусок текста сайта(HTML) с помощью VBS
0 Gluk
 
09.05.10
17:26
Без скачивания страницы
1 kitt
 
09.05.10
17:27
никак))
2 kitt
 
09.05.10
17:30
напомнило старую присказку по кучу использованного трафика юзероф:
- Ну я же ничего не скачиал только страницы открывал!
- Ну я же ничего не скачивал, только онлайн видео смотрел.

ЗЫ.Курите основы работы браузеров и протокола HTTP
3 Gluk
 
09.05.10
18:51
(1),(2)
Что на это скажете?

Set MyBrowser =   CreateObject("MSXML2.XMLHTTP")
MyBrowser.Open "GET", "http://www.yandex.ru/", False
MyBrowser.send
If MyBrowser.status = 200 Then HTMLText = MyBrowser.responseText
Set MyBrowser = Nothing
msgbox HTMLText
4 kitt
 
09.05.10
19:27
(3)
Ну что же, если есть уверенность, тогда вперед - попробуйте таким способом скачать очень большой файл например
Set MyBrowser =   CreateObject("MSXML2.XMLHTTP")
MyBrowser.Open "GET", "http://www.figznaetchto.ru/Avatar_blue_ray.avi", False
MyBrowser.send
If MyBrowser.status = 200 Then
   MyBrowser.Save "c:\Avatar.avi"
end

а потом докажите своему провайдеру, что вы не скачивали 32 Гигабайта с интернета.

если кому то непонятно ЗЫ из (2), я поясню -
в момент
MyBrowser.send

скрипт отсылает серверу http://www.yandex.ru/ гет запрос  и принимает от него в ответ страниц, которая потом выводится в msgbox HTMLText, то есть происходит скачивание, аналогичное тому, если бы вы зашли в обычном браузере и  набрали в строке адреса http://www.yandex.ru/

Поэтому получение ХТМЛ без скачки не засчитывается.
А вообще, кроме шуток, очень рекомендую ознакомится с основами протоколов HTTP, не говоря уже про TCP/IP и прочие вещи. Глупые вопросы сами собой отпадут.
Основная теорема систематики: Новые системы плодят новые проблемы.