Visual Basic - Valores nulos

Life is soft - evento anual de software empresarial
 
Vista:

Valores nulos

Publicado por Mazen (1 intervención) el 18/04/2007 16:14:07
estoy haciendo una aplicacion de consulta apuntando a unabase de datos creada en access..... algunos de los campos de registros de la base de datos estann vacios.... al momento de correr la aplicacion y realizar una busqueda de algun registro q tiene uno de las campos vacios me arroja un error diciendome que el valor null no es valido... como hago para que me ignore esa sentencia y me plasme en el label correspondiente a ese campo el valor tal cual es en la base de dato, es decir, vacio, en blanco...... yo coloque una condicion de q si el field tiene como valor = null me coloque el label respectivo como "" pero nunk lo toma en cuenta

y otra duda es como filtrar las busquedas de manera que al yo realizar la busqueda colokndo la letra m me arroje todo nombre u apellido q empieze con m y no solo los q sean igual a "M". espero me ayuden gracias

CLAVE1 = txtNom.Text
Adodc1.CommandType = adCmdText
sql = "select * from CORO where NOMBRES = '" & Trim(CLAVE1) & "'"
Adodc1.RecordSource = sql
Adodc1.Refresh

If Not Adodc1.Recordset.EOF Then
MSFlexGrid1.Visible = True
If Adodc1.Recordset.Fields(1) = Null Then
lblNombre.Caption = "n/a"
Else
lblNombre.Caption = Adodc1.Recordset.Fields(1)
End If

lblCedula.Caption = Adodc1.Recordset.Fields(3)

If Adodc1.Recordset.Fields(2) = Null Then
lblApellido.Caption = "n/a"
Else
lblApellido.Caption = Adodc1.Recordset.Fields(2)
End If

If Adodc1.Recordset.Fields(5) = Null Then
lblDireccion.Caption = "n/a"
Else
lblDireccion.Caption = Adodc1.Recordset.Fields(5)
End If

lblLibreta.Caption = Adodc1.Recordset.Fields(0)

If Adodc1.Recordset.Fields(6) = Null Then
lblGrupo.Caption = "n/a"
Else
lblGrupo.Caption = Adodc1.Recordset.Fields(6)
End If
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Valores nulos

Publicado por ivan (1039 intervenciones) el 18/04/2007 17:20:51
Respecto a tu duda con los valores nulos puedes usar la función ISNULL

consulta la ayuda del MSDN para que veas su uso y ejemplos

saludos
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Valores nulos

Publicado por alejandro (60 intervenciones) el 18/04/2007 17:57:17
Para la busqueda tienes q sustituir el igual (=) por Like:
sql = "select * from CORO where NOMBRES = '" & Trim(CLAVE1) & "'"
por
sql = "select * from CORO where NOMBRES like '% " & Trim(CLAVE1) & "%'"
no te olvides de la comillas simples si buscas texto
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar