Fejlmed. i vba

<ole>

Jamen, så findes filen 'ukendt' vel ikke  =)

/mvh
</bole>

Jo den ligger der!

Så er der nok en anden fejl, men ingen har kinamands chance for at vide, hvor den i så fald skulle ligge. Vi aner jo ikke, hvad der står i koden  =)

et uddrag af koden

Sub Kunde()

kundenr = InputBox("indtast kundenr")


If kundenr = "" Or Not IsNumeric(kundenr) Then
ActiveDocument.Unprotect
Application.ScreenUpdating = False
Selection.GoTo What:=wdGoToBookmark, Name:="kr"
ActiveWindow.ActivePane.VerticalPercentScrolled = 0
    ActiveDocument.Protect Password:="", NoReset:=False, Type:= _
        wdAllowOnlyFormFields
   
       
   
Else

Application.ScreenUpdating = False
    Dim objConn As ADODB.Connection
    Dim objRs As ADODB.Recordset
    Dim strConnString As String
    Dim strSQL As String
   
    Set objConn = New ADODB.Connection
    Set objRs = New ADODB.Recordset
   
    strConnString = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=C:\kartotek\Kartoteker.MDb"
    objConn.Open strConnString
   
    strSQL = "SELECT Kundenr,Navn1,navn2, Adresse, postnr,by FROM kundekartotek WHERE kundenr = " & kundenr
    objRs.Open strSQL, objConn

Det skyldes vel, at Microsoft Access Driver ikke er installeret. Mon ikke fejlen udtrykkeligt siger, at det er driveren, som ikke findes?

Ja er nok det......sender du et svar

Ellers tak, jeg samler ikke point. Du lægger bare selv et svar og accepterer det, så tråden lukkes  =)

Hvis driveren ikke er installeret, kan du finde den hos MS' download center og hente den der

ok