Ver Mensaje Individual
  #1 (permalink)  
Antiguo 21/05/2004, 16:15
sakateuna
 
Fecha de Ingreso: marzo-2004
Mensajes: 34
Antigüedad: 21 años, 1 mes
Puntos: 0
Busqueda ADODB

Resulta que en un modulo tengo declarado un recordset:

Public NombreCliente As New ADODB.Recordset

With NombreCliente
.ActiveConnection = Cnn
.LockType = adLockReadOnly
.CursorType = adOpenStatic
.Open "Select Nombre_Cliente,rut_cliente from Clientes"
End With

*********************

en mi form principal conecto un datagrid al recorset..pero ke me muestre solo en nombre en este asi:

If NombreCliente.State = 1 Then NombreCliente.Close
NombreCliente.Open "select nombre_cliente from clientes"
Set dgClientes.DataSource = NombreCliente

****************TODO OKEY hasta el momento

luego kiero hacer una busqueda en el datagrid por nombre_cliente y rut_cliente, para el cliente lo hago asi:

Private Sub cmdBuscar_Click()

NombreCliente.Find "nombre_pedido like '" + txtBuscar.Text + "'"
With NombreCliente
End With

End Sub

PROBLEMAS:

1-Como lo hago para buscar por el rut , ya que si abro denuevo el recorset seleccionando nombre_cliente y rut_cliente, el datagrid meto toma estos dos campos y yo solo kiero ke tenga nombre_cliente

2-Sino encuentra datos...como hago ke el programa me lo diga?

Gracias