VB获取详细的IP地址信息,包括子网掩码等,程序内有些模块是可以共用的,大家可以复制到其它地方使用,该IP地址的接口索引: dwMask As Long ‘IP地址的子网络、掩码 dwBCastAddr As Long ‘广播地址(典型的,IP地址中表示主机的部分全部为0或1) dwReasmSize As Long ‘接收到的数据报的大小 unused1 As Integer ‘保留字段 unused2 As Integer ‘保留字段
Delphi获取电脑IP地址、MAC网卡物理地址、本机名称等,网络相关信息获取,基本的Delphi网络参数获取代码,高手请绕行吧。通过调用Api函数gethostname,gethostbyname,wsastartup,uses中加winsock,介绍wsadata,phostent,msdn,另外gethostaddress。 function NBGetAdapterAddress(a: integer): String; a指定多个网卡适配器中的哪一个0,1,2... N