Set db = OpenDatabase(StringVanLocatie, True) werkt niet

Status
Niet open voor verdere reacties.
S

so10070

Gebruiker
Lid geworden
4 feb 2014
Berichten
419
In mijn ene applicatie werkt dit commando goed in de andere applicatie geeft die de fout "Sub of function niet gedefinieerd". :(
Code: 
        LocatieNieuweApplicatie = DLookup("VersieNieuweAppLocatie", "tblVersieProgramma") & "\" & CurrentProject.Name
        Set db = OpenDatabase(LocatieNieuweApplicatie, True)
        Set rs = db.OpenRecordset("tblVersieLokaal")
 
Waarschijnlijk goed bij MS Access 32 bit en probleem bij MS Access 64 Bit of op toestel met foutmeldingen niet alle benodigde updates van windows of Office gedaan?
 
Heb deze code
Code: 
Set db = OpenDatabase(LocatieNieuweApplicatie, True)
verandert in
Code: 
Set db = DBEngine(0).OpenDatabase(LocatieNieuweApplicatie, True)
en het werkt hier nu. :)
Waarom het in de andere applicatie zonder DBEngine(0) wel werkt weet ik niet. :eek:
 
Status
Niet open voor verdere reacties.
Steun Ons

Nieuwste berichten

Terug
Bovenaan Onderaan