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." <on_group_-(E-Mail Removed)>
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." <on_group_-(E-Mail Removed)>
> 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