Amigos, buenos dias o tardes o noches...
Tengo un problema con una linea de Codigo que estoy utilizando para cargar una imagen (foto)
este es mi codigo
Private Sub Form_Load()
Dim basedatos As String
basedatos = App.Path
'si no tiene la bara final la añade
If Right$(basedatos, 1) <> "" Then basedatos = basedatos & ""
basedatos = basedatos & "registros.mdb"
' Le indica al Data la base de datos
Data1.DatabaseName = basedatos
'Fuente de los registros para el control data
Data1.RecordSource = "Select Imagenes FROM Registros"
'Refresca el control
Data1.Refresh
End Sub
El Error que me arroja en esta parte es:
ERROR 3061en tiempo de ejecucion
Pocos parametros Se esperaba 1y el error me lo señala en esta linea
Espero me puedan ayudar! Saludos
