VC提交網頁表單－自動評論留言(2)

 

前面分析完畢了，現在就開始寫代碼吧：

 

網上用SOCKET、CHttpFile類等編寫VC向網頁POST表單的代碼多如牛毛，但大多都是大家轉來轉去的，也沒有去實踐一下，到頭來只會誤導初學者，這裡是我從頭到尾的筆記，希望給友友們協助，以免走不必要的彎路......

 

 

（本文代碼中的真實網頁地址已用星號或馬賽克隱藏，以避免不法份子用來惡意使用！本程式僅供學習交流，對於該站站長我深標歉意，請手動刪除我發表的五條評論吧！）

 

/************************************************************************/<br />/* 利用SOCKET通訊端，實現自動POST表單及評論留言<br />/*<br />/* by Koma 2009.9.6 0:30<br />/* http://blog.csdn.net/wangningyu<br />/************************************************************************/<br />#include "stdafx.h"<br />#include "stdio.h"<br />#include "winsock2.h"<br />#pragma comment(lib,"ws2_32.lib") </p><p>int main(int argc, char* argv[])<br />{<br />SOCKADDR_INsaServer;<br />LPHOSTENTlphostent;<br />WSADATAwsadata;<br />SOCKEThsocket;</p><p>intnRet;<br />char* host_name="www.******.com";<br />char* req=<br />"POST /blog/comment.asp?act=save&logid=3560 HTTP/1.0/r/n"<br />"Accept: image/gif, image/x-xbitmap, image/jpeg, image/pjpeg, application/x-shockwave-flash, application/vnd.ms-excel, application/vnd.ms-powerpoint, application/msword, application/QVOD, application/QVOD, */*/r/n"<br />"Referer: http://www.******.com/blog/article.asp?id=3560/r/n"<br />"Accept-Language: zh-cn/r/n"<br />"Content-Type: application/x-www-form-urlencoded/r/n"<br />"Accept-Encoding: gzip, deflate/r/n"<br />"User-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; POTU(RR:28031409:0:5497353); SV1; Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1) ; .NET CLR 2.0.50727; CIBA)/r/n"<br />"Host: www.******.com/r/n"<br />"Content-Length: 114/r/n"<br />"Connection: Keep-Alive/r/n"<br />"Cookie: babyhashkey=; babyuserid=; ASPSESSIONIDACBRSQBC=AFHPMPGBBCGPDDDNEDKGJHEJ/r/n/r/n"<br />"e_ubb=true&e_autourl=true&e_smilies=true&comm_username=%E5%A4%A9%E4%BD%BF&comm_password=&message=www.******.net.cn"; </p><p>// 初始化通訊端<br />if(WSAStartup(MAKEWORD(2,2),&wsadata))<br />printf("初始化SOCKET出錯！");</p><p>lphostent=gethostbyname(host_name);<br />if(lphostent==NULL)<br />printf("lphostent為空白！");<br />hsocket = socket(AF_INET,SOCK_STREAM,IPPROTO_TCP);<br />saServer.sin_family = AF_INET;<br />saServer.sin_port = htons(80);<br />saServer.sin_addr = *((LPIN_ADDR)*lphostent->h_addr_list);</p><p>// 利用SOCKET串連<br />nRet = connect(hsocket,(LPSOCKADDR)&saServer,sizeof(SOCKADDR_IN));<br />if(nRet == SOCKET_ERROR)<br />{<br />printf("建立串連時出錯！");<br />closesocket(hsocket);<br />return 0;<br />}</p><p>// 利用SOCKET發送<br />nRet = send(hsocket,req,strlen(req),0);<br />if(nRet==SOCKET_ERROR)<br />{<br />printf("發送資料包時出錯！");<br />closesocket(hsocket);<br />}</p><p>char Dest[3000];<br />nRet=1;<br />while(nRet>0)<br />{<br />// 接收返回資料包<br />nRet=recv(hsocket,(LPSTR)Dest,sizeof(Dest),0);<br />if(nRet>0)<br />Dest[nRet]=0;<br />else<br />Dest[0]=0;</p><p>// 顯示返回資料包的大小、內容<br />printf("/nReceived bytes:%d/n",nRet);<br />printf("Result:/n%s",Dest);<br />}<br />return 0;<br />}

 

 

程式運行效果：

 

 

 

      當然，你POST的資料包受影響的因素也有很多，比如本地頻寬、伺服器效能等都會造成延時，所以如果想深入瞭解，需要掌握的知識則需要更多！