PDA

Vollständige Version anzeigen : Fehlermeldung bei Code Access2000


Bernhard_Einhaus
17.06.2001, 16:31
Hallo Leute,
ich bin umsteiger von Access97 auf Access2000
beim schreiben eines Moduls kommt immer die Fehlermeldung "definiert"
Früher unter Access97 habe ich immer geschrieben:

Public Function dummyupdate()
Dim datenbank As Database
Dim dummy As Recordset


Set datenbank = DBEngine.Workspaces(0).Databases(0)
Set dummy = datenbank.OpenRecordset("Merkmaldummy", DB_OPEN_DYNASET)

End Function


wie ist die Codierung unter Access2000

Vielen Dank für die Hilfe

Gruss

Bernhard_Einhaus

gloria
18.06.2001, 07:40
hi,
vielleicht bringt dich dies weiter:

Dim db As Database
Dim rs3, rs4 As Recordset
Set db = CurrentDb
Set rs3 = db.OpenRecordset("a_Intrastat_Berechnung", dbOpenDynaset)
Set rs4 = db.OpenRecordset("t_Intrastat_Auswertung", dbOpenTable, dbAppendOnly)
usw .............

Da wird einmal eine Tabelle und eine Abfrage geöffnet.

ciao glori

A.S.
18.06.2001, 09:04
Hallo Bernhard,

das ist das ADO/DAO-Syndrom ;) Siehe dazu <a href="http://www.donkarl.com/FAQ/FAQ7Bugs.htm">FAQ 7.11 Dim DB As Database in A00 bringt Fehler</a>.


------------------
HTH

Arno