rescatar datos desde bd a textbox

11/12/2006 - 20:31 por Cristian Muñoz | Informe spam
Estimados, tengo el siguiente problema. He buscado informacion por todo
lados pero no he podido solucionarlo.
Quiero mostar informacion en 3 textbox. Esto lo hago realizando una consulta
en sql. El codigo es el siguiente.

Dim enlaza_textbox As New SqlDataAdapter("select nombre, apellido, telefono
from alumnos where nombre like '%" & lstAlumnos.Text & "'", conexion)
Dim dsenlaza_textbox As New DataSet
enlaza_textbox.Fill(dsenlaza_textbox, "alumnos")
txtNombre.Text = dsenlaza_textbox.Tables("alumnos").Rows(0).Item(0).ToString
txtApellido.Text =
dsenlaza_textbox.Tables("alumnos").Rows(0).Item(1).ToString
txtTelefono.Text =
dsenlaza_textbox.Tables("alumnos").Rows(0).Item(2).ToString

Me lanza el siguiente error

No hay ninguna fila en la posición 0.

esto lo muestra en relacion a la linea

txtNombre.Text = dsenlaza_textbox.Tables("alumnos").Rows(0).Item(0).ToString

Espero me puedan ayudar.

Saludos,

Preguntas similare

Leer las respuestas

#1 Carlos Gómez
12/12/2006 - 17:12 | Informe spam
Lo primero que puedes hacer es quitar todo tipo de condiciones de la
consulta sql y dejarla asi

select * from alumnos

o (si tienes muuuuchas filas):

select Top 1 (*) from alumnos

si sigue sin devolver nada entonces comprueba la conexion. Puede ser
que apunte a otra base de datos y por tanto no existe la tabla alumnos
o vete a saber. Pero siempre quita condiciones superfluas.
Respuesta Responder a este mensaje
#2 SoftJaén
12/12/2006 - 18:41 | Informe spam
"Cristian Muñoz" escribió:

Estimados, tengo el siguiente problema. Quiero mostar informacion en 3
textbox. Esto lo hago realizando una consulta en sql. El codigo es el
siguiente.

Dim enlaza_textbox As New SqlDataAdapter("select nombre, apellido,
telefono from alumnos where nombre like '%" & lstAlumnos.Text & "'",
conexion)

Me lanza el siguiente error

No hay ninguna fila en la posición 0.



Hola, Cristian:

Si obtienes la excepción comentada, es porque en la tabla «Alumnos» del
objeto DataSet no existe ninguna fila que cumpla con el criterio
especificado en la consulta SQL de selección. El código fuente que estás
ejecutando es correcto, y si existiera alguna fila, verías los datos en los
correspondientes controles de texto.

El problema que yo veo en la consulta SQL, es que estás utilizando el
comodín ANTES del contenido del control ListBox ('%" & lstAlumnos.Text &
"'"), por lo que puede darse el caso que la consulta SQL no devuelva ningún
registro, dependiendo de cómo hayas especificado el criterio de búsqueda.

Por último, si no deseas obtener la excepción, rellena los controles de
texto siempre y cuando sepas que hay alguna fila:

If dsenlaza_textbox.Tables("alumnos").Rows.Count > 0 Then
txtNombre.Text = ...
txtApellido.Text = ...
txtTelefono.Text = ...
Else
MessageBox.Show("No existe ninguna fila.")
End If

Un saludo

Enrique Martínez
[MS MVP - VB]

Nota informativa: La información contenida en este mensaje, así como el
código fuente incluido en el mismo, se proporciona «COMO ESTÁ», sin
garantías de ninguna clase, y no otorga derecho alguno. Usted asume
cualquier riesgo al poner en práctica, utilizar o ejecutar lo recomendado o
sugerido en el presente mensaje.
email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida