VCMFC下实现简单的socket发送接收文件.doc

最简单的发送接收文件(VC6.0下编译通过):Server:#include#include#pragma comment(lib,WS2_32.lib)int main()WSADATA data;int m;WORD w=MAKEWORD(2,0);:WSAStartup(w,&data);SOCKET s,s1;s=:socket(AF_INET,SOCK_STREAM,0);/IPPROTO_TCP);sockaddr_in addr2,addr;char text100=0;int n=sizeof(addr2);addr.sin_family=AF_INET;addr.sin_port=htons(75);addr.sin_addr.S_un.S_addr=INADDR_ANY;:bind(s,(sockaddr *)&addr,sizeof(addr);:listen(s,5);printf(服务器已经启动rn);s1=:accept(s,(sockaddr*)&addr2,&n);if(s1!=NULL)printf(%s已经连接上rn,inet_ntoa(addr2.sin_addr);:recv(s1,text,100,0);/CFile file(LPSTR)text,CFile:modeReadWrite);if(text!=0)MessageBox(NULL,text,xiaoxi,MB_OK);CFile file1(text,CFile:modeCreate|CFile:modeReadWrite);if(file1!=NULL)dom=:recv(s1,text,100,0);file1.Write(text,100);while(m=100);file1.Close();:closesocket(s);:closesocket(s1);:WSACleanup();:WSACleanup();return 1;Client:#include#include#pragma comment(lib,WS2_32.lib)int main()WSADATA data;WORD w=MAKEWORD(2,0);:WSAStartup(w,&data);SOCKET s;char text100;char filename100;printf(输入文件名:n);gets(filename);CFile file(filename,CFile:modeReadWrite);CString str;s=:socket(AF_INET,SOCK_STREAM,0);sockaddr_in addr;addr.sin_family=AF_INET;addr.sin_port=htons(75);addr.sin_addr.S_un.S_addr=inet_addr(服务器IP);/本机程序服务器IP为你的机子IP或127.0.0.1;printf(客户端已经启动rn);int m=:connect(s,(sockaddr *)&addr,sizeof(addr);if(m!=-1)int m;str=file.GetFileName();MessageBox(NULL,str,xiaoxi,MB_OK);:send(s,str,str.GetLength(),0);file.Read(text,100);do:send(s,text,100,0);m=file.Read(text,100);printf(%dn,m);while(m);fi