标题:得到本機IP﹐其實很簡單(三句代碼)
只看楼主
西风独自凉
Rank: 8Rank: 8
等 级:贵宾
威 望:43
帖 子:3380
专家分:28
注 册:2007-8-2
结帖率:100%
 问题点数:0 回复次数:1 
得到本機IP﹐其實很簡單(三句代碼)
dim a  as  object

set a =createobject(" ")
msgbox a.localip

[[it] 本帖最后由 西风独自凉 于 2008-10-23 15:12 编辑 [/it]]
2008-10-23 11:49
风吹过b
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:贵宾
威 望:364
帖 子:4912
专家分:29900
注 册:2008-10-15
得分:0 
只取到本地局域网的那个IP,对外网,拨号的产生的那个IP没取到.

授人于鱼,不如授人于渔
早已停用QQ了
2008-10-23 15:23



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-240054-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.015506 second(s), 8 queries.
Copyright©2004-2025, BCCN.NET, All Rights Reserved