получение кода страницы

← →
PUMA (2004-07-22 17:21) [0]

обьясните почему кода я получаю код страницы www.icq.com он приходит а когда
www.icq.com/whitepages/about_me.php?Uin=123123 нет

получаю страницу через сокеты

unit Unit1;

interface

uses
Windows, WinSock2, SysUtils, Classes, Controls, Forms,
Dialogs, StdCtrls, ComCtrls, ExtCtrls;

type
TForm1 = class(TForm)
Button1: TButton;
Memo1: TMemo;
Label1: TLabel;
Memo2: TMemo;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
var
wsd :TWSAData;
sClient : TSOCKET;
Serv : TSockAddr;
Buffer : array [0..1024] of char;
begin
Buffer := "GET / HTTP/1.1"+#13+#10+
"Host: www.icq.com"+#13#10#13#10;
// "Accept: text/html, image/gif, image/jpeg"+#13#10+
// "Accept-Language: ru"+#13#10+
// "Accept-Charset: win - 1251"+#13#10+
// "ACCEPT-ENCODING gzip, deflate"+#13#10+
// "User-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1)"+#13#10+//
// "Proxy-Connection: Keep-Alive"+#13#10+
// "Referer: http://www.agcoders.myrunet.com"+#13#10+
// "Pragma: no-cache"+#13#10#13#10;
// "COOKIE Satchmo=0; UIMS2954=7DECB06078A502C";}
//Buffer := "GET / HTTP/1.0"+#13+#10+#13+#10+#0;
memo2.Lines.Add(Buffer);
WsaStartup (MAKEWORD (2,2), wsd);
sClient := socket (AF_INET, SOCK_STREAM, IPPROTO_IP);
ZeroMemory(@Serv, SizeOf(Serv));
with Serv do
begin
sin_family := AF_INET;

и т.д. этот пример есть везде

← →
Reindeer Moss Eater © (2004-07-22 17:52) [1]

Посмотри заголовок запроса посылаемого браузером на этот урл.
Сравни со своим.
Найди 10 отличий.
Исправь.

← →
PUMA (2004-07-22 17:56) [2]

во второй раз приходит ответ типа неправильно сформирован запрос

← →
Reindeer Moss Eater © (2004-07-22 17:57) [3]

О чем и толкую тебе

← →
PUMA (2004-07-22 18:12) [4]

И как правильно сделать ?
www.icq.com/whitepages/about_me.php?Uin=123123

← →
Reindeer Moss Eater © (2004-07-22 18:12) [5]

Прочитай ответ номер один

← →
PUMA (2004-07-22 19:11) [6]

да хорошая помошь...
луче подскажи где реально помочь могут

Маму спроси, мальчик.

получение кода страницы Найти похожие ветки