找回密码
 加入
搜索
查看: 5261|回复: 6

[系统综合] [已解决]WMI如何远程连接机器来执行查询语句!

  [复制链接]
发表于 2015-8-31 08:27:46 | 显示全部楼层 |阅读模式
本帖最后由 ioripalm 于 2015-9-7 18:34 编辑

搜了论坛全部都是本地电脑的wmi示例,一个远程的可用的都没有
使用wbemtest管理规范测试器,输入用户名和密码可以正常连接,说明本机和远程的设置是没有问题的!
试了下面的代码,使用本地的时候,语句可以执行,换成远程就不能执行了!
Dim $computer = "\\192.168.1.102"
Dim $Remoteuser = "administrator"
Dim $Remotepass = "asd123456"

$objlocator = ObjCreate("wbemscripting.swbemlocator")
$objWMIService = $objlocator.connectserver($computer, "\root\cimv2", $Remoteuser, $Remotepass)
$colItems = $objWMIService.ExecQuery("Select * from Win32_LogicalDisk")

For $objItem In $colItems
        ConsoleWrite("DeviceID: " & $objItem.DeviceID & @CRLF)
Next
执行后就出错:
$colItems = $objWMIService.ExecQuery("Select * from Win32_LogicalDisk")
$colItems = $objWMIService^ ERROR

还有就是不同工作组的电脑如何连接?按照wmi管理规范测试器填写要求,如果不是一个工作组的话,用户名前面要加BigDom\administrator,这个如何添加
请问哪位大神给个示例!

感谢各位给出的示例,试了很多情况下出现未知的错误,最后还是用笨方式:
RunWait(@ComSpec & " /c " & 'wmic /node:"' & $PCIP & '" /user:"administrator" /password:"' & $PCPW & _
                        '" /output:' & @TempDir & "\" & $PCName & '.txt logicaldisk where "DriveType=3" get DeviceID,Size,FreeSpace,FileSystem', "", @SW_HIDE)
然后分析返回的TXT文本,得到想要的数据.暂时只能这么解决了!
发表于 2015-8-31 14:11:04 | 显示全部楼层
发个例子:
Dim $computer     ="192.168.1.25"
Dim $Remoteuser   ="administrator"
Dim $Remotepass   = "11111"
$strResult=''
$objlocator= ObjCreate("wbemscripting.swbemlocator")
$objWMIService = $objlocator.connectserver($computer,"root/cimv2",$Remoteuser,$Remotepass)
$colItems = $objWMIService.ExecQuery("Select * from Win32_LocalTime")
 
For $objItem In $colItems
    $strResult = $objItem.Month & "/" & _
            $objItem.Day & "/" & _
            $objItem.Year & _
            $objItem.Minute & ":" & _
            $objItem.Second & "(MM/DD/YYYY HH:MM:SS)"
Next
 
 
MsgBox(0, "", $strResult)
发表于 2015-8-31 14:12:19 | 显示全部楼层
你这错误检查下autoit版本,换个版本试试
发表于 2015-8-31 15:47:17 | 显示全部楼层
 楼主| 发表于 2015-8-31 17:05:05 | 显示全部楼层
本帖最后由 ioripalm 于 2015-8-31 17:22 编辑

回复 3# ila


    试了3.3.9和3.3.12都不能运行,如果是本机,语句都可以运行,现在问题是非同工作组不能连上,但是用手动wbemtest管理规范测试器可以连接!
发表于 2015-9-1 14:58:58 | 显示全部楼层
回复  ila


    试了3.3.9和3.3.12都不能运行,如果是本机,语句都可以运行,现在问题是非同工作组不能 ...
ioripalm 发表于 2015-8-31 17:05



    填ip,不同工作组是否正常?
发表于 2015-9-4 08:55:40 | 显示全部楼层
computer没必要带斜杠
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2024-11-6 09:49 , Processed in 0.079281 second(s), 23 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表