Страница: 1 |
Страница: 1 |
Вопрос: Как отправить запроз HTTP-серверу
Добавлено: 21.08.04 07:41
Автор вопроса: ZagZag | ICQ: 295002202
Как можно отправить данные веб-серверу (да хоть Яндексу)
Как это делають все веб-браузеры
У меня есть вариант сразу получать результат, тем самым задавая вопрос:
http://www.yandex.ru/yandsearch?rpt=rad&text=Test
Но это метод GET, а как POST сделать
Или это уже выводить прийдется в "Адресной строке" только запросы GET, а POST просто пропускать
Варианты на движках IE не предлагать!
Ответы
Всего ответов: 5
Номер ответа: 1
Автор ответа:
sne
Разработчик Offline Client
ICQ: 233286456
Вопросов: 34
Ответов: 5445
Web-сайт:
Профиль | | #1
Добавлено: 21.08.04 11:29
Самый простой способ, на мой взгляд, это InternetOpenUrl
Номер ответа: 2
Автор ответа:
Sharp
Лидер форума
ICQ: 216865379
Вопросов: 106
Ответов: 9979
Web-сайт:
Профиль | | #2
Добавлено: 21.08.04 12:57
Почитай протокол HTTP, там совсем несложно
Номер ответа: 3
Автор ответа:
AASoft
Вопросов: 86
Ответов: 920
Профиль | | #3
Добавлено: 21.08.04 22:53
u DaSharm'a na sajte bylo...on tam fluder dlya chte pisal ili eshe chego to....vobshem poischi u nego.
http://www.localhost.co.nr/
Номер ответа: 4
Автор ответа:
digitron
Вопросов: 2
Ответов: 23
Профиль | | #4
Добавлено: 24.08.04 13:01
1. Добавляй референс на Microsoft WinHTTP Services (winhttp.dll)
2.
Dim oHTTP As New WinHttp.WinHttpRequest
oHTTP.Open "GET", "http://vbnet.ru", False
oHTTP.Send
oHTTP.WaitForResponse
if oHTTP.Status = 200 Then
 ebug.Print "Вот тебе HTML страницы: "
 ebug.Print oHTTP.ResponseText
Else
 ebug.Print "А это - ошибка: "
 ebug.Print oHTTP.StatusText
End If
Замечание: Последний параметер метода Open - синхронный/асинхронный запрос.
Если стоит False - то надо исполнение программы останавливать и ждать пока придёт ответ.
Если True - можешь продолжать что-то делать, а потом, толи тебе придёт событие, толи надо проверять статус запроса, чтобы узнать выполнился он, или нет. Если тебе это нужно - почитай MSDN здесь: http://msdn.microsoft.com/library/default.asp?url=/library/en-us/winhttp/http/iwinhttprequest_open.asp
Номер ответа: 5
Автор ответа:
digitron
Вопросов: 2
Ответов: 23
Профиль | | #5
Добавлено: 24.08.04 13:11
соответсвенно POST:
oHTTP.Open "POST", "http://www.урла.ru/"
oHTTP.SetRequestHeader "Content-Type", "application/x-www-form-urlencoded" 'это чтобы переслать данные так, как они посылаются из формы
oHTTP.Send "stype=www&nl=0&text=%F2%E5%F1%F2" ' здесь собственно те параметры, которые посылаются формой
ответы, как и раньше.