Форум: "Сети";
Текущий архив: 2003.02.13;
Скачать: [xml.tar.bz2];
ВнизНе могу получить ответ на запрос ТClientSocket!!! Найти похожие ветки
← →
a-leksey (2002-12-21 14:59) [0]Послал запрос, а ответа нет???? Может с ДНС проблема, потому что после конеста в Socket.RemoteHost пустой. Хотя если пробовать конектиться по левым портам то коннект не происходит, знать к серверу запрос на коннект доходит....
procedure TForm1.BitBtn1Click(Sender: TObject);
begin
ClientSocket1.Host:="www.meta-ukraine.com";
ClientSocket1.Port:=80;
ClientSocket1.Open;
end;
procedure TForm1.ClientSocket1Connecting(Sender: TObject;
Socket: TCustomWinSocket);
var zapros:string;
begin
zapros:="GET http://www.meta-ukraine.com/index.html HTTP/1.0"+#10+"Accept: */*"+#10+"Referer: http://www.meta-ukraine.com"+#10+"Accept-Language: ru"+#10+"Proxy-Connection: Keep-Alive"+#10+"User-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1)"+#10"Host: www.meta-ukraine.com";
Socket.SendText(zapros);
Memo1.Lines.Add("---- Conecting ----");
Memo1.Lines.Add("from: "+Socket.LocalHost);
Memo1.Lines.Add("to: "+Socket.RemoteHost);
Memo1.Lines.Add("------ Send -------");
Memo1.Lines.Add(zapros);
end;
procedure TForm1.ClientSocket1Read(Sender: TObject;
Socket: TCustomWinSocket);
begin
Memo2.Lines.Add(Socket.ReceiveText);
end;
← →
a-leksey (2002-12-21 15:39) [1]Ну, ребятки поткиньте советик...
← →
Digitman (2002-12-22 14:26) [2]На основании каких соображений ты поместил строчку
Socket.SendText(zapros);
в обработчик события ИМЕННО OnConnecting() ?
Почему не в OnConnect() ? Почему не в OnWrite() ?
От балды решение ? Первое что в голову пришло ? Или как ?
Поясни ход своих мыслей)
← →
Kornet (2002-12-22 15:46) [3]Если отвлечься от технических деталей, то для начала мне бы хотелось прояснить с самим запросом. Фактом что запрос закончился является 2 (два) кода #10. После этого сервер начинает обрабатывать его. Во вторых как мне кажется не стоить использовать URI в GET запросе, т.е. должно быть так:
GET index.html, так как имя домена ты уже передаёшь в строке Host. Ну и в третьих - почему бы не использовать стандартные компоненты для работы с HTTP? Например, THTTP?
← →
Ketmar (2002-12-22 16:32) [4]>Kornet © (22.12.02 15:46)
>GET index.html, так как имя домена ты уже передаёшь в строке Host
можно и так. но не обязательно. в стандарте написано, что в GET вполне может быть полный адрес. главное, чтобы он совпадал с полем host %-). Опера, например, передает полный адрес всегда. кстати, User-Agent"а вполне можно выкинуть нафиг.
Satanas Nobiscum! 22-Dec-XXXVII A.S.
Страницы: 1 вся ветка
Форум: "Сети";
Текущий архив: 2003.02.13;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.01 c