Need a script to find version of a dll
Hello,
I have a script I just need it to produce the output so I can create a report or place in custom fields
Dim oFSO : Set oFSO = CreateObject("Scripting.FileSystemObject")
PrintDLLVersions oFSO.GetFolder(WScript.Arguments.Item(0))
Sub PrintDLLVersions(Folder)
Dim oFile, oSubFolder
' Scan the DLLs in the Folder
For Each oFile In Folder.Files
If UCase(oFSO.GetExtensionName(oFile)) = "DLL" Then
WScript.Echo oFile.Path & vbTab & oFSO.GetFileVersion(oFile)
End If
Next
' Scan the Folder's subfolders
For Each oSubFolder In Folder.SubFolders
PrintDLLVersions oSubFolder
Next
End Sub
Usage:
> cscript //nologo script-file.vbs folder > out-file
e.g.:
> cscript //nologo dll-list.vbs C:\Dir > dll-list.txt
Or should I say I need a script to find:
wuaueng.dll version or KB# file and report it.
0 Comments
[ + ] Show comments
Answers (3)
Please log in to answer
Posted by:
apptopack
8 years ago
Posted by:
chucksteel
8 years ago
Posted by:
SMal.tmcc
8 years ago