How to retrieve ms access database full information version

If I want to retrieve a full version information for an ms access
databases, I use (from vb6 code) the "Access.Application" object and
SysCmd method. Whit the number returned by the method I can identify
the service pack applied to database (e.g.
...
SysCmd(acSysCmdAccessVer) = 9 -> Access 2000
SysCmd(715) = 2719 ' Access 2000 No Service Pack
SysCmd(715) = 3822 ' Access 2000 SP1
SysCmd(715) = 4506 ' Access 2000 SP2
SysCmd(715) = 6620 ' Access 2000 SP3
SysCmd(acSysCmdAccessVer) = 10 -> Access 2002
SysCmd(715) = 2627 ' Access 2002(XP) No Service Pack
SysCmd(715) = 3409 ' Access 2002(XP) SP1
SysCmd(715) = 4302 ' Access 2002(XP) SP2
SysCmd(715) = 6501 ' Access 2002(XP) SP3
...)
Do is exists a method from some library of Ms Access (or DAO or ADO)
permit to identify a full access verion information.
Thanks to all.
Ciao