How do I find the "Version" information on a file in a directory?

[VB400]

I have an application that uses many DLLs. I would like to write a VB program that will allow the user to display a form with all the application's DLLs along with the version information. I'm looking for the same information that is displayed when you right-click a DLL file in Windows Explorer and click Preoperties then click the Version tab.

I know the exact name and location of all the DLLs and I can use the Microsoft Scripting Runtime Library to get lots of information on any file -- version information is not part of it.

Any help will be greatly appreciated.

Tarek

The more I learn, the more I need to learn!

 

[VB400]

Never mind, I found a link to the desired code in a FAQ

faq222-286

Tarek

The more I learn, the more I need to learn!

 

[edderic]

For other programmers :

'In Module :

Type SHELLEXECUTEINFO
cbSize As Long
fMask As Long
hwnd As Long
lpVerb As String
lpFile As String
lpParameters As String
lpDirectory As String
nShow As Long
hInstApp As Long
lpIDList As Long
lpClass As String
hkeyClass As Long
dwHotKey As Long
hIcon As Long
hProcess As Long
End Type
Public Const SEE_MASK_INVOKEIDLIST = &HC
Public Const SEE_MASK_NOCLOSEPROCESS = &H40
Public Const SEE_MASK_FLAG_NO_UI = &H400
Declare Function ShellExecuteEX Lib "shell32.dll" Alias _
"ShellExecuteEx" (SEI As SHELLEXECUTEINFO) As Long

'In Form codes :

Private Sub Form_Load()
'Replace "c:\Windows\winsock.dll" with the name of the file you want to launch his property dialog.
Call ShowProps("c:\Windows\winsock.dll", Me.hwnd)
End Sub Eric De Decker
vbg.be@vbgroup.nl

Licence And Copy Protection AxtiveX
Source CodeBook for the programmer

http://www.createsoftware2000.com