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 for alle niveauer og behov – find det kursus, der passer til dig

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