Programatically Returning Which Access Version I am using

M

Mike

Hi

I have an application that works OK under both Access 2002 (OfficeXP) and
the new Access 2002/2003 (Office 2003) but I want to restrict it to be used
only under Access 2002.

How can I pick up the version of Access it being run under ?

Any ideas ?

Thanks

Mike
 
6

'69 Camaro

Hi, Mike.

Try:

If (Nz(Application.Version, "") = "10.0") Then
' This is the 2002 version, so do nothing.
ElseIf (Nz(Application.Version, "") = "11.0") Then
Application.Quit ' Quit the applic, 'cuz it's the '03 version.
Else
' Use this for other (future) versions.
End If


HTH.

Gunny

See http://www.QBuilt.com for all your database needs.
See http://www.Access.QBuilt.com for Microsoft Access tips.

(Please remove ZERO_SPAM from my reply E-mail address, so that a message
will be forwarded to me.)
 
M

Mike

Thanks so much !

'69 Camaro said:
Hi, Mike.

Try:

If (Nz(Application.Version, "") = "10.0") Then
' This is the 2002 version, so do nothing.
ElseIf (Nz(Application.Version, "") = "11.0") Then
Application.Quit ' Quit the applic, 'cuz it's the '03 version.
Else
' Use this for other (future) versions.
End If


HTH.

Gunny

See http://www.QBuilt.com for all your database needs.
See http://www.Access.QBuilt.com for Microsoft Access tips.

(Please remove ZERO_SPAM from my reply E-mail address, so that a message
will be forwarded to me.)
Click to expand...
 
Top