小編給大家分享一下易語言如何調(diào)用api獲取網(wǎng)卡信息網(wǎng)絡連接名,希望大家閱讀完這篇文章之后都有所收獲,下面讓我們一起去探討吧!
創(chuàng)新互聯(lián)專注于企業(yè)營銷型網(wǎng)站建設、網(wǎng)站重做改版、永濟網(wǎng)站定制設計、自適應品牌網(wǎng)站建設、H5開發(fā)、商城開發(fā)、集團公司官網(wǎng)建設、成都外貿(mào)網(wǎng)站建設公司、高端網(wǎng)站制作、響應式網(wǎng)頁設計等建站業(yè)務,價格優(yōu)惠性價比高,為永濟等各大城市提供網(wǎng)站開發(fā)制作服務。
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)絡連接名的代碼
.版本 2 .程序集 窗口程序集1 .子程序 __啟動窗口_創(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 = “” .計次循環(huán)首 (AdapterInfo.AddressLength - 1, i) tmp = 取十六進制文本 (AdapterInfo.Address [i]) mac = mac + 選擇 (tmp = “0”, “00”, tmp) + “-” .計次循環(huán)尾 () mac = 取文本左邊 (mac, 取文本長度 (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.連接名稱 = 取文本注冊項 (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)絡連接名組合框.加入項目 (link.連接名稱, ) 網(wǎng)絡連接名組合框.現(xiàn)行選中項 = 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é)束
運行結(jié)果:
看完了這篇文章,相信你對“易語言如何調(diào)用api獲取網(wǎng)卡信息網(wǎng)絡連接名”有了一定的了解,如果想了解更多相關(guān)知識,歡迎關(guān)注創(chuàng)新互聯(lián)行業(yè)資訊頻道,感謝各位的閱讀!