Pableras
11 de Junio del 2004

como puedo hacer un busqueda por nombre, metiendo el mismo en un cajetin de texto y dandole a un boton busqueda me muestre en un grid los datos de ese nombre
gracias

sdemingo
11 de Junio del 2004

Hola,

esa pregunta es muy genérica......

Utiliza un datagrid enlazado a un data y en su propiedad del data recordsource le dices "select * from tabla where nombre = '" & text1.text & "'"
data1.refresh

salu2
sdemingo

Pableras
11 de Junio del 2004

a ver te esplico mejor, tengo unos cuantos cajetines de texo en uno de ellos quiero meter el codigo y que me salga el nombre y la direccion del mismo y en el grid quiero que me salgan los pedidos que ha hecho ese cliente

shiquilla
11 de Junio del 2004

Suponiendo que tendrás dos tablas, una para clientes y otra con los pedidos cn la referencia del cliente, me crearia dos recordset, uno para la tabla del cliente y otro para los pedidos.

Dim rs as New Adodb.Recordset
Dim rs_Pedidos as New Adodb.Connetion
Dim sql as String
Dim cn as New Adodb.Connection
Set cn.ConnectionString = "el string de conexion a la base de datos"
cn.open
sql = "SELECT Nombre, Direccion FROM Tabla WHERE Campo = " & Text1.Text
rs.open sql, cn
IF NOT rs.EOF THEN
TextNombre.Text = rs![CampoNombre]
TextDireccion.Text = rs![CampoDireccion]
sql = "SELECT * FROM Pedidos WHERE Campo = " & Text1.Text
Set rs_Pedidos.CursorLocation = adUseClient
rs_Pedidos.open sql, cn
Set DataGrid.DataSource = rs_Pedidos
DataGrid.Refresh
END IF
SET rs_Pedidos = Nothing
SET rs = Nothing
SET cn = Nothing

Bueno, es eso básicamente.. no sé, yo sólo te he dao una idea.
(Si alguna propiedad la he escrito mal perdonad, pero es que no tengo el Visual a mano)

Saludos.

Pableras
11 de Junio del 2004

tengo tres data porque uno de los datos que tengo que tener es de una data diferente

sdemingo
11 de Junio del 2004

Pues a base de sentencias sql....

Pableras
11 de Junio del 2004

ya pero que sentencias y en donde las meto?
es que ando muy perdido