Модераторы: Akina
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> POST формы 
:(
    Опции темы
Sheff
Дата 8.10.2002, 08:23 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник Клуба
Сообщений: 503
Регистрация: 25.3.2002
Где: Зеленоград

Репутация: нет
Всего: 3
Как в VB при помощи Ms Inet Transfer control'а послать POST запрос.
Скажем есть сайт xxx.com, а там скрипт test.cgi, на сайте есть POST форма, когда юзер её заполняет, то скрипту посылается POST запрос: name=test&text=...
Так вот, как мне это в VB сделать без этой HTML формы ?


--------------------
--------------------------
Шеф всегда прав :)
PM MAIL WWW ICQ   Вверх
Sheff
Дата 8.10.2002, 21:24 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник Клуба
Сообщений: 503
Регистрация: 25.3.2002
Где: Зеленоград

Репутация: нет
Всего: 3
Всё, сам разобрался :)
Но тогда у меня вот какой вопрос, как сделать это только с WinSock'ом ?


--------------------
--------------------------
Шеф всегда прав :)
PM MAIL WWW ICQ   Вверх
Wowa
Дата 8.10.2002, 22:34 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
Group Icon


Профиль
Группа: Админ
Сообщений: 15017
Регистрация: 14.9.2000
Где: Винград

Репутация: нет
Всего: 290
Напиши, как ты это сделал! Интересно ведь.
PM WWW   Вверх
Sheff
Дата 9.10.2002, 03:14 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник Клуба
Сообщений: 503
Регистрация: 25.3.2002
Где: Зеленоград

Репутация: нет
Всего: 3
С помощью Ms Inet Transfer Control'а это делается вот так:
Код

Dim strUrl As String
Dim strFormData As String
   
strFormData = "field1=value1&field2=value2"
strUrl = "http://domain.com/script.cgi"

Inet1.url = strUrl
Inet1.Execute strUrl, "POST", strFormData, "Content-Type: application/x-www-form-urlencoded"

А в VC++ тоже самое можно сделать вот так, используя Win Inet классы:
Код

CInternetSession sess;
CHttpConnection *http=sess.GetHttpConnection("domain.com",INTERNET_FLAG_TRANSFER_ASCII,80,NULL,NULL);
CHttpFile *file=http->OpenRequest("POST","/script.cgi");
CString h1("Content-Type: application/x-www-form-urlencoded\r\n");
file->AddRequestHeaders(h1);
char str[]="field1=value1&field2=value2";
file->SendRequest(h1,str,strlen(str));

Всё это хорошо, но мне бы хотелось сделать это через сокеты, не используя всех этих дополнительных классов, контролов и т.д.


--------------------
--------------------------
Шеф всегда прав :)
PM MAIL WWW ICQ   Вверх
bevaine
Дата 31.5.2006, 10:12 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 2
Регистрация: 31.5.2006

Репутация: нет
Всего: нет
Sheff, скажите пожалуйста как получить результат, посланной формы? 
PM MAIL   Вверх
Wazluk
Дата 3.8.2006, 19:36 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 28
Регистрация: 15.6.2006

Репутация: нет
Всего: нет
Да,аналогичный вопрос. smile 
PM MAIL   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "VB6"
Akina

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по VB обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • Используйте теги [code=vb][/code] для подсветки кода. Используйтe чекбокс "транслит" (возле кнопок кодов) если у Вас нет русских шрифтов.

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Akina.
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | VB6 | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 1.3868 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.