在线时间:8:00-16:00
迪恩网络APP
随时随地掌握行业动态
扫描二维码
关注迪恩网络微信公众号
External 'Iphlpapi.dll' Name 'SendARP'; function GetMACByIP(const Ip:string):string; var MyIp:ulong; MyMac:array[0..5] of byte; MyMacLength:ulong; ErrCode:integer; begin Myip:=inet_addr(PChar(Ip)); MyMacLength:=Length(MyMac); ErrCode:=SendArp(MyIp,0,@MyMac,@MyMacLength); if ErrCode = 0 then Result := Format('%2.2x:%2.2x:%2.2x:%2.2x:%2.2x:%2.2x',[MyMac[0],MyMac[1],MyMac[2],MyMac[3],MyMac[4],MyMac[5]]) else Result := ''; //EorrCode: ErrCode end; |
2023-10-27
2022-08-15
2022-08-17
2022-09-23
2022-08-13
请发表评论