急啊！通过CB的控件TClientSocket实现HTTP客户端的GET、POST的方法？

[youlione]

以下是我写的一个程序实现GET方法的小程序，但没有获得数据，程序如下：
比如通过以下方法取www.sina.com.cn网站的默认

void __fastcall TForm1::Button1Click(TObject *Sender)
{
AnsiString strGet;
ClientSocket1->Host="www.sina.com.cn";
ClientSocket1->Port=80;
ClientSocket1->Active=true;

strGet="GET http://www.sina.com.cn http/1.0 \r\n" ;
strGet+="accept: www/source; text/html; image/gif; image/jpeg; */* \r\n";
strGet+="User_Agent: myAgent \r\n";

ClientSocket1->Socket->SendText(strGet.c_str());
}


但是在事件没有取到数据：

void __fastcall TForm1::ClientSocket1Read(TObject *Sender,
TCustomWinSocket *Socket)
{
ShowMessage(Socket->ReceiveText());
}

问：是什么原因，我想strGet构造出错，但不知具体错在什么地方。
请大家在机器测试一下后回答，本人不胜感激！

[醉马不肖]

strGet="GET http://www.sina.com.cn http/1.0 \r\n" ;
strGet+="accept: www/source; text/html; image/gif; image/jpeg; */* \r\n";
strGet+="User_Agent: myAgent \r\n\r\n";

[youlione]

加了\r\n还是不能接收服务的应答数据啊

[leonpard]

为什么不找个http协议的控件？？？

[叶子哟]

你应该仔细研究一下http协议!!!
实际上你完全可以用InternetOpen这样的Internet API去做或TNMHttp

[shadowstar]

up

[叶子哟]

http请求有四个阶段:connection,request,response,disconnection
你应该用个截包软件,看你用ie访问网站的时候,都是什么数据头就可以了

[youlione]

SOCKET实现HTTP客户端都没人做过，表示失望

[醉马不肖]

strGet+="User_Agent: myAgent \r\n\r\n";

[wyb_45]

put后是两个回车 不是一个

[Laone]

GET / HTTP/1.1
Accept: image/gif, image/x-xbitmap, image/jpeg, image/pjpeg, application/x-shockwave-flash, application/vnd.ms-powerpoint, application/vnd.ms-excel, application/msword, */*
Accept-Language: zh-cn
Accept-Encoding: gzip, deflate
User-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.0)
Host: www.sina.com.cn:80
Connection: Keep-Alive

如果你想得具体的http请求方式，可以自己监听一个端口，然后用IE浏览它，就会recv到请求的字符串了

[yzwpf]

void __fastcall TForm1::ClientSocket1Read(TObject *Sender,
TCustomWinSocket *Socket)
{
ShowMessage(Socket->ReceiveText());
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Button1Click(TObject *Sender)
{
AnsiString strGet;
ClientSocket1->Host="www.sina.com.cn";
ClientSocket1->Port=80;
ClientSocket1->Active=true;

strGet="GET / HTTP/1.1\r\nAccept: image/gif, image/x-xbitmap, image/jpeg, image/pjpeg, application/x-shockwave-flash, application/vnd.ms-powerpoint, application/vnd.ms-excel, application/msword, */*\r\nAccept-Language: zh-cn\r\nAccept-Encoding: gzip, deflate\r\nUser-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.0)\r\nHost: www.sina.com.cn:80\r\nConnection: Keep-Alive\r\n\r\n";
ClientSocket1->Socket->SendText(strGet.c_str());
}
//---------------------------------------------------------------------------

[wjyww]

void __fastcall TForm1::Button1Click(TObject *Sender)
{
AnsiString strGet;
ClientSocket1->Host="www.sina.com.cn";
ClientSocket1->Port=80;
ClientSocket1->Active=true;

strGet="GET / http/1.0\r\n\r\n" ;

ClientSocket1->Socket->SendText(strGet.c_str());
}

保证好用。
但是我提醒你如果你真的看www.sina.com.cn的页面的话，会给你返回错误请求页面。
所一你最好还是看其它的页面，比如某个具体新闻的页面就好了

记住给我分哦

[MEFULEU]

这个网站还是小日本控股的呢?kao!

[zwell]

strGet="GET http://www.sina.com.cn http/1.0 \r\n" ;
这一句错了，因为你已经连上服务器的话，要得到主页，只要用
GET / HTTP/1.0\r\n
就可以了，注意HTTP是大写。
而这两句没有含义，
strGet+="accept: www/source; text/html; image/gif; image/jpeg; */* \r\n";
strGet+="User_Agent: myAgent \r\n";
因为你只要用到GET。如果要用POST的话才需要(当然还需要具体数据)。