溫馨提示×

您好,登錄后才能下訂單哦!

密碼登錄×
登錄注冊(cè)×
其他方式登錄
點(diǎn)擊 登錄注冊(cè) 即表示同意《億速云用戶服務(wù)條款》

易語言如何調(diào)用api獲取網(wǎng)卡信息網(wǎng)絡(luò)連接名

發(fā)布時(shí)間:2021-05-22 13:14:10 來源:億速云 閱讀:243 作者:小新 欄目:編程語言

小編給大家分享一下易語言如何調(diào)用api獲取網(wǎng)卡信息網(wǎng)絡(luò)連接名,希望大家閱讀完這篇文章之后都有所收獲,下面讓我們一起去探討吧!

DLL命令表

.版本 2
.DLL命令 GetAdaptersInfo, 整數(shù)型, "IPHlpApi"
  .參數(shù) IpAdapterInfo, 字節(jié)集
  .參數(shù) pOutBufLen, 整數(shù)型, 傳址
.DLL命令 取變量地址_字節(jié)集, 整數(shù)型, , "lstrcpynA"
  .參數(shù) 變量, 字節(jié)集, 傳址
  .參數(shù) 變量, 字節(jié)集, 傳址
  .參數(shù) 保留, 整數(shù)型, , 0
.DLL命令 CopyMemory_iai, , "kernel32", "RtlMoveMemory"
  .參數(shù) Destination, IP_ADAPTER_INFO, 傳址
  .參數(shù) Source, 整數(shù)型
  .參數(shù) Length, 整數(shù)型
.DLL命令 CopyMemory_ias, , "kernel32", "RtlMoveMemory"
  .參數(shù) Destination, IP_ADDR_STRING, 傳址
  .參數(shù) Source, IP_ADDR_STRING
  .參數(shù) Length, 整數(shù)型
.DLL命令 GetPerAdapterInfo, 整數(shù)型, "IPHlpApi"
  .參數(shù) IfIndex, 整數(shù)型
  .參數(shù) pPerAdapterInfo, 字節(jié)集
  .參數(shù) pOutBufLen, 整數(shù)型, 傳址
.DLL命令 CopyMemory_ipai, , "kernel32", "RtlMoveMemory"
  .參數(shù) Destination, IP_PER_ADAPTER_INFO, 傳址
  .參數(shù) Source, 整數(shù)型
  .參數(shù) Length, 整數(shù)型

自定義數(shù)據(jù)類型表

.版本 2
.數(shù)據(jù)類型 IP_ADAPTER_INFO
  .成員 Next, 整數(shù)型
  .成員 ComboIndex, 整數(shù)型
  .成員 AdapterName, 字節(jié)型, , "260", 名稱
  .成員 Description, 字節(jié)型, , "132", 描述
  .成員 AddressLength, 整數(shù)型
  .成員 Address, 字節(jié)型, , "8"
  .成員 Index, 整數(shù)型
  .成員 Type, 整數(shù)型, , , 類型
  .成員 DhcpEnabled, 整數(shù)型
  .成員 CurrentIpAddress, 整數(shù)型
  .成員 IpAddressList, IP_ADDR_STRING
  .成員 GatewayList, IP_ADDR_STRING
  .成員 DhcpServer, IP_ADDR_STRING
  .成員 HaveWins, 邏輯型
  .成員 PrimaryWinsServer, IP_ADDR_STRING
  .成員 SecondaryWinsServer, IP_ADDR_STRING
  .成員 LeaseObtained, 整數(shù)型
  .成員 LeaseExpires, 整數(shù)型
.數(shù)據(jù)類型 IP_ADDR_STRING
  .成員 Next, 整數(shù)型
  .成員 IpAddress, 字節(jié)型, , "16", IP_ADDRESS_STRING
  .成員 IpMask, 字節(jié)型, , "16", IP_MASK_STRING=IP_ADDRESS_STRING
  .成員 Context, 整數(shù)型
.數(shù)據(jù)類型 網(wǎng)卡信息_
  .成員 名稱, 文本型
  .成員 連接名稱, 文本型
  .成員 Mac, 文本型
  .成員 Ip, 文本型
  .成員 掩碼, 文本型
  .成員 網(wǎng)關(guān), 文本型
  .成員 DNS1, 文本型
  .成員 DNS2, 文本型
.數(shù)據(jù)類型 IP_PER_ADAPTER_INFO
  .成員 tmp, 整數(shù)型, , "3"
  .成員 CurrentDnsServer, IP_ADDR_STRING
  .成員 DnsServerList, IP_ADDR_STRING

取網(wǎng)卡信息網(wǎng)絡(luò)連接名的代碼

