Любой язык - Как узнать из Bat-ника версию *.DLL, *.ax и т.п.

[Dilinjer]

Цитата Dilinjer:



Это Вы про filever.exe или есть еще какието CMD-шные тулзы?



VerInfo от

angelfire

Цитата Dilinjer:



для незаригистрированных DLL/OCX какой прогой CMD/GUI можно узнать GUID(GUID'ы) класса(классов) ?



есть библиотечка из комплекта VS6 TLBINF32.DLL, которая позволяет работать с блоками TLB,

ТУТ

лежит подробная справка по ней и вообще по теме. Пара простых примеров по ее использованию на VBS:



чтение TLB из файла:

Код:

Код: Выделить всё

sFileName = "C:\WINDOWS\system32\msxml3.dll"
Set oTypeLib = CreateObject("TLI.TypeLibInfo")
If IsObject(oTypeLib) Then
	oTypeLib.ContainingFile = sFileName
	WScript.Echo "TLB Name:" & vbTab & oTypeLib.Name
	WScript.Echo "TLB GUID:" & vbTab & oTypeLib.GUID
	WScript.Echo "TLB LCID:" & vbTab & oTypeLib.LCID
	WScript.Echo "TLB Ver.:" & vbTab & oTypeLib.MajorVersion & "." & oTypeLib.MinorVersion
	WScript.Echo vbCRLF & "CoClasses of Library:"
	WScript.Echo "---------"
	For Each oTypeLibInfo In oTypeLib.CoClasses
		WScript.Echo oTypeLibInfo.GUID & " : " & oTypeLibInfo.Name
	Next
End If

чтение TLB из реестра:

Код:

Код: Выделить всё

Lib_GUID = "{F5078F18-C551-11D3-89B9-0000F81FE221}"
Lib_LCID = "0"
Lib_MajorVer = "3"
Lib_MinorVer = "0"
Set oTypeLibApp = CreateObject("TLI.TLIApplication")
Set oTypeLib = oTypeLibApp.TypeLibInfoFromRegistry (Lib_GUID, Lib_MajorVer, Lib_MinorVer, Lib_LCID)
If IsObject(oTypeLib) Then
	WScript.Echo "TLB Name:" & vbTab & oTypeLib.Name
	WScript.Echo "TLB GUID:" & vbTab & oTypeLib.GUID
	WScript.Echo "TLB LCID:" & vbTab & oTypeLib.LCID
	WScript.Echo "TLB Ver.:" & vbTab & oTypeLib.MajorVersion & "." & oTypeLib.MinorVersion
	WScript.Echo vbCRLF & "CoClasses of Library:"
	WScript.Echo "---------"
	For Each oTypeLibInfo In oTypeLib.CoClasses
		WScript.Echo oTypeLibInfo.GUID & " : " & oTypeLibInfo.Name
	Next
End If

запуск:

Код:

Код: Выделить всё

cscript //NoLogo Script.vbs

[Dilinjer]

Вот, нарыл у мелкомягких прикольную GUI'шную тулзу -

oleview.exe

- полезный вьювер!