SoloCodigo

Programación General => Visual Basic 6.0 e inferiores => Visual Basic para principiantes => Mensaje iniciado por: Dragos en Lunes 12 de Octubre de 2009, 18:37

Título: Error en codido para cargar Imagen
Publicado por: Dragos en Lunes 12 de Octubre de 2009, 18:37

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

Código: Visual Basic

1. Private Sub Form_Load()
2. Dim basedatos As String
3.    
4. basedatos = App.Path
5. 'si no tiene la bara final la añade
6. If Right$(basedatos, 1) <> "" Then basedatos = basedatos & ""
7.  
8. basedatos = basedatos & "registros.mdb"
9.    
10. ' Le indica al Data la base de datos
11. Data1.DatabaseName = basedatos
12.  
13. 'Fuente de los registros para el control data
14. Data1.RecordSource = "Select Imagenes FROM Registros"
15.  
16. 'Refresca el control
17. Data1.Refresh
18. End Sub
19.  

El Error que me arroja en esta parte es:

ERROR 3061en tiempo de ejecucion

Pocos parametros Se esperaba 1

y el error me lo señala en esta linea

Código: Visual Basic

1. Data1.Refresh
2.  

Espero me puedan ayudar! Saludos