Testing for different versions of Office

10-03-09, 07:19 PM

oldjay

I have the following macro that opens an access database. I have some people
that are using Access 2000. Is there any way I can test to see what version
they are using and open that Access version?

Private Sub CommandButton5_Click() 'Add new substrate

Dim X As String

X = Shell("C:\Program Files\Microsoft Office\Office11\MSACCESS.EXE
\\SERVER3\database\SUBSTRATES.MDB", 1)

oldjay

End Sub

10-05-09, 08:12 AM

OssieMac

Following appears to work satisfactorily with Access 2002 and Access 2007.
You will need to test with other versions.

Sub TestAccessVersion()

'9 = Access 2000
'10 = Access 2002/XP
'11 = Access 2003
'12 = Access 2007

Dim objAccess As Object

Set objAccess = CreateObject("Access.Application")

MsgBox objAccess.Version

objAccess.Quit

Set objAccess = Nothing

End Sub

Similar Threads
Multiple Ruby versions for testing [Note: parts of this message were removed to make it a legal post.] Hi list, I'm trying to test a gem (managed with Hoe) on my Ubuntu machine. The Ruby from the Ubuntu...
Testing Turbo Pro versions? Hi, Is there a way to trial the Borland Turbo Delphi Pro version? We're currently using Delphi 2006, but we would like to know if it'll compile on Turbo versions. Since we...
Access Versions vs OS Versions vs Office Versions I have an application that is deployed to over 100 users with various versions of Office/Windows/Access. This is an .adp that I have upgraded to A2003 and created a package...
Testing on different Netscape versions Hello, If I have to test my code on different Netscape versions, can I download and run those versions on the same computer or will it create conflicts? And if I had to test...
Obtaining older versions of IE for testing Install Windows 95/98/NT/2000 Beyond that you might find it on some CD's from software makers, they used to include 4.x MS might also have it in their MSDN subscriptions if...