Powerbuilder 中使用GetAdaptersInfo获取IP地址,MAC地址

很简单的一个功能,想在PB中读取IP地址,和MAC地址。

把VC的代码转成自己的PB代码,这样方便使用。

OK,在这里发个文章,留个备份,以后用得到。

function long GetAdaptersInfo( ref ip_adapter_info pAdapterInfo,  ref  ULONG pOutBufLen) library 'Iphlpapi.dll'
SUBROUTINE CopyMemory(ref ip_addr_string pDesc, ulong pSrc,ulong size) LIBRARY "kernel32" ALIAS FOR "RtlMoveMemory"
SUBROUTINE CopyMemory(ref string  pDesc, ulong pSrc,ulong size) LIBRARY "ke

  • 0
    点赞
  • 2
    收藏
    觉得还不错? 一键收藏
  • 1
    评论
在用pb开发信息管理系统时,为了安全期间,我们希望记录每个登录用户的信息,并生成日志,其最重要的是知道是哪个机器运行程序的?这样,只要获取运行程序的机器ip问题就解决了,然而,pb没有象delphi 有现成的函数可以很方便的获的机器的ip,我们只好利用外部函数来实现了。 首先声明外部函数 function int WSAStartup( uint UIVersionRequested, ref s_WSAData lpWSAData ) library "wsock32.dll" function int WSACleanup() library "wsock32.dll" function int WSAGetLastError ( ) library "wsock32.dll" function int gethostname ( ref string name, int namelen ) library "wsock32.dll" function string GetHost(string lpszhost, ref blob lpszaddress ) library "PBWS32.DLL" 然后在form的open事件执行如下代码就可以了 s_wsadata l_WSAData int li_version = 257 blob{4} lb_hostaddress IF wsastartup ( li_version, l_WSAData ) = 0 THEN IF gethostname ( ls_HostName, len(ls_HostName) ) < 0 THEN messagebox("GetHostName",WSAGetLastError()) ELSE GetHost(ls_HostName, lb_HostAddress) //获得主机名和IP地址 ls_IpAddress = string(asc(string(blobmid(lb_HostAddress,1,1))),"000") + "." ls_IpAddress += string(asc(string(blobmid(lb_HostAddress,2,1))),"000") + "." ls_IpAddress += string(asc(string(blobmid(lb_HostAddress,3,1))),"000") + "." ls_IpAddress += string(asc(string(blobmid(lb_HostAddress,4,1))),"000") //将IP地址的ASC码形式转化为***.***.***.***字符串格式 END IF WSACleanup() ELSE messagebox("GetHostName",WSAGetLastError()) END IF
### 回答1: 在PB9.0获取本机IP地址,可以使用PB提供的WinAPI函数GetAdaptersInfo(),该函数可以获取到计算机的网络适配器信息,其包括IP地址等网络设置信息。 要获取本机IP地址,需要先定义结构体IP_ADAPTER_INFO,然后通过调用GetAdaptersInfo()函数获取到该结构体信息。最后遍历结构体链表即可获取到本机的IP地址。 具体实现代码如下: // 定义结构体 typedef struct _IP_ADAPTER_INFO { struct _IP_ADAPTER_INFO* Next; DWORD ComboIndex; char AdapterName[MAX_ADAPTER_NAME_LENGTH + 4]; char Description[MAX_ADAPTER_DESCRIPTION_LENGTH + 4]; UINT AddressLength; BYTE Address[MAX_ADAPTER_ADDRESS_LENGTH]; DWORD Index; UINT Type; UINT DhcpEnabled; PIP_ADDR_STRING CurrentIpAddress; IP_ADDR_STRING IpAddressList; IP_ADDR_STRING GatewayList; IP_ADDR_STRING DhcpServer; BOOL HaveWins; IP_ADDR_STRING PrimaryWinsServer; IP_ADDR_STRING SecondaryWinsServer; time_t LeaseObtained; time_t LeaseExpires; } IP_ADAPTER_INFO, * PIP_ADAPTER_INFO; // 获取本机IP地址 string ls_ips IP_ADAPTER_INFO AdapterInfo[16] = { 0 }; DWORD dwBufLen = sizeof(AdapterInfo); DWORD dwStatus = GetAdaptersInfo(AdapterInfo, &dwBufLen); for (PIP_ADAPTER_INFO pAdapterInfo = AdapterInfo; pAdapterInfo; pAdapterInfo = pAdapterInfo->Next) { IP_ADDR_STRING* pIpAddrString = &(pAdapterInfo->IpAddressList); do { ls_ips += string(pIpAddrString->IpAddress.String) + "~r~n" pIpAddrString = pIpAddrString->Next; } while (pIpAddrString); } // 输出本机IP地址 MessageBox("本机IP地址为:" + ls_ips) 注意,这里将获取到的所有IP地址都保存在一个字符串变量ls_ips,可以根据自己的需要选择特定的IP地址输出。同时,需要注意编译时的选项,需要将编译选项设置为Allow unsafe code,以允许调用WinAPI函数。 ### 回答2: 在Python,可以使用socket模块的gethostbyname()函数来获取本机的IP地址。具体步骤如下: ```python import socket def get_local_ip(): """ 获取本机的IP地址 """ try: # 获取本机主机名 hostname = socket.gethostname() # 获取本机IP地址 ip_address = socket.gethostbyname(hostname) return ip_address except Exception as e: print("获取本机IP地址失败:", e) return None # 调用函数获取本机IP地址 ip_address = get_local_ip() if ip_address: print("本机IP地址为:", ip_address) else: print("获取本机IP地址失败") ``` 其,首先使用 `socket.gethostname()` 函数获取本机的主机名,然后通过 `socket.gethostbyname()` 函数将主机名转换为IP地址。最后将获取到的IP地址打印输出即可。 ### 回答3: 在Python,可以使用socket模块来获取本机的IP地址。具体步骤如下: 1. 首先,导入socket模块:`import socket` 2. 创建一个socket对象:`s = socket.socket(socket.AF_INET, socket.SOCK_DGRAM)` 这里使用的是数据报套接字(SOCK_DGRAM),并使用IPv4地址族(AF_INET)。 3. 发送一个UDP数据包到特定的服务器地址:`s.connect(("8.8.8.8", 80))` 这里选择了Google的DNS服务器地址(8.8.8.8)和端口号80。 4. 获取本机的IP地址信息:`ip_address = s.getsockname()[0]` 利用getsockname()方法可以获取到套接字的本地地址,返回的是一个元组,其第一个元素为IP地址。 5. 关闭socket连接:`s.close()` 最后,可以将获取到的IP地址打印出来,或者进行其他的处理。完整的代码如下: ```python import socket s = socket.socket(socket.AF_INET, socket.SOCK_DGRAM) s.connect(("8.8.8.8", 80)) ip_address = s.getsockname()[0] s.close() print("本机IP地址是:", ip_address) ``` 通过以上步骤,就可以获取到本机的IP地址

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论 1
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值