Problema "la conversion 'bdnull' en el tipo 'string' no es valida"

[jhonwilliams]

Iniciado por io_web

ACA INICIA EL TRY

Do While lee_BD.Read()
If Not (IsDBNull(lee_BD(0))) Then
Me.TextBox_nombre.Text = lee_BD("nombre")
Me.TextBox_sede.Text = lee_BD("sede")
Me.TextBox_cargo.Text = lee_BD("cargo")
Me.TextBox_dpto.Text = lee_BD("departamento")
Me.TextBox_extension.Text = lee_BD("extension")
Me.TextBox_inalambrico.Text = lee_BD("inalambrico")
Me.TextBox_celular.Text = lee_BD("celular")
End If
Loop

ACA LO TERMINAS

lee_BD.Close()
myConnection.Close()
lee_BD = Nothing

End Sub

Has usado el try .... catch.....

http://msdn.microsoft.com/es-es/libr...=vs.80%29.aspx

Usalo para controlar los posibles errores no controlados, esto siempre ocurre por mas que uno lo valide. XD

Lo otro es que tengo unas observaciones.

1. Estas haciendo la consulta con un LIKE y esto da varias alternativas.

1. No mostrar ningun resultado
2. Mostar un resultado
3. Mostar varios resultados

Pero estas mostrando los datos contra cajas de texto, si traes varios datos solo vas a ver en los textos el ultimo de la lista.

Recomendacion mostrar los resultados en una grid o cambiar la consulta por un =

Código SQL:

SELECT * FROM directorio WHERE nombre = '" & Me.TextBox_buscar.Text & "' AND cargo ='" & Me.TextBox_buscar_cargo.Text & "
 

Y si vas a mostrar datos en una grid no usaria un ExecuteReader(), lo hacia cargando una tabla con un DataAdapter

Saludos