Avatar billede perry Nybegynder
18. september 2000 - 21:43 Der er 15 kommentarer og
1 løsning

HASTER Fra Access 7 til 2000

I en acccess 7 database er et modul til overførsel af en tabel til excel. Som virker fint. Men når jeg sætter modulet over i access 2000 kommer der en fejl meddelse :
Compile error :
Sub or Function not defined.
Fejlen er i følgende linje :
Set Rst = Workspaces(0).
Hvordan retter jeg dette ?

Udsnit af funktionen :
Function eksport()
Dim obvar As Object, Wkb As Object, Rst As Recordset
Dim i As Integer
Dim d As Date
DoCmd.Hourglass True
Set Rst = Workspaces(0).Databases(0).OpenRecordset(\"eksport\", dbOpenTable) \'Åbner tabellen eksport
Set obvar = CreateObject(\"excel.application\")          \'Åbner Excel
Set Wkb = obvar.workbooks.Add
Avatar billede hellstern Nybegynder
18. september 2000 - 22:07 #1
Hej
Jeg mener at have haft samme problem engang.
Prøv lige følgende -
I linjen

Dim obvar As Object, Wkb As Object, Rst As Recordset

Skriver du;

Dim obvar As Object, Wkb As Object, Rst, Rst2 As Recordset

Hilsen
Tue
Avatar billede perry Nybegynder
18. september 2000 - 22:14 #2
Hej
Det hjælper ikke, samme fejl.
Workspaces markéres med blåt
Avatar billede lkp Nybegynder
18. september 2000 - 22:27 #3
Hej Perry

Check lige, om du har sat en reference til DAO.

Prøv evt. med følgende kode i stedet for:

Avatar billede lkp Nybegynder
18. september 2000 - 22:29 #4
--- Fortsat

dim db as database
dim rst as recordset

set db = currentdb
set rst = db.openrecordset(\"eksport\")

(Opdelingen kan gøre fejlsøgning lettere)

Med venlig hilsen

Lars Kjærgaard
Avatar billede perry Nybegynder
18. september 2000 - 22:37 #5
Nu denne fejl :
User-defined type not defined
ilinjen
Dim db As database
Avatar billede lkp Nybegynder
18. september 2000 - 22:39 #6
Hej Perry

Er du sikker på, at du har sat referencen til DAO??

Med venlig hilsen

LKP
Avatar billede hellstern Nybegynder
18. september 2000 - 22:41 #7
Hej
Er du sikker på at du har sat en reference til DAO som lkp forslår.

Referencen skal være til;
Microsoft DAO 3.6 Object Libray

Dette sættes under Tools - References

Hilsen
Tue
Avatar billede lkp Nybegynder
18. september 2000 - 22:51 #8
Lige en kommentar til Tue

I dit første løsningsforslag, skriver du, at man kan prøve at deklarere en ekstra variabel???

Ovenikøbet af typen variant, da den ikke erklæres med AS (type).

Hvorfor???

Det er ikke for at være spydig, jeg forstår simpelthen bare ikke hvad det skulle hjælpe

Med venlig hilsen

LKP
Avatar billede perry Nybegynder
18. september 2000 - 22:53 #9
Referencen var ikke sat til nu kommer der fejl i linjen
Set Rst = db.openrecordset(\"eksport\")

type mismatch
Avatar billede hellstern Nybegynder
18. september 2000 - 22:59 #10
Hej LKP
Jeg har et par gange haft en fejl som er forsvundet når jeg har erklæret en ekstra variabel. Jeg ved ikke hvorfor fejlen forsvinder med den ekstra variabel, men hvis jeg fjerne denne kommer fejlen igen, mystisk men sandt.
Derfor ! ;-)

Tue
Avatar billede lkp Nybegynder
18. september 2000 - 23:00 #11
Hej Perry

Er du sikker på, at alt er stavet korrekt?

Er \"eksport\" navnet på en tabel?

Nedenstående kode burde virke, hvis du ikke har stavefejl i din kode, kan du så ikke prøve at oprette et test modul, udelukkende med nedenstående kode og prøve at køre det?

Med venlig hilsen

LKP

--- Kode start ---

Dim db As Database
Dim rst As Recordset

Set db = CurrentDb
Set rst = db.OpenRecordset(\"eksport\")

rst.MoveFirst

--- Kode slut ---
Avatar billede hellstern Nybegynder
18. september 2000 - 23:01 #12
Hej
Prøv lige igen at skrive følgende, selvom LKP vil grine af mig igen ;-)

dim rst, rst2 as recordset

Hilsen
Tue


Avatar billede lkp Nybegynder
18. september 2000 - 23:01 #13
Hej Tue

Jaa... Det er jo Microsoft vi har med at gøre, så hvorfor ikke ;-)

Med venlig hilsen

LKP
Avatar billede perry Nybegynder
18. september 2000 - 23:27 #14
Til grin kan man altid blive.
Det virker nu, hvor jeg har fået rette diverse stavefejl.
Mange tak for hjælpen.
Der bliver sikkert flere point at hent, da jeg også har problemer med et andet modul i databasen.
Måske hjælper det efter, at referencen er sat til DAO. :-)
lkp
Giv et svar på en \"god VB-bog\" og jeg vil give dig point. Jeg har jo afvist dit svar, som egentlig var rigtigt.
Avatar billede lkp Nybegynder
18. september 2000 - 23:31 #15
Hej Perry

Bogen/Bøgerne du må eje er:

Access 2000 Developers Handbook Desktop Edition og Access 2000 Developers Handbook Enterprise Edition, begge kan købes hos www.bookworld.dk.

Specielt Desktop Edition er guld værd.

Glad for at jeg kunne hjælpe :-)

Med venlig hilsen

LKP

PS. Hvis du med VB mener Visual Basic generelt, og ikke specifikt Visual Basic for Applications, kan jeg anbefale Mastering Visual Basic fra Sybex (kan også fås hos Bookworld)
Avatar billede perry Nybegynder
18. september 2000 - 23:36 #16
Tak for henvisningen.
Avatar billede Ny bruger Nybegynder

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.

Loading billede Opret Preview
Kategori
Dyk ned i databasernes verden på et af vores praksisnære Access-kurser

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester