从品牌网站建设到网络营销策划,从策略到执行的一站式服务
vbs中怎么实现枚举网络连接,相信很多没有经验的人对此束手无策,为此本文总结了问题出现的原因和解决方法,通过这篇文章希望你能解决这个问题。
创新互联建站一直通过网站建设和网站营销帮助企业获得更多客户资源。 以"深度挖掘,量身打造,注重实效"的一站式服务,以成都网站建设、成都网站设计、移动互联产品、网络营销推广服务为核心业务。10年网站制作的经验,使用新网站建设技术,全新开发出的标准网站,不但价格便宜而且实用、灵活,特别适合中小公司网站制作。网站管理系统简单易用,维护方便,您可以完全操作网站资料,是中小公司快速网站建设的选择。代码如下:
On Error Resume Next strComputer = "." Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2") Set colItems = objWMIService.ExecQuery("Select * from Win32_NetworkConnection") For Each objItem in colItems Wscript.Echo "Access Mask: " & objItem.AccessMask Wscript.Echo "Caption: " & objItem.Caption Wscript.Echo "Connection State: " & objItem.ConnectionState Wscript.Echo "Connection Type: " & objItem.ConnectionType Wscript.Echo "Description: " & objItem.Description Wscript.Echo "Display Type: " & objItem.DisplayType Wscript.Echo "Local Name: " & objItem.LocalName Wscript.Echo "Name: " & objItem.Name Wscript.Echo "Persistent: " & objItem.Persistent Wscript.Echo "Provider Name: " & objItem.ProviderName Wscript.Echo "Remote Name: " & objItem.RemoteName Wscript.Echo "Remote Path: " & objItem.RemotePath Wscript.Echo "Resource Type: " & objItem.ResourceType Wscript.Echo "User Name: " & objItem.UserName Wscript.Echo Next
看完上述内容,你们掌握vbs中怎么实现枚举网络连接的方法了吗?如果还想学到更多技能或想了解更多相关内容,欢迎关注创新互联行业资讯频道,感谢各位的阅读!
成都网站建设公司地址:成都市青羊区太升南路288号锦天国际A座10层 建设咨询028-86922220
成都快上网科技有限公司-四川网站建设设计公司 | 蜀ICP备19037934号 Copyright 2020,ALL Rights Reserved cdkjz.cn | 成都网站建设 | © Copyright 2020版权所有.
专家团队为您提供成都网站建设,成都网站设计,成都品牌网站设计,成都营销型网站制作等服务,成都建网站就找快上网! | 成都网站建设哪家好? | 网站建设地图