windows网络套接字库

1)#include <winsock2.h>  //注意到W是大写的
  #pragma comment(lib, "ws2_32.lib")
2)	//初始化网络网络套接字，尽管没有过多的进行判断是否成功
	WORD wVersionRequested;
	WSADATA wsaData;
	wVersionRequested=MAKEWORD(2,0);
	WSAStartup(wVersionRequested,&wsaData);

3)	//需要加载Winsocket套接字库
	char szHostName[128];
	CString strIP;
	//获取信息保存在字符串StrInfo中
	CString strInfo="主机名: ";
	//获取主机名
	if(::gethostname(szHostName,128)==0)
	{
		//获取主机IP地址
		struct hostent* pHost;
		pHost=::gethostbyname(szHostName);
		strInfo+=szHostName;
		strInfo+="\nIP地址:";
		int j;
		int h_length=4;
		for(j=0;j<h_length;j++)
		{
			CString straddr; 
			strIP+=".";
			straddr.Format("%u",
				(unsigned int) ((unsigned char*)pHost->h_addr_list[0])[j]);
			strIP+=straddr;
		}
		strInfo+=strIP;
	}
	MessageBox(strInfo,"信息提示",MB_OK);

使用WSAStartup函数多次加载网络套接字库，会产生什么样的问题，尤其是并没有
使用WSACleanup()撤销库的使用