Solved

Documentation for "AccessVersion" property

Posted on 2004-08-23
9
541 Views
Last Modified: 2008-01-09
Hello,
can someone point me to the documentation for the "AccessVersion" property of the dao database object, I can find it nowhere. from my testing it seems that a value of 8.5 means it was created in Access 2000, but I would like some concrete docs on this.
Thanks,
Bruce Mutch
0
Comment
Question by:bmutch
9 Comments
 
LVL 34

Expert Comment

by:flavo
ID: 11875107
0
 

Author Comment

by:bmutch
ID: 11875338
hello Dave,
not quite. I know how to determine the access versions intalled on a computer. I want to know see the docs on the AccessVersion property of a dao Database, in otherwords find out the version of a particular Access db.

thanks,Bruce
0
 
LVL 9

Expert Comment

by:tonydemarco
ID: 11875536
Bruce,

Open the file and goto the VBA editor [Alt -F11], you should see something like "Access9db" if the mdb was written in ver9.

Hope this helps

0
Use Case: Protecting a Hybrid Cloud Infrastructure

Microsoft Azure is rapidly becoming the norm in dynamic IT environments. This document describes the challenges that organizations face when protecting data in a hybrid cloud IT environment and presents a use case to demonstrate how Acronis Backup protects all data.

 

Author Comment

by:bmutch
ID: 11876266
Thanks Dave, but as I mentioned I am using dao (in VB6). This is a vb program which will be opening all different mdb files, and I need to be able to use the AccessVersion property of the dao database object.

Bruce
0
 
LVL 34

Accepted Solution

by:
flavo earned 50 total points
ID: 11876339
ok.. i did a function for you..

This looks at the refrences and see's which version of access is refrenced

Public Function getVersion() As String
On Error GoTo myError
Dim lVersion As Long

lVersion = References("Access").Major

Select Case lVersion

    Case 8
        MsgBox "97"
        getVersion = "97"
    Case 9
        MsgBox "2000"
        getVersion = "2000"
    Case 10
        MsgBox "XP"
        getVersion = "XP"
    Case 10
        MsgBox "2003"
        getVersion = "2003"
    Case Else
        MsgBox "unknown"
        getVersion = "unknown"
End Select
Exit Function
myErorr:
MsgBox "unknown"
getVersion = "unknown"

End Function

Dave
0
 
LVL 39

Expert Comment

by:stevbe
ID: 11878911
"AccessVersion" property of the dao database object"
"8.5 means it was created in Access 2000"

is this a custom property? how are you retrieving it?

if you are using DAO.Database.Version then you are getting the version of Jet and not Access which returns a string in major.minor format you can parse.

Jet -------- Access Version
1.0 ---- 1.0
1.1 ---- 1.1
2.0 ---- 2.0
3.0 ---- ‘95 (7.0)
3.5 ---- ‘97 (8.0)
3.6 ---- 2000 (9.0)
4.0 ---- 2002 (10.0)
4.0 ---- 2003 (11.0)



0
 

Author Comment

by:bmutch
ID: 12798469
thanks,
Bruce Mutch
0

Featured Post

Migrating Your Company's PCs

To keep pace with competitors, businesses must keep employees productive, and that means providing them with the latest technology. This document provides the tips and tricks you need to help you migrate an outdated PC fleet to new desktops, laptops, and tablets.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Suggested Solutions

In the previous article, Using a Critera Form to Filter Records (http://www.experts-exchange.com/A_6069.html), the form was basically a data container storing user input, which queries and other database objects could read. The form had to remain op…
Introduction The Visual Basic for Applications (VBA) language is at the heart of every application that you write. It is your key to taking Access beyond the world of wizards into a world where anything is possible. This article introduces you to…
Learn how to number pages in an Access report over each group. Activate two pass printing by referencing the pages property: Add code to the Page Footers OnFormat event to capture the pages as there occur for each group. Use the pages property to …
Polish reports in Access so they look terrific. Take yourself to another level. Equations, Back Color, Alternate Back Color. Write easy VBA Code. Tighten space to use less pages. Launch report from a menu, considering criteria only when it is filled…

829 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question