PDA

View Full Version : Solved: Access, jet versions, using A97 to read A2003



TheAntiGates
08-08-2006, 01:47 PM
I read that the following will make Access 2000, 2002 & 2003("Jet 4") .MDB usable by Access97 ("Jet 3"). Is that correct?

Moreover, what solutions are available for reading an Access 2003 table in Access97? FWIW, I only need tables right now. I comprehend that VBA may not survive the metamorphosis as "fully functional" as Data.Sub ConvertJetMDB()
dbName = "C:\path\olddb.MDB"
dbNewName = "C:\path\newdb.MDB"
Set dbdao = CreateObject("DAO.DBEngine.36")
MsgBox "DAO OK, version is " & dbdao.Version
dbver = 32
dbdao.CompactDatabase dbName, dbNewName, ";LANGID=0x0409;CP=1252;COUNTRY=0", dbver
Set newdb = dbdao.OpenDatabase(dbNewName)
MsgBox "Database opened OK - format version is " & newdb.Version
End Sub

stanl
08-08-2006, 05:14 PM
I prefer something like




Application.ConvertAccessProject("c:\mydbs\mydb_2003.mdb", & _
"c:\mydbs\mydb_97.mdb",acFileFormatAccess97



or get sneaky with the undocumented objAccess.SysCmd 605, strPathOutput


Stan

TheAntiGates
08-09-2006, 08:20 AM
Your code gave the solution. In fact, I got no further than receiving "cannot perform this operation; features in this version are not available in databases with older formats" from my attempt. (Send complaints to www.ability.com (http://www.ability.com) :whip )

Well damn done, sir.