| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

HTTP запрос средствами WinSock [D7, Win2k, WinXP]

Страницы:   < 1 2 >

-=Germe$=- ©   (2007-05-16 07:47:00) 

Как сделать HTTP запрос(GET) средствами WinSock

---

-=Germe$=-   (2007-05-23 09:19:00) [21]

Что не верно?

 WSAStartup($101,Data);
 Adr.sin_family:=AF_INET;
 Sock:=Socket(AF_INET, SOCK_DGRAM, 0);
 Adr.sin_addr.S_addr:=inet_addr(pchar(' http://localhost'));
 If Sock=INVALID_SOCKET then
   Halt;
 Adr.sin_port:=htons(80);
 If connect(Sock,Adr,sizeof(Adr))=0 then
 begin
    GET:=Format('GET %s HTTP/1.0'#13#10+'User-Agent: %s'#13#10#13#10,     [' http://localhost/test.php?variable='+str,'incompatible']);
    Send(Sock, Get, Length(Get), 0);
 end;



---

SpellCaster   (2007-05-17 14:48:00) [22]

> [5] апвып   (16.05.07 17:22)

Попробуй сохранить в файл и открыть в браузере либо в тексовом редакторе, поддерживающем эту кодировку

---

DVM   (2007-05-16 17:28:00) [23]

> может я неправильно считываю ее?

может и не правильно, как ты же не написал.

---

апвып   (2007-05-16 17:22:00) [24]

да я это пробовал но чегото не помогает ((

может я неправильно считываю ее?
там как идут буквы по два байта? или?

---

clickmaker   (2007-05-16 13:32:00) [25]

> как переконвертировать

Utf8ToAnsi()

---

апвып   (2007-05-16 13:27:00) [26]

у меня ситуация следующая в заголовке ответа есть следующий параметр "charset=utf-8"

и основное тело я незнаю как переконвертировать

---

SpellCaster   (2007-05-16 11:30:00) [27]

пардон, "GET %s", без слэша

---

SpellCaster   (2007-05-16 11:27:00) [28]

s:=Format('GET /%s HTTP/1.0'#13#10+'User-Agent: %s'#13#10#13#10,     [URL,UserAgent]);
if Send(socket,s[1],Length(s))=SOCKET_ERROR then ...

---

Страницы:   < 1 2 >

Наверх