Ayuda!!, select no se cumple
Publicado por Paola Galvis (1 intervención) el 06/06/2008 22:46:21
Buenas tardes
Tengo un select no se cumple, como hago para decirle que el registro no existen?, envio la forma como lo estoy haciendo para ver si alguien me ayuda a encontrar el error.
Gracias
Case 2
If (comopcbusq.Text = "SEG APELLIDO") Then
conexionbd("select * from clientes where segapell
like '%" & txsegapell.Text & "%'", "clientes")
gridclienbusq.DataSource = ds
gridclienbusq.DataMember = "clientes"
gridclienbusq.Refresh()
MostrarPosicion()
Else
If (comopcbusq.Text = "NRO IDENTIDAD") Then
conexionbd("select * from clientes where
idclien = '" & txidclien.Text & "'", "clientes")
gridclienbusq.DataSource = ds
gridclienbusq.DataMember = "clientes"
gridclienbusq.Refresh()
MostrarPosicion()
Else
If (comopcbusq.Text = "PRIM APELLIDO") Then
conexionbd("select * from clientes where
primapell like '%" & txprimapell.Text & "%'", "clientes")
gridclienbusq.DataSource = ds
gridclienbusq.DataMember = "clientes"
gridclienbusq.Refresh()
MostrarPosicion()
Else
conexionbd("select * from clientes where
nomclien like '%" & txnomclien.Text & "%'", "clientes")
gridclienbusq.DataSource = ds
gridclienbusq.DataMember = "clientes"
gridclienbusq.Refresh()
MostrarPosicion()
End If
End If
End If
End Select
Tengo un select no se cumple, como hago para decirle que el registro no existen?, envio la forma como lo estoy haciendo para ver si alguien me ayuda a encontrar el error.
Gracias
Case 2
If (comopcbusq.Text = "SEG APELLIDO") Then
conexionbd("select * from clientes where segapell
like '%" & txsegapell.Text & "%'", "clientes")
gridclienbusq.DataSource = ds
gridclienbusq.DataMember = "clientes"
gridclienbusq.Refresh()
MostrarPosicion()
Else
If (comopcbusq.Text = "NRO IDENTIDAD") Then
conexionbd("select * from clientes where
idclien = '" & txidclien.Text & "'", "clientes")
gridclienbusq.DataSource = ds
gridclienbusq.DataMember = "clientes"
gridclienbusq.Refresh()
MostrarPosicion()
Else
If (comopcbusq.Text = "PRIM APELLIDO") Then
conexionbd("select * from clientes where
primapell like '%" & txprimapell.Text & "%'", "clientes")
gridclienbusq.DataSource = ds
gridclienbusq.DataMember = "clientes"
gridclienbusq.Refresh()
MostrarPosicion()
Else
conexionbd("select * from clientes where
nomclien like '%" & txnomclien.Text & "%'", "clientes")
gridclienbusq.DataSource = ds
gridclienbusq.DataMember = "clientes"
gridclienbusq.Refresh()
MostrarPosicion()
End If
End If
End If
End Select
Valora esta pregunta


0