Antichat снова доступен.
Форум Antichat (Античат) возвращается и снова открыт для пользователей.
Здесь обсуждаются безопасность, программирование, технологии и многое другое.
Сообщество снова собирается вместе.
Новый адрес: forum.antichat.xyz
 |
14.10.2009, 18:58
|
|
Участник форума
Регистрация: 15.08.2008
Сообщений: 167
Провел на форуме:
3009843
Репутация:
204
|
|
Проблемы с WinInet.
Компилируется без проблем. В отладчике тоже проблем нет. Но не работает.
Код:
#include <iostream>
#include <windows.h>
#include <wininet.h>
#pragma comment(lib,"wininet")
using namespace std;
int main()
{
HINTERNET hInternet =::InternetOpen(
"Mozilla/4.0 (compatible; MSIE 6.0b; Windows NT 5.0; .NET CLR 1.0.2914)",
INTERNET_OPEN_TYPE_PRECONFIG, NULL, NULL, 0);
HINTERNET hConnect=::InternetConnect(
hInternet,
"http://my.mail.ru/",
INTERNET_DEFAULT_HTTP_PORT,
NULL, NULL,
INTERNET_SERVICE_HTTP, NULL, NULL);
HINTERNET hOpen=::HttpOpenRequest(
hConnect,
"POST",
"cgi-bin/auth",
NULL,
NULL,
(LPCSTR*)"image/gif, image/x-xbitmap, image/jpeg, image/pjpeg, application/msword, application/vnd.ms-excel, application/vnd.ms-powerpoint, */*",
INTERNET_FLAG_KEEP_CONNECTION,
NULL);
BOOL Send=::HttpSendRequest(
hOpen,
NULL,
0,
"page=http%3A%2F%2Fmy.mail.ru%2F&Login=test&Domain=mail.ru&Password=1234",
NULL
);
char szData[1024];
DWORD dwBytesRead;
BOOL IRead=::InternetReadFile(
hOpen,
szData,sizeof(szData)-1,
&dwBytesRead);
cout<<szData;
::InternetCloseHandle(hOpen);
::InternetCloseHandle(hConnect);
::InternetCloseHandle(hInternet);
system("PAUSE");
return 0;
}
|
|
|
14.10.2009, 23:08
|
|
Reservists Of Antichat - Level 6
Регистрация: 05.03.2007
Сообщений: 1,985
Провел на форуме:
3288241
Репутация:
3349
|
|
Читай MSDN и там хорошо описано какие параметры передаются функциям
Вот тока основные баги, но это тебе не поможет потому что много глюков связанных с HTTP проколом. Вообще не поленись и открой 5005 статей по делфи. там всё есть + 10 раз уже тут обсуждалось это
Код:
HINTERNET hConnect=::InternetConnect(
hInternet,
"my.mail.ru",
INTERNET_DEFAULT_HTTP_PORT,
NULL, NULL,
INTERNET_SERVICE_HTTP, NULL, NULL);
.............
"/cgi-bin/auth",
..................
|
|
|
|
15.10.2009, 05:11
|
|
Участник форума
Регистрация: 15.08.2008
Сообщений: 167
Провел на форуме:
3009843
Репутация:
204
|
|
Я не пишу на дельфи=\. И если 10 раз обсуждалось, где можно почитать. Гугл ничего не нашел.
|
|
|
|
15.10.2009, 10:52
|
|
Reservists Of Antichat - Level 6
Регистрация: 05.03.2007
Сообщений: 1,985
Провел на форуме:
3288241
Репутация:
3349
|
|
Delphi и С никакой разницы, потому что это WinAPI
|
|
|
|
16.10.2009, 23:01
|
|
Новичок
Регистрация: 28.11.2007
Сообщений: 26
Провел на форуме:
520867
Репутация:
11
|
|
Код:
#include <iostream>
#include <windows.h>
#include <wininet.h>
#pragma comment(lib,"wininet")
using namespace std;
int main()
{
HINTERNET hInternet =::InternetOpen(
"Mozilla/4.0 (compatible; MSIE 6.0b; Windows NT 5.0; .NET CLR 1.0.2914)",
INTERNET_OPEN_TYPE_PRECONFIG, NULL, NULL, 0);
HINTERNET hConnect=::InternetConnect(
hInternet,
"my.mail.ru",
INTERNET_DEFAULT_HTTP_PORT,
NULL, NULL,
INTERNET_SERVICE_HTTP, NULL, NULL);
HINTERNET hOpen=::HttpOpenRequest(
hConnect,
"POST",
"cgi-bin/auth",
NULL,
NULL,
(LPCSTR*)"image/gif, image/x-xbitmap, image/jpeg, image/pjpeg, application/msword, application/vnd.ms-excel, application/vnd.ms-powerpoint, */*",
INTERNET_FLAG_KEEP_CONNECTION,
NULL);
BOOL Send=::HttpSendRequest(
hOpen,
"Content-Type: application/x-www-form-urlencoded",
-1L,
"page=http%3A%2F%2Fmy.mail.ru%2F&Login=test&Domain=mail.ru&Password=1234",
strlen("page=http%3A%2F%2Fmy.mail.ru%2F&Login=test&Domain=mail.ru&Password=1234\r\n")
);
char szData[1024];
DWORD dwBytesRead;
BOOL IRead=::InternetReadFile(
hOpen,
szData,sizeof(szData)-2,
&dwBytesRead);
cout<<szData;
::InternetCloseHandle(hOpen);
::InternetCloseHandle(hConnect);
::InternetCloseHandle(hInternet);
system("PAUSE");
return 0;
}
п.с. на рсдне неплохая статья была.. |
|
|
|
06.11.2009, 18:37
|
|
Участник форума
Регистрация: 15.08.2008
Сообщений: 167
Провел на форуме:
3009843
Репутация:
204
|
|
Да я разобрался уже. С кодом проблем не было. Были проблемы с форматом передачи данных).
|
|
|
|
|
|
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|
Похожие темы
Линейный вид
