Søg
Avatar billede Simon Praktikant
17. februar 2004 - 09:18 Der er 5 kommentarer og
1 løsning

vba connect mdb mdf

Jeg ønsker at connecte til en database fra vba(og lægger data ind i excel):
---------------------------------
Dim db As Database
Dim RecSet As Recordset
Set db = OpenDatabase("c:\drawinglayers.mdb")
Set RecSet = db.OpenRecordSet("Layer", dbOpenDynaset)
Sheets("Sheet1").Range([rs]).CopyFromRecordset RecSet
---------------------------------
dette fungerer fint når jeg angiver en mdb- fil i OpenDatabase.
Men jeg har en mdf-fil som jeg vil bruge, hvordan gør jeg det?
Avatar billede hugopedersen Nybegynder
17. februar 2004 - 09:26 #1
MDF er en SQL Server datafil så du skal have fat på en connection string til din SQL Server

Set Connect = Server.CreateObject("ADODB.Connection")   
Connect.Open "Driver={SQL Server}; Server=name;Database=database; UID=user; PWD=pass"
Set objRs = Server.CreateObject("ADODB.Recordset")
Avatar billede Simon Praktikant
17. februar 2004 - 09:33 #2
er "Connect" så den "connection string" du taler om? skal den bare erklæres String?
-------------------------
Dim Connect As String
-------------------------
Avatar billede hugopedersen Nybegynder
17. februar 2004 - 09:37 #3
Se det er et godt spørgsmål.
Jeg plejer bare at erklære dem som
Dim Connect
Dim objRs

Da det som regel er i .ASP jeg bruger SQL serveren. I Access laver jeg det som .ADP så jeg har direkte adgang.
Avatar billede Simon Praktikant
17. februar 2004 - 09:44 #4
Det virker ikke :-(
jeg får en fejl: "run-time error '424' Object required"
Har du nogen anelse om hvad det kan være? Jeg arbejder som sagt i vba.
Avatar billede hugopedersen Nybegynder
17. februar 2004 - 09:56 #5
Dim cnn As ADODB.Connection
Dim rst As ADODB.Recordset
Dim strSQL As String

Set cnn = New ADODB.Connection
Set rst = New ADODB.Recordset

strSQL = "SELECT * FROM dtproperties"
cnn.Open "DRIVER=SQL Server;SERVER=name;UID=user;PWD=pass;DATABASE=database"
rst.Open strSQL ,cnn
Avatar billede Simon Praktikant
17. februar 2004 - 10:17 #6
Det virker heller ikke. Det er stadig de samme fejl.
Jeg prøvet at bruge .NET i steddet for, selv om det ikke er en løsning på det andet problem.
Ellers skal du have mange tak for hjælpen.
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
Excel kurser
Excel kurser for alle niveauer og behov – find det kursus, der passer til dig
Se alle Excel kurser

Flere spørgsmål fra Excel kategorien

Titel Indlæg Oprettet Seneste aktivitet
Flytte fra et projekt til andet Af hkprofil i Excel 1 11/11/202612:17 11/11/202613:08
Slet tal, bevar de underliggende formler Af bbkdk i Excel 5 11/11/202609:23 I dag 13:07
Måned og år på graf Af mort1 i Excel 4 31/10/202613:01 01/11/202614:13
VB, Lægge 2 celler sammen og skrive den i cellen ved side af Af MC3390 i Excel 9 23/09/202618:11 24/09/202611:16
Ændre tal i en celle Af xvid i Excel 1 04/09/202616:05 04/09/202616:54
Se alle spørgsmål i kategorien Opret spørgsmål

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.

Opret Log ind

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten
Seneste spørgsmål Seneste aktivitet
I dag 16:59 Bitlocker Af nico i Windows
I går 16:30 Wlan i windows 11 home Af dcedata1977 i Windows
11/1121:19 Irriterende ikon på proceslinjen Af ErikHg i Windows
11/1116:33 Kan man slippe af med "msn" ? Af Ikke-ekspert i Windows
11/1112:17 Flytte fra et projekt til andet Af hkprofil i Excel
White papers
Flere white papers »