error que no se como solucionar
Publicado por Isa (45 intervenciones) el 04/07/2007 11:59:48
Hola !
Resulta que en la aplicacion que estoy realizando en el siguiente codigo me aparece el siguiente error: Runtime error -2147217904(80040e10): No se han especificado valores para algunos de los parametros requeridos
'Abre la conexión asignando el tipo de modelo de datos.
WDB.Open ("Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Persist Security Info=False;Data Source=" & App.Path & "\BD\Ejemplo.mdb")
buscar = "SELECT Nombre, descripcion FROM Dolencias WHERE Nombre LIKE '" & ident & "'"
Set User = WDB.Execute(buscar)
lblNombre.Caption = CStr(User.Fields(0))(AQUI ES DONDE ME APARECE EL ERROR Y ME DICE QUE NO SE ENCONTRO EL ELEMENTO DE LA COLECCION QUE CORRESPONDE...)
If Not IsNull(User.Fields(1)) Then
txtDescripcion.Text = CStr(User.Fields(1))
End If
Gracias de antemano!!!
Espero me entiendan mi duda
Resulta que en la aplicacion que estoy realizando en el siguiente codigo me aparece el siguiente error: Runtime error -2147217904(80040e10): No se han especificado valores para algunos de los parametros requeridos
'Abre la conexión asignando el tipo de modelo de datos.
WDB.Open ("Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Persist Security Info=False;Data Source=" & App.Path & "\BD\Ejemplo.mdb")
buscar = "SELECT Nombre, descripcion FROM Dolencias WHERE Nombre LIKE '" & ident & "'"
Set User = WDB.Execute(buscar)
lblNombre.Caption = CStr(User.Fields(0))(AQUI ES DONDE ME APARECE EL ERROR Y ME DICE QUE NO SE ENCONTRO EL ELEMENTO DE LA COLECCION QUE CORRESPONDE...)
If Not IsNull(User.Fields(1)) Then
txtDescripcion.Text = CStr(User.Fields(1))
End If
Gracias de antemano!!!
Espero me entiendan mi duda
Valora esta pregunta


0