以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  如何用代码获得本机IP地址?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=133049)

--  作者:andy-1024
--  发布时间:2019/4/4 20:52:00
--  如何用代码获得本机IP地址?
请问老师,如何用代码获得本机IP地址?谢谢。
--  作者:wyz20130512
--  发布时间:2019/4/4 21:02:00
--  
Dim IPAdress As System.Net.IPAddress
Dim HostName As String
HostName = System.Net.Dns.GetHostName \'获得本机的机器名
IPAdress = System.Net.Dns.GetHostByName(HostName).AddressList.GetValue(0) \'获得本机的IP
messagebox.show(IPAdress.Tostring) \'获得MAC地址
msgbox(HostName)

--  作者:andy-1024
--  发布时间:2019/4/4 21:11:00
--  
太感谢了!