.版本 2
.程序集 窗口程序集1
.子程序 __啟動(dòng)窗口_創(chuàng)建完畢
取網(wǎng)卡信息 ()
.子程序 取網(wǎng)卡信息
.局部變量 size_link, 整數(shù)型
.局部變量 AdapterInfo, IP_ADAPTER_INFO
.局部變量 buf_link, 字節(jié)集
.局部變量 addr_link, 整數(shù)型
.局部變量 i, 整數(shù)型
.局部變量 mac, 文本型
.局部變量 tmp, 文本型
.局部變量 buf_ip, IP_ADDR_STRING
.局部變量 link, 網(wǎng)卡信息_
.局部變量 size_dns, 整數(shù)型
.局部變量 dns, IP_PER_ADAPTER_INFO
.局部變量 buf_dns, 字節(jié)集
.局部變量 addr_dns, 整數(shù)型
GetAdaptersInfo ({ 0 }, size_link)
buf_link = 取空白字節(jié)集 (size_link)
addr_link = 取變量地址_字節(jié)集 (buf_link, buf_link, 0)
.如果真 (GetAdaptersInfo (buf_link, size_link) = 0)
  .循環(huán)判斷首 ()
    CopyMemory_iai (AdapterInfo, addr_link, 640)
    link.名稱 = 到文本 (AdapterInfo.Description)
    mac = “”
    .計(jì)次循環(huán)首 (AdapterInfo.AddressLength - 1, i)
      tmp = 取十六進(jìn)制文本 (AdapterInfo.Address [i])
      mac = mac + 選擇 (tmp = “0”, “00”, tmp) + “-”
    .計(jì)次循環(huán)尾 ()
    mac = 取文本左邊 (mac, 取文本長(zhǎng)度 (mac) - 1)
    link.Mac = mac
    CopyMemory_ias (buf_ip, AdapterInfo.IpAddressList, 40)
    link.Ip = 到文本 (buf_ip.IpAddress)
    link.掩碼 = 到文本 (buf_ip.IpMask)
    CopyMemory_ias (buf_ip, AdapterInfo.GatewayList, 40)
    link.網(wǎng)關(guān) = 到文本 (buf_ip.IpAddress)
    link.連接名稱 = 取文本注冊(cè)項(xiàng) (4, “SYSTEM\CurrentControlSet\Control\Network\{4D36E972-E325-11CE-BFC1-08002BE10318}\” + 到文本 (AdapterInfo.AdapterName) + “\Connection\Name”, )
    size_dns = GetPerAdapterInfo (AdapterInfo.Index, buf_dns, size_dns)
    buf_dns = 取空白字節(jié)集 (size_dns)
    addr_dns = 取變量地址_字節(jié)集 (buf_dns, buf_dns, 0)
    .如果 (GetPerAdapterInfo (AdapterInfo.Index, buf_dns, size_dns) = 0)
      CopyMemory_ipai (dns, addr_dns, 92)
      link.DNS1 = 到文本 (dns.CurrentDnsServer.IpAddress)
      link.DNS2 = 到文本 (dns.DnsServerList.IpAddress)
    .否則
      link.DNS1 = “”
      link.DNS2 = “”
    .如果結(jié)束
    網(wǎng)絡(luò)連接名組合框.加入項(xiàng)目 (link.連接名稱, )
    網(wǎng)絡(luò)連接名組合框.現(xiàn)行選中項(xiàng) = i
    輸出調(diào)試文本 (link.連接名稱)
    輸出調(diào)試文本 (link.名稱)
    輸出調(diào)試文本 (link.Mac)
    輸出調(diào)試文本 (link.Ip)
    輸出調(diào)試文本 (link.掩碼)
    輸出調(diào)試文本 (link.網(wǎng)關(guān))
    輸出調(diào)試文本 (link.DNS1)
    輸出調(diào)試文本 (link.DNS2)
    addr_link = AdapterInfo.Next
  .循環(huán)判斷尾 (addr_link ≠ 0)
.如果真結(jié)束

運(yùn)行結(jié)果:

易語言如何調(diào)用api獲取網(wǎng)卡信息網(wǎng)絡(luò)連接名

看完了這篇文章,相信你對(duì)“易語言如何調(diào)用api獲取網(wǎng)卡信息網(wǎng)絡(luò)連接名”有了一定的了解,如果想了解更多相關(guān)知識(shí),歡迎關(guān)注億速云行業(yè)資訊頻道,感謝各位的閱讀!

向AI問一下細(xì)節(jié)

免責(zé)聲明:本站發(fā)布的內(nèi)容(圖片、視頻和文字)以原創(chuàng)、轉(zhuǎn)載和分享為主,文章觀點(diǎn)不代表本網(wǎng)站立場(chǎng),如果涉及侵權(quán)請(qǐng)聯(lián)系站長(zhǎng)郵箱:is@yisu.com進(jìn)行舉報(bào),并提供相關(guān)證據(jù),一經(jīng)查實(shí),將立刻刪除涉嫌侵權(quán)內(nèi)容。

AI