• 企业400电话
  • 微网小程序
  • AI电话机器人
  • 电商代运营
  • 全 部 栏 目

    企业400电话 网络优化推广 AI电话机器人 呼叫中心 网站建设 商标✡知产 微网小程序 电商运营 彩铃•短信 增值拓展业务
    vbs列出内网的中计算机(工作组也可以)
    复制代码 代码如下:

    'Handle Errors
    On Error Resume Next
    'Get the provider object
    Set prov = GetObject("WinNT:")

    'Examine the available domains the provider can reach
    For each dom in prov

    'Examine the objects in the domain and check for Computer objects
    For each o in dom
    If o.Class = "Computer" Then

    'Display properties of the Computer
    WScript.Echo o.Class " " o.Name
    WScript.Echo " Owner: " o.Owner
    WScript.Echo " Division: " o.Division
    WScript.Echo " OperatingSystem: " o.OperatingSystem
    WScript.Echo " OS Version: " o.OperatingSystemVersion
    WScript.Echo " Processor: " o.Processor
    WScript.Echo " ProcessorCount: " o.ProcessorCount

    End If

    Next
    Next
    您可能感兴趣的文章:
    • 域内计算机和用户获取实现vbs代码
    • 用vbs实现判断计算机是笔记本还是台式机的代码
    • vbs实现计算机重启
    • 用vbs得到计算机的 IP 地址
    • 如何用VBS脚本收集远程计算机或本地计算机安装的软件
    上一篇:用vbs来探测端口的代码 不用注册winsock
    下一篇:vbs 注册表操作类代码
  • 相关文章
  • 

    © 2016-2020 巨人网络通讯 版权所有

    《增值电信业务经营许可证》 苏ICP备15040257号-8

    vbs列出内网的中计算机(工作组也可以) vbs,列出,内网,的,中,计算机,