"Could not find Installable ISAM"

[udit99]

Im trying to import Data from an Access DB to an Excel Spreadsheet, the Code gives me the error

Run-time error '-2147467259(80004005)'
Could not find Installable ISAM

on the line cn.Open...

Dim cn As ADODB.Connection, rs As ADODB.Recordset, intColIndex As Integer
    ' open the database
    Set cn = New ADODB.Connection
    cn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & _
        tstDBFullName & ";" & "UID=myuname ;PWD=xyzu "
    Set rs = New ADODB.Recordset