13. november 2002 - 10:06Der er
12 kommentarer og 1 løsning
Forespørge i sammenkædede tabel via ADO
Jeg har tre sammenkædede tabeller (tblInvoice, tblCustomers, tblProjects).
Fra et Excel-ark skal jeg forespørge i data vha. ADO.
Men når jeg kører nedenstående kode kommer fejlen: "Tekstfilspecifikationen "something Sammenkædningsspec." findes ikke. Du kan ikke importere, ekspotere eller sammenkæde denne specifikation".
Hvad gør jeg forkert ?
Dim rs As New ADODB.Recordset Dim conn As New ADODB.Connection Dim i As Integer
With conn .ConnectionString = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=Q:\PPRapport.mdb" .Open End With
Set rs = conn.Execute("SELECT * FROM tblInvoice;")
Do Until rs.EOF i = i + 1 Ark1.Range("A" & i) = rs.Fields(1) rs.MoveNext Loop conn.Close set rs = Nothing
I dette særtema ser vi på, hvordan cloud og AI bliver fundamentet for virksomhedernes digitale forretning, og hvordan de nye muligheder for automatisering og forretningsværdi kan udnyttes uden at miste overblik, sikkerhed og menneskelig kontrol.
Well, your mixing your statements "Set rs" is a DAO type statement not ADO (who the hell thinks up these names?) use an open command
rs.Open "SELECT * FROM tblInvoice", conn, adOpenDynamic
From Object browser: Sub Open([Source], [ActiveConnection], [CursorType As CursorTypeEnum = adOpenUnspecified], [LockType As LockTypeEnum = adLockUnspecified], [Options As Long = -1])
P.S. if you go with Set rs you should also go with Set conn = Server.CreateObject("ADODB.Connection") ConnectionString = "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("Q:\PPRapport.mdb") Con.Open ConnectionString
And, because I have used the declaration: dim conn as NEW adodb.connection , I have already declared it as a new instance of the object Adodb.conn...
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.