¡¡AYUDA!! Sql

Sergi
28 de Julio del 2004
Tengo un problema con el siguiente codigo. intento ejecutar una consulta Sql a traves de visual. Me gustaria que me dijerais si veis algun error

Me sale un error "No Coinciden Los Tipos"

Option Explicit
Dim BaseDatos As Database
Dim Rs As Recordset
Dim Ruta, SQL As String

Private Sub Form_Load()
Ruta = "S:Facturacionvb_ConsultaPorLetrasbd1.mdb"
Set BaseDatos = OpenDatabase(Ruta)

SQL = "SELECT * FROM tabla1"
'SEGUN VISUAL ERROR AQUI ->
Set Rs = BaseDatos.OpenRecordset(SQL, dbOpenDynaset)
End Sub

SemperFiMXL
28 de Julio del 2004
Cambia el dbOpenDynaset por DbOpenTable o simplemente no lo pongas y se asume por default para el tipo de objeto que estas utilizando (DAO) ...