24小时热门版块排行榜

返回列表

当前主题已经存档。

zsglly

木虫 (著名写手)

应助: 0 (幼儿园)
贵宾: 0.15
金币: 2268.7
帖子: 1035
在线: 4.1小时
虫号: 83160
注册: 2005-07-28
性别: GG
专业: 传热传质学

[交流] 激活当前屏幕保护及获取网上计算机名及其IP地址

1.       如何激活当前屏幕保护程序

// 激活当前屏幕保护程序
   PostMessage(WM_SYSCOMMAND,SC_SCREENSAVE,0);

2.       如何获取局域网上计算机名及它们的IP地址

l       连接ws2_32.lib和 mpr.lib库

l       #include winsock2.h

CString strTemp;
struct hostent *host;

struct in_addr *ptr; // 检索IP地址

DWORD dwScope = RESOURCE_CONTEXT;
NETRESOURCE *NetResource = NULL;
HANDLE hEnum;
WNetOpenEnum( dwScope, NULL, NULL,
         NULL, &hEnum );

WSADATA wsaData;
WSAStartup(MAKEWORD(1,1),&wsaData);

if ( hEnum )
{
DWORD Count = 0xFFFFFFFF;
DWORD BufferSize = 2048;
LPVOID Buffer = new char[2048];
WNetEnumResource( hEnum, &Count,
      Buffer, &BufferSize );
NetResource = (NETRESOURCE*)Buffer;

char szHostName[200];
unsigned int i;

for ( i = 0;
      i < BufferSize/sizeof(NETRESOURCE);
      i++, NetResource++ )
{
      if ( NetResource->dwUsage ==
         RESOURCEUSAGE_CONTAINER &&
         NetResource->dwType ==
         RESOURCETYPE_ANY )
      {
         if ( NetResource->lpRemoteName )
         {
            CString strFullName =
                  NetResource->lpRemoteName;
            if ( 0 ==
                  strFullName.Left(2).Compare("\\\\"

)
                  strFullName =
                     strFullName.Right(
                        strFullName.GetLength()-2);

            gethostname( szHostName,
                  strlen( szHostName ) );
            host = gethostbyname(strFullName);

            if(host == NULL) continue;
            ptr = (struct in_addr *)
                  host->h_addr_list[0];

            // =. 分隔开IP:211.40.35.76.
            int a = ptr->S_un.S_un_b.s_b1;  // 211
            int b = ptr->S_un.S_un_b.s_b2;  // 40
            int c = ptr->S_un.S_un_b.s_b3;  // 35
            int d = ptr->S_un.S_un_b.s_b4;  // 76

            strTemp.Format("%s -->  %d.%d.%d.%d",
                  strFullName,a,b,c,d);
            AfxMessageBox(strTemp);
         }
      }
}

delete Buffer;
WNetCloseEnum( hEnum );
}

WSACleanup();

[ Last edited by 幻影无痕 on 2006-11-27 at 08:17 ]

回复此楼

» 猜你喜欢

做人要厚道啊！厚道啊！

1楼 2005-12-31 18:33:41

已阅回复此楼关注TA 给TA发消息送TA红花 TA的回帖

相关版块跳转我要订阅楼主 zsglly 的主题更新

返回列表