Hi,all

I need a macro or function to know which version of cdo.dll is
installed

tks

--
GRAZIE
Grazie in anticipo

Sub WhatIsIt()
Dim FSO As Object
Dim strPath As String
Set FSO = CreateObject("Scripting.FileSystemObject")
strPath = "C:\Program Files\Common Files\Microsoft Shared\Web Folders\PKMCDO.DLL"
MsgBox FSO.GetFileVersion(strPath)
Set FSO = Nothing
End Sub
--
Jim Cone
San Francisco, USA
http://www.realezsites.com/bus/primitivesoftware



"am A."
wrote in message
Hi,all
I need a macro or function to know which version of cdo.dll is installed
tks
--
GRAZIE
Grazie in anticipo

Jim Cone scriveva il 02/10/2006 :
Sub WhatIsIt()
Dim FSO As Object
Dim strPath As String
Set FSO = CreateObject("Scripting.FileSystemObject")
strPath = "C:\Program Files\Common Files\Microsoft Shared\Web
Folders\PKMCDO.DLL" MsgBox FSO.GetFileVersion(strPath)
Set FSO = Nothing
End Sub
--
Jim Cone
San Francisco, USA
http://www.realezsites.com/bus/primitivesoftware



"am A."
wrote in message
Hi,all
I need a macro or function to know which version of cdo.dll is installed
tks

great tks

--
Tks at all