GHOST XP SP3纯净版 如何加载WMI组件

[原创] 利用 WMI 分析当前硬盘及分区 生成ghost.bat
G特别说明 这不是 Ghost还原 只是一个生成的例子

可根据GHO 位置 生成Ghost.bat

输入的分区位置必须是正确的

$w = InputBox("输入","","D:\ghost\ghost.gho"," ","-1","22","-1","-1")
$ghost = StringSplit($w, "\")
$ghost1 = StriungSplit($w, ":")
$11=$ghost1[2]
$g=$ghost[1]
SplashTextOn("", "正在读取硬盘分区信息", "200", "12", "-1", "-1", 3, "宋体", "9", "700")

_test()
Func _test()
Dim $a[1]
Local $x=0
$n=0
$objWMIService = ObjGet("winmgmts:\\localhost\root\CIMV2")

$colDiskDrives = $objWMIService.ExecQuery("SELECT * FROM Win32_DiskDrive")
For $objDrive In $colDiskDrives
ReDim $a[UBound($a) + 1]
GUICtrlSetColor(-1, 0x0000ff)
$n=$n+1
$strDevic