El Guru Programador
Usuario DESCONOCIDO | Registrate Gratis | Usuarios Registrados
Foro de Visual Basic/VB.NET
Foros del Guru > Visual Basic/VB.NET
Usuario Microsoft Access
Desconocido
Enviado - 23/7/2004
 
Mi consulta es por un error que me aparece cuando quiero realizar una consulta. El error es el siguiente: Error 3061 en tiempo de ejecución. Pocos parámetros. Se esperaba 1.

El codigo es el siguiente:

Option Explicit ' declaro esta variables
Dim db As Database
Dim rs As Recordset
Dim Número As Integer

Private Sub Command1_Click()
Número = CInt(Text1.Text)
Set rs = db.OpenRecordset("Select * From prueba where documento = 2")
Label1.Caption = rs("nombre")
End Sub

Private Sub Form_Load()
Set db = OpenDatabase("C:\Mis documentos\prueba.mdb")
End Sub

 
Desconocido
Enviado - 25/7/2004
 
Si no me equivo al abrir el recorset a parte de indicarle la consulta, tb hay que decirle si la habre en modo lectura o lectura/escrituta, igual el problema viene de por ahí.

Set rs = db.OpenRecordset("Select * From prueba where documento = 2",dbopensnashop)

Un Saludo
 
Desconocido
Enviado - 25/7/2004
 
Sin saber mucho del tema creo que el problema es porque las sentencias SQL las tienes que hacer terminar con punto y coma(;).
Prueba a terminar tu apertura del fichero con dicho punto y coma dentro de las comillas:
Set rs = db.OpenRecordset("Select * From prueba where documento = 2;")
 
Paula
6 Mensaje(s)
Enviado - 25/7/2004
 
A mi me pasa eso cuando el parámetro que le paso, en tu caso el 2, no es del tipo correcto(entero o string o lo que sea)
 
fmarredo
486 Mensaje(s)
Enviado - 26/7/2004
 
El problema puede ser:
1. El nombre del campo no es "documento"
2. El campo es alfanumerico por lo que el 2 debe ir entre comillas.
 
Desconocido
Enviado - 2/11/2004
 
revisa que el nombre de los campos de la tabla sean los mismos que los que utilizas en la consulta
 
 

 

Contactos myStudio Network