G
Guest
Hi All,
I have got a VB script file which is failing to run XP Embedded image.
The script file is for finding USB interface type disk drives, get the drive
letter and rename.
GetObject ("winmgmts:{impersonationLevel=Impersonate}!//" & strComputer)
objWMIService.ExecQuery ("SELECT * FROM Win32_DiskDrive where InterfaceType
= 'USB'")
objWMIService.ExecQuery ("ASSOCIATORS OF {Win32_DiskDrive.DeviceID=""" & _
strDeviceID & """} WHERE " & "AssocClass =
Win32_DiskDriveToDiskPartition")
objWMIService.ExecQuery ("ASSOCIATORS OF {Win32_DiskPartition.DeviceID=""" & _
wmiDiskPartition.DeviceID & """} WHERE " & "AssocClass =
Win32_LogicalDiskToPartition")
ltrim(objFile.ReadLine)
The script file is working on my XP Pro system.
May i know what components are required for this to execute?
Thanks
I have got a VB script file which is failing to run XP Embedded image.
The script file is for finding USB interface type disk drives, get the drive
letter and rename.
GetObject ("winmgmts:{impersonationLevel=Impersonate}!//" & strComputer)
objWMIService.ExecQuery ("SELECT * FROM Win32_DiskDrive where InterfaceType
= 'USB'")
objWMIService.ExecQuery ("ASSOCIATORS OF {Win32_DiskDrive.DeviceID=""" & _
strDeviceID & """} WHERE " & "AssocClass =
Win32_DiskDriveToDiskPartition")
objWMIService.ExecQuery ("ASSOCIATORS OF {Win32_DiskPartition.DeviceID=""" & _
wmiDiskPartition.DeviceID & """} WHERE " & "AssocClass =
Win32_LogicalDiskToPartition")
ltrim(objFile.ReadLine)
The script file is working on my XP Pro system.
May i know what components are required for this to execute?
Thanks