Avatar billede -l_jogge_l- Nybegynder
02. oktober 2003 - 12:03 Der er 1 kommentar og
1 løsning

Microsoft.Jet VB fra Exel!

Jeg har lige fået at vide at Microsoft.Jet skulle være noget hurtigere end Mine gamle SQL sætninger, når man arbejder med Access og Excel... altså hente og skrive data fra filerne..

MEN...

Jeg forstår ikke helt hvordan det erMicrosoft.Jet virker... nogen der vil hjælpe lidt?

Jeg har denne sætning:
Sub ADOFromExcelToAccess()
Dim cn As ADODB.Connection, rs As ADODB.Recordset, r As Long

Set cn = New ADODB.Connection
cn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=C:\FolderName\DataBaseName.mdb;"

Set rs = New ADODB.Recordset
rs.Open "TableName", cn, adOpenKeyset, adLockOptimistic, adCmdTable 

r = 3 ' startraden i regnearket
Do While Len(Range("A" & r).Formula) > 0

With rs
    .AddNew
    .Fields("FieldName1") = Range("A" & r).Value
    .Fields("FieldName2") = Range("B" & r).Value
    .Fields("FieldNameN") = Range("C" & r).Value
    .Update
End With

r = r + 1 ' neste rad i regnearket
Loop
rs.Close
Set rs = Nothing
cn.Close
Set cn = Nothing
End Sub
-------------------------
Det er osse meget fint, men hvor står der hvilken TABEL der skriver til og hvor står der hvilken Excel fil den henter fra???

Det er det jeg ikke lige kan gennemskue...
Avatar billede mikker Nybegynder
02. oktober 2003 - 16:24 #1
Ovenstående ligner VBA kørt fra Excel og der kræves derfor ikke Excel filnavn.
Hvis du med TABEL mener table er det jo noget du selv skal definere, ligesom databasenavnet, stien og dine fields...

- Mikker
Avatar billede -l_jogge_l- Nybegynder
27. oktober 2003 - 15:45 #2
Jeg lukker
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
Kurser inden for grundlæggende programmering

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