请问如何获得IP地址子网掩码.网关和DNS地址(10分)

  • 主题发起人 主题发起人 jiang_sl
  • 开始时间 开始时间
J

jiang_sl

Unregistered / Unconfirmed
GUEST, unregistred user!
请问如何用Delphi函数如何获得IP地址子网掩码.网关和DNS地址
 
My God,Help
 
我还不知道有这样的函数
 
uses WinSock;
Function GetIPAddress: String;
var
phoste:PHostEnt;
Buffer:array[0..100] of char;
WSAData:TWSADATA;
begin
result:='';
if WSASTartup($0101, WSAData) <> 0 then exit;
GetHostName(Buffer,Sizeof(Buffer));
phoste:=GetHostByName(buffer);
if phoste = nil then
begin
result:='127.0.0.1';
end
else
result:=StrPas(inet_ntoa(PInAddr(phoste^.h_addr_list^)^));
WSACleanup;
end;
 
请问还有没有别的简单方法??[:(][:(!]
 
请问还有没有别的简单方法??
 
请问还有没有别的简单方法??[:(][:(!]
 
这些信息在注册表中都有的,你可以找找的,不过98和2000在注册表中存放的位置是不同的.
 
子网掩码是一个32位地址,用于屏蔽IP地址的一部分以区别网络ID和主机ID;用来将网络分割为多个子网;判断目的主机的IP地址是在本局域网还是在远程网。
在“DNS服务器搜索顺序”中输入要使用的DNS服务器的IP地址,点击“添加”按钮,则该DNS服务器即被设定,并且被显示在DNS服务器列表框中。排在最前面的DNS服务器将被该工作站首先使用,当该DNS服务器进行地址解析失败后,将使用后面的DNS服务器进行地址解析。
TCP/IP测试工具Ping
(1)Ping工具的格式
Ping命令的格式为:ping目的地址[参数1][参数2]……
其中目的地址是指被测试计算机的IP地址或域名。Ping工具主要参数有:
A:解析主机地址。
N:数据,发出的测试包的个数,缺省值为4。
L:数值,所发送缓冲区的大小。
T:持续执行Ping命令,直到用户按Ctrl+C终止。
直接去ping
 
是用Delphi呀![:D]
 
多人接受答案了。
 
后退
顶部