18. april 2001 - 13:31Der er
17 kommentarer og 1 løsning
Hvad går der galt her. ?
Det virkede under acces97 men under access 2000 virker det ikke.
Dim tempDB, tempDB2 As Database Dim tabel, tabel2 As Recordset Dim x As Byte
Set tempDB = CurrentDb
Når den den skal \' afvikle \"scl_kørsel_Q\" gå den i fejl. Jeg har prøve at bytte om på række føøgende af scl_kørsel_q og DBengine Men det hjælper ikke.
Set tabel = tempDB.OpenRecordset(\"SCL_kørsel_q\", dbOpenTable)
Set tempDB2 = DBEngine.Workspaces(0).OpenDatabase(\"Q:\\USERS\\KANTINE\\test_data.mdb\")
Set tabel2 = tempDB2.OpenRecordset(\"tempSCL\", dbOpenTable)
Hej Tomas Jeg fumlede men her min kommentar. Stor var min glæde og jeg gik fluks inde som du beskriver. Men der er sat flue been af i DAO 3.6 Objeckt Libray
Hvad er \"scl_kørsel_Q\"? Er det en forespørgsel eller en tabel.
Hvis det er en forespørgsel, kan du ikke åbne det som en tabel, men skal benytte: Set tabel = tempDB.OpenRecordset(\"SCL_kørsel_q\", dbopensnapshot) eller Set tabel = tempDB.OpenRecordset(\"SCL_kørsel_q\", dbopendynaset)
Sorre du fik halvdelen af svaret. Den stopper bare og foretager sig ikke mere. Når jeg bruger standard fjel utill siger den blot der er fej / svenderik
ok, men det kan man i hvert fald ikke i \'2000. Har du prøvet at skifte sætningen ud med det jeg skrev? Hvis forespørgslen er opdaterbar skal du bruge dbopendynaset. Ellers dbopensnapshot!
Ja jeg er har prøvet hvad du skrev. Nu ser det sådan ud.
Dim tempDB, tempDB2 As Database Dim tabel, tabel2 As Recordset
Dim x As Byte Set tempDB = CurrentDb Den dør igen ved SCl_kørsel meeeennn. Set tabel = tempDB.OpenRecordset(\"SCL_kørsel_q\", dbOpenSnapshot) Set tempDB2 = DBEngine.Workspaces(0).OpenDatabase(\"Q:\\USERS\\KANTINE\\test_data.mdb\") Set tabel2 = tempDB2.OpenRecordset(\"tempSCL\", dbOpenTable) Nu siger sider den runtime Error 3061 der er for ¨ få prametere. Der var ventet 2 i debugeren.
Dim tempDB, tempDB2 As Database Dim tabel, tabel2 As DAO.Recordset
Dim x As Byte Set tempDB = CurrentDb Set tabel = tempDB.OpenRecordset(\"SCL_kørsel_q\", dbOpenSnapshot, dbSeeChanges) Set tempDB2 = DBEngine.Workspaces(0).OpenDatabase(\"Q:\\USERS\\KANTINE\\test_data.mdb\") Set tabel2 = tempDB2.OpenRecordset(\"tempSCL\", dbOpenSnapshot, dbSeeChanges)
Jeg har netop kør det du foreslog samme fejl samme runtime error. tempSCL er en tabel. Og nej det er ikke mig der lavet det. Det er min forgænger. Støøn.
Kan du åbne SCL_kørsel_q manuelt fra databasevinduet?
Hvis du trykker [Debug] (når fejlen opstår) stiller den sig så i linien med \"SCL_kørsel_q\"?
Bortset fra det, så var ændringen med dbSeeChanges noget sludder, da der ikke foretages nogle ændringer....Istedet kunne der stå dbReadOnly, men det er implicit i et snapshot!
Hmm Det vil ikke umiddelbart fungere. Men nu gør jeg noget prgramere mig ud af det. Keep it simpel. Som min gamle bos sagde. Amnyway jeg aceptere dit svar som tak for den store hjælp du har givet. /SvendErik
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.
