隨著INTERNET在世界范圍內的迅速普及,上網的人數也越來越多。其中,絕大多數人是通過普通電話線撥號上網的。我們知道,每一台上網的計算機,不論是用何種方式上網,都被分配了一個或多個獨立無二的IP地址。對於撥號上網的用戶,一般是由其ISP在其每次撥號上網時動態分配一個IP地址,這個地址可能每次都不相同(其原因主要是為了充分利用有限資源)。那麼,我們能否通過某種方法隨時方便地檢知自己上網時的IP地址呢?答案是肯定的。下面我們就用C++BUILDER編制一個小巧的程序來實現這種功能。(注:本程序在局域網中也同樣能運行)
首先用BCB的FILE菜單下的New Application創建一個新項目,取名為IPcheck.bpr。
然後,在窗體FORM1上添加五個標簽(LABEL)和兩個按鈕(BUTTON),如圖所示。
接下來,雙擊窗體的OnCreate事件,在其中加上以下程序:
void __fastcall TForm1::FormCreate(TObject *Sender)
{
WSAData wsaData;
if (WSAStartup(MAKEWORD(1,1),&wsaData)!=0)
{ //初始化WINSOCK調用
MessageBox(NULL,"Wrong WinSock Version","Error",MB_OK);
return ;
}
Refresh1Click(Sender); //程序一開始,就調檢知IP地址
}
再雙擊Refresh按鈕,在其中加上以下程序
void __fastcall TForm1::Refresh1Click(TObject *Sender)
//刷新IP地址
{
char HostName[80];
LPHOSTENT lpHostEnt;
struct in_addr addr[2];
//本程序假設主機不是多宿主機,即最多只有一塊網卡和一個動態IP
for (int i=0; i< 2; i++){
memset(&addr[i],0,sizeof(in_addr));
//對in_addr結構清0,以利後面填寫
}
if (gethostname(HostName,sizeof(HostName))==SOCKET_ERROR)
{ // 得到本主機名
MessageBox(NULL,"Can't getting local host name.","Error",MB_OK);
return ;
}
Label3->Caption=HostName;
lpHostEnt=gethostbyname(HostName);//利用得到的主機名去獲得主機結構
if (!lpHostEnt)
{
MessageBox(NULL,"Yow! Bad host lookup.","Error",MB_OK);
return ;
}
for (int i=0; lpHostEnt- >h_addr_list[i]!=0; i++)
//從主機地址表中得到IP地址
{
memcpy(&addr[i],lpHostEnt- >h_addr_list[i],sizeof(in_addr));
}
Label4- >Caption=inet_ntoa(addr[0]);
Label5- >Caption=inet_ntoa(addr[1]);
}
再雙擊Refresh按鈕,在其中加上以下程序
void __fastcall TForm1::Button2Click(TObject *Sender)
{
WSACleanup(); //釋放WINSOCK調用
Close();
}
最後,不要忘了在程序頭部加上#include<winsock.h>.....哦。
好了,程序完成了,編譯後就可運行了。本程序在中文WIN95/NT4.0下編譯通過。