Тема: VBScript: утилита LogParser от Microsoft, COM-интерфейс
Утилита LogParser, как оказалось, обладает развитым COM-интерфейсом и заслуживает тщательного изучения, имхо
. Вот, например, поиск всех dll-файлов на диске C:
Set oLogQuery = CreateObject("MSUtil.LogQuery")
Set oFormat = CreateObject("MSUtil.LogQuery.FileSystemInputFormat")
Set oRecordSet = oLogQuery.Execute("SELECT * FROM C:\*.dll", oFormat)
' WScript.Echo oRecordSet.getColumnCount()
i = 0
While Not oRecordSet.atEnd
Set oRecord = oRecordSet.getRecord()
strValue = oRecord.getValue("Path")
WScript.Echo strValue
i = i + 1
oRecordSet.moveNext
Wend
oRecordSet.Close
WScript.Echo "На диске ""C:"" найдено dll-файлов: " & iИнтересно, что первый раз такой скрипт у меня выполнялся ~230 сек., второй и последующие разы ~21сек.
В названии ветки всегда должен быть указан язык программирования или среда исполнения скрипта, если это возможно.

