Re: Convert Access 2 to Access 2000
From: Brendan Reynolds (brenreyn)
Date: 01/04/05
- Next message: Chris Mills: "Re: Convert Access 2 to Access 2000"
- Previous message: Brendan Reynolds: "Re: Convert Access 2 to Access 2000"
- In reply to: david epsom dot com dot au: "Re: Convert Access 2 to Access 2000"
- Next in thread: Margaret Turner: "Re: Convert Access 2 to Access 2000"
- Messages sorted by: [ date ] [ thread ]
Date: Tue, 4 Jan 2005 11:25:07 -0000
That's the one, thanks David.
-- Brendan Reynolds (MVP) http://brenreyn.blogspot.com The spammers and script-kiddies have succeeded in making it impossible for me to use a real e-mail address in public newsgroups. E-mail replies to this post will be deleted without being read. Any e-mail claiming to be from brenreyn at indigo dot ie that is not digitally signed by me with a GlobalSign digital certificate is a forgery and should be deleted without being read. Follow-up questions should in general be posted to the newsgroup, but if you have a good reason to send me e-mail, you'll find a useable e-mail address at the URL above. "david epsom dot com dot au" <david@epsomdotcomdotau> wrote in message news:%23J8ydmh8EHA.2012@TK2MSFTNGP15.phx.gbl... >> Any one else? > > Set qdf = db.OpenQueryDef(whatever) > change to > Set qdf = db.QueryDefs(whatever) > > > You see that it can be done with a simple find and replace. > >> > The automatic conversion from Access2 to Access 2000 did not clearly >> > state what the compile errors were. > > Open a code module and select "Compile" from the Debug menu. > > You may have to remove the "Utility" reference from Tools | References, > and if your Ini file referenced any library files, that is where they > go now. > > Also, Decl statements that reference DLL's will need to be re-written. > > (david) > > > "Brendan Reynolds" <brenreyn at indigo dot ie> wrote in message > news:O$cSwXf8EHA.208@TK2MSFTNGP12.phx.gbl... >> It's years since I did a conversion from Access 2, Margaret, and I've >> forgotten much of it now. I suspect that the problem is probably not in > the >> lines you posted, but inside the 'EnableControls' function. >> >> The most common problems I remember were differences between DAO 2.x and > DAO >> 3.x syntax. BeginTrans, CommitTrans and RollBack are now methods of the > DAO >> Workspace object rather than the Database object, and you can not refer >> to >> fields of a recordset using the '!', e.g. rst!SomeField, you have to > change >> it to rst.SomeField (or rst("SomeField")). There was also a third one, >> something to do with QueryDefs, but I seem to have some kind of mental > block >> about that one - every time this question comes up I forget it again. Any >> one else? >> >> -- >> Brendan Reynolds (MVP) >> http://brenreyn.blogspot.com >> >> The spammers and script-kiddies have succeeded in making it impossible >> for >> me to use a real e-mail address in public newsgroups. E-mail replies to >> this post will be deleted without being read. Any e-mail claiming to be >> from brenreyn at indigo dot ie that is not digitally signed by me with a >> GlobalSign digital certificate is a forgery and should be deleted without >> being read. Follow-up questions should in general be posted to the >> newsgroup, but if you have a good reason to send me e-mail, you'll find >> a useable e-mail address at the URL above. >> >> >> "Margaret Turner" <mgrogan92@bigpond.com> wrote in message >> news:4mlCd.102414$K7.76435@news-server.bigpond.net.au... >> > Thanks Brendan for your prompt reply. >> > >> > The automatic conversion from Access2 to Access 2000 did not clearly > state >> > what the compile errors were. >> > There are more than 200 forms, mostly with code attached. >> > I had assumed that the code I supplied was at fault. >> > >> > Is there a way that I can find what in all the code the conversion is >> > objecting to? >> > >> > For example, one piece of code won't compile >> > Dim Tmp As Variant >> > Tmp = EnableControls("Detail", True) >> > >> > It would seem that I have a huge conversion exercise to go through :( >> > >> > Thanks again, >> > >> > Margaret >> > >> > "Brendan Reynolds" <brenreyn at indigo dot ie> wrote in message >> >> There's nothing in this code that needs converting. Given a reference > to >> >> the DAO 3.6 object library, and provided that reference appears above > any >> >> ADO reference in the list of references, the code works as is in >> >> Access >> >> 2003. Here's my test. As you can see, the only things I changed were >> >> required to test the code without the complete database ... >> >> >> >> 'passing EnterSurname as argument, assuming it is form control in >> >> original code >> >> Public Sub TestTheCode(ByVal EnterSurname As String) >> >> >> >> Dim ThisPlayer As Long >> >> ThisPlayer = Val([EnterSurname]) >> >> Dim MyWs As Workspace >> >> Dim MyDb As Database >> >> Set MyWs = DBEngine(0) >> >> Set MyDb = MyWs.OpenDatabase(CurrentProject.Path & >> >> "\northwind.mdb") >> >> Dim MyPlayers As Recordset >> >> Set MyPlayers = MyDb.OpenRecordset("Categories") >> >> Debug.Print MyPlayers.Fields(0) >> >> MyPlayers.Close >> >> >> >> End Sub >> >> >> >> -- >> >> Brendan Reynolds (MVP) >> >> http://brenreyn.blogspot.com >> >> >> >> The spammers and script-kiddies have succeeded in making it impossible >> >> for >> >> me to use a real e-mail address in public newsgroups. E-mail replies >> >> to >> >> this post will be deleted without being read. Any e-mail claiming to >> >> be >> >> from brenreyn at indigo dot ie that is not digitally signed by me with > a >> >> GlobalSign digital certificate is a forgery and should be deleted > without >> >> being read. Follow-up questions should in general be posted to the >> >> newsgroup, but if you have a good reason to send me e-mail, you'll >> >> find >> >> a useable e-mail address at the URL above. >> >> >> >> >> >> "Margaret Turner" <mgrogan92@bigpond.com> wrote in message >> >> news:1gkCd.102348$K7.91159@news-server.bigpond.net.au... >> >>> Could someone kindly point me in the of direction of how I can > convert >> >>> Access 2 to Access 2000. >> >>> >> >>> My main challenge is the Access 2 code for a front end and back end >> >>> databases. >> >>> >> >>> The "program" database has the following code: >> >>> Dim ThisPlayer As Long >> >>> ThisPlayer = Val([EnterSurname]) >> >>> Dim MyWs As Workspace >> >>> Dim MyDb As Database >> >>> Set MyWs = DBEngine(0) >> >>> Set MyDb = MyWs.OpenDatabase("C:\FSC\TOURNDAT.MDB") >> >>> Dim MyPlayers As Recordset >> >>> Set MyPlayers = MyDb.OpenRecordset("Players") >> >>> >> >>> Any help greatly appreciated. >> >>> >> >>> Thanks, >> >>> >> >>> Margaret >> >>> >> >>> >> >>> >> >> >> >> >> > >> > >> >> > >
- Next message: Chris Mills: "Re: Convert Access 2 to Access 2000"
- Previous message: Brendan Reynolds: "Re: Convert Access 2 to Access 2000"
- In reply to: david epsom dot com dot au: "Re: Convert Access 2 to Access 2000"
- Next in thread: Margaret Turner: "Re: Convert Access 2 to Access 2000"
- Messages sorted by: [ date ] [ thread ]
Relevant Pages
|
