pessoal usei o codigo que pegamos no script guy da microsoft e ele joga o resultado na tela o que eu deveria utilizar para gravar o resulta em arquivo ?
Set colQuickFixes = objWMIService.ExecQuery _ ("Select * from Win32_QuickFixEngineering")
For Each objQuickFix in colQuickFixes Wscript.Echo "Computer: " & objQuickFix.CSName Wscript.Echo "Description: " & objQuickFix.Description Wscript.Echo "Hot Fix ID: " & objQuickFix.HotFixID Wscript.Echo "Installation Date: " & objQuickFix.InstallDate Wscript.Echo "Installed By: " & objQuickFix.InstalledBy Next
hoje vi a seguinte classe para criacao de arquivos
Sub CreateAfile Set fs = CreateObject("Scripting.FileSystemObject") Set a = fs.CreateTextFile("c:\scripts\testfile.txt", True) a.WriteLine("This is a test.") a.Close End Sub
é relativamente simples combinar os dois, mas se quiser uma forma mais fácil ainda, basta executar o primeiro script na linha de comando e redirecionar a saída dele para um arquivo texto: