Set Fso = CreateObject("Scripting.FileSystemObject") Set InputFile = fso.OpenTextFile("MachineList.Txt") Do While Not (InputFile.atEndOfStream) strComputer = InputFile.ReadLine Set objWMIService = GetObject("winmgmts:" & strComputer & "rootcimv2") Set colFiles = objWMIService.ExecQuery _
("Select * from CIM_Datafile Where Name = 'c:windowssystem32driverstdx.sys'")
For Each objFile in colFiles
Wscript.Echo objFile.Version &" " & strComputer
'Wscript.Echo "Version: " & strComputer Next loop
——————-
Thanks,
Marie von Ebner-Eschenbach – "Even a stopped clock is right twice a day."