第5章WWW客户机程序设计程序代码.doc

第5章 WWW客户机程序设计 // WebClientDlg.h : header file #define MAX_SIZE 4096 class CWebClientDlg : public CDialog { public: //{{AFX_DATA(CWebClientDlg) enum { IDD = IDD_WEBCLIENT_DIALOG }; CString m_Html; CString m_Http; CString m_Url; //}}AFX_DATA protected: //{{AFX_MSG(CWebClientDlg) afx_msg void OnBrowse(); //}}AFX_MSG private: char Command[MAX_SIZE]; char Respond[MAX_SIZE]; bool RespondStatue; SOCKET Socket; }; // WebClientDlg.cpp : implementation file #include stdafx.h #include WebClient.h #include WebClientDlg.h #include winsock.h void CWebClientDlg::OnBrowse() { UpdateData(true); WSADATA WSAData; //建立套接字绑定 if(WSAStartup(MAKEWORD(2,2),WSAData)!=0) { MessageBox(初始化Winsock失败!); return; } Socket=socket(AF_INET,SOCK_STREAM,0); //创建连接套接字 if(Socket==INVALID_SOCKET) { MessageBox(创建Socket失败!); WSACleanup(); return; } CString TempUrl; //从URL删除协议 if(strstr(m_Url,http://)) TempUrl=m_Url.Mid(7,m_Url.GetLength()-7); else TempUrl=m_Url; int UrlPos; //从URL提取主机名 CString HostName; CString FilePath; UrlPos=TempUrl.Find(/,0); HostName=TempUrl.Mid(0,UrlPos); FilePath=TempUrl.Mid(UrlPos,m_Url.GetLength()-UrlPos); int IpAddress; //判断域名或IP地址 IpAddress =inet_addr(HostName); if(IpAddress==INADDR_NONE) { hostent* pHostent=gethostbyname(HostName); if(pHostent) IpAddress=(*(in_addr*)pHostent-h_addr).s_addr; } sockaddr_in serveraddr; //定义套接字地址 memset(serveraddr,0,sizeof(serveraddr)); serveraddr.sin_family=AF_INET; serveraddr.sin_port=htons(80); serveraddr.sin_addr.s_addr=IpAddress; int nConnect; //与服务器建立连接 nConnect=connect(Socket,(sockaddr*)serveraddr,sizeof(serveraddr)); if(nConnect==SOCKET_ERROR) { MessageBox(连接建立失败!); closesocket(Socket); WSACleanup(); return; } memset(Command,0,MAX_SIZE); //生成GET命令 memcpy(Command,GET