PDA

Click to See Complete Forum and Search --> : Access 97 Vs 2000


spyder
Oct 10th, 2000, 12:30 PM
Greetings all,

I have a Question about the easiest way to make a work around. I have an old app (version 2) that uses several Access 97 databases. I am Creating a new app (version 3) that needs to grab the data from the old verion and place it in the new databases.

Access 2000 needs to have the reference of CDO 3.6 while Access 97 works with the CDO 3.5/2.5 compatability library. They both can not exist in an app at the same time.

What is the Easiest way to have both databases open so that I can compare the data and transfer the records to the new databases?

Any ideas will be greatly appreciated.
Devin

Dillinger4
Oct 10th, 2000, 02:33 PM
Hummmmmmmmm...... That's a good question
If i wanted to copy an existing database to another
database i guess i would use

private sub copydatabase(strSourceFile as string,strDestFile as string)
'Given the path to the source database,create a duplicate
'copy of the database using DAO. The blnCopyData parameter
'specifies wether to copy just the structure or the
'structure and the data.

Dim dbsScr as Database, dbsDest as Database

' Create the database
On Error GoTo errExists
Set dbScr = DBEngine.WorkSpaces(0).OpenDatabase(strSourceFile)
Set dbDest = DBEnging.WorkSpaces(0).CreateDatabase(strDestFile)
On Error GoTo 0

CopyTables dbsScr , dbsDest
CopyQueries dbsScr, dbsDest

'Copying the Data occures before copying the relationships.
This is so you do not have to worry about the order the data is copied in violated referential integrity rules.

If blnCopyData Then
CopyData dbsScr,dbsDest
End If
CopyRelationships dbsScr,dbsDest
dbsDest.Close
dbsScr.Close
Exit Sub

errExists:
If Err = 3024 Then
MsgBox "Cannot copy to a database that already exists!"
Else
MsgBox "Error: & Error$
End If
Exit Sub
End Sub

spyder
Oct 10th, 2000, 02:56 PM
That would make and exact Copy of the databases. But i Don't need an exact copy.

The New database(access 2000) Needs to get the some of the old data from the old version ( access 97 ) based on certain parameters. The Table(s) structure is not the same in the new databases and the old, so a Straight port won't work.

Access 2000 Only can be referenced with the CDO 3.6 Reference and this won't read Access 97 tables and vice versa.

I really need to have both databases open at the same time. And I really don't want to take the time and trouble of creating a delimited file and all.

I am looking for a work around that can let me have both databases open at the same time. so that I can

if not rsold![field1] = "" then
rsnew![field3] = rsold![field1]
rsnew![field4] = rsold![field2] - rsold![field3]
end if

or other type calculations.

Is that a bit Clearer?
-=D=-

JHausmann
Oct 10th, 2000, 05:01 PM
Open up Access2000 and create linked tables to your access97 .mdb (don't ask me how, I don't have Access2000. In Access97 you'd use the file/get external data/link tables menu) Now that your Access 2000 database has the data linked, you can treat the Access97 data like it is part of the Access 2000 database