MFC获取本机IP地址

CString
CSockInfo::GetLocalHostIP()
{
CString strIP("");
WORD wVersionRequested;
    WSADATA wsaData;
    char name[255];
memset(name,'\0',255);
    PHOSTENT hostinfo;
    wVersionRequested = MAKEWORD( 2, 0 );

    if ( WSAStartup( wVersionRequested, &wsaData ) == 0 )
    {
if( gethostname ( name, sizeof(name)) == 0)
        {
if((hostinfo = gethostbyname(name)) != NULL)
            {
strIP= inet_ntoa (*(struct in_addr *)*hostinfo->h_addr_list);
            }
        }    
        WSACleanup( );
}
return strIP;
}