rst.Close Set rst = Nothing cn.Close Set cn = Nothing End Sub
Det fungerer perfekt i acces 2000.
Nu er problemet bare om dem jeg laver en database til arbejder i 97 og kan ikke lige opgardere (!!!!!!) Når jeg kører ovestående i 97 kommer der følgende fejlmeldinger
"Der kan ikke tildeles en skrivebeskyttet egenskab"
Så prøver jeg at ændrer rst!Arbejdsgiver = NewData til rst.Arbejdsgiver = NewData
Herefter modtager jeg følgende besked
"Et objekt er obligatorisk" og peger imod "Set cn = CurrentProject.Connection"
Jeg har tidligere brugt denne kode til at tilføje poster i en access97 db. Jeg ved ikke om det fungerer i dette tilfælde og er ikke afprøvet i en NotInList situation:
Dim Rst As Recordset Set Rst = DBEngine.Workspaces(0).Databases(0).OpenRecordset("TABELNAVN") With Rst .AddNew ![Arbejdsgiver] = NewData .Update End With Set rst = Nothing
Jeg har ingen reference til Microsoft ActiveX 2.x Object Library.
Desværre er der ingen af jeres to forslag der fungerer. Ved Mugs er der syntaksfel i Set Rst = DBEngine.Workspaces(0).Databases(0).OpenRecordset("T Faglig Database")
og ved Thomas siger den at "Den brugerdiffinerede tybe er ikke difineret" og pejer imod Dim db as Database ( jeg har prøvet ændrer Database med navnet )
Jan, du SKAL enten have en reference til Microsoft DAO 3.x Object Library (og derved benytte mit forslag) eller en reference til Microsoft ActiveX 2.x Data Object Library og derved benytte din oprindelige metode.
hmmm...du har ikke tilfældigvis en reference, hvor der står "MISSING" eller "MANGLER" foran? I så fald, er det formentlig den, som driller og skal rettes.
Du havde ikke nogle af de MISSING-referencer, som jeg spurgte om i mit forrige indlæg? Umiddelbart er koden jo korrekt nok. Jeg har dog ikke prøvet at bruge ADO i en Access 97-database (den brugte jo DAO i stedet for ADO).
Prøv at downloade og installere SP3 til ADO 2.5 fra Microsoft (mdac_typ.exe) version 2.1 vil ikke funke.
Husk nu at sætte en referece til ADO objectet under funktioner: Microsoft ActiveX Data Objects 2.5 Object Library.
Du skal nok først fjerne referencen til 2.1 først
Henrik
Synes godt om
Ny brugerNybegynder
Din løsning...
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.