GetFileVersion Not Returning a Version No.

[mab43]

The following code is only returning a version number with .dll files. I am trying to determine the version of an access file. Any reccos?
----------------------------------------
Dim fso
Set fso = CreateObject("Scripting.FileSystemObject")
v = fso.GetFileVersion("C:\test.mdb")
msgbox v

 

[PHV]

And this ?
v = GetObject("C:\test.mdb").Version
MsgBox v


Hope This Helps, PH.
Want to get great answers to your Tek-Tips questions? Have a look at FAQ219-2884 or FAQ181-2886

 

[mab43]

I get an error at the line. I am using VB Script.

 

[PHV]

Any chance you could post the whole error message ?
Have you ms-access installed ?

Hope This Helps, PH.
Want to get great answers to your Tek-Tips questions? Have a look at FAQ219-2884 or FAQ181-2886

 

[mab43]

Here you go:
Windows Script Host
Script: filepath
Line: 4
Char 1
Error: Unspecified error
Code: 80004005
Source (null)
Thanks for you help