Foros del Web » Programación para mayores de 30 ;) » Programación General »

poner resultado de una busqueda en una DATAGRID en vbasic

Estas en el tema de poner resultado de una busqueda en una DATAGRID en vbasic en el foro de Programación General en Foros del Web. hola maestros me estoy quebrando la cabeza con esto necesito poner el resultado de una busqueda en una DATAGRID usando el CONTROL ADO..intente algo asi ...
  #1 (permalink)  
Antiguo 24/07/2003, 00:10
Avatar de mveraa  
Fecha de Ingreso: diciembre-2002
Ubicación: santiago-chilito
Mensajes: 1.931
Antigüedad: 21 años, 4 meses
Puntos: 2
poner resultado de una busqueda en una DATAGRID en vbasic

hola maestros me estoy quebrando la cabeza con esto necesito poner el resultado de una busqueda en una DATAGRID usando el CONTROL ADO..intente algo asi pero nada

Private Sub Text15_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 And Text15.Text <> "" Then

Dim sqlgrilla As String
Dim paso1 As String
paso1 = Text15.Text
sqlgrilla = "SELECT * FROM AUTOS WHERE marca='" & paso1 & "'"

DataGrid1.RecordSelectors = sqlgrilla
DataGrid1.Refresh
End If

End Sub


bueno lo que trato de hacer es que cuando ponga un dato en el text15.text me muestre el resultado de la busqueda en la datagrid.

gracias de antemano
  #2 (permalink)  
Antiguo 24/07/2003, 10:41
Avatar de mveraa  
Fecha de Ingreso: diciembre-2002
Ubicación: santiago-chilito
Mensajes: 1.931
Antigüedad: 21 años, 4 meses
Puntos: 2
gracias de todas maneras ya encontre la solucion es asi:

Private Sub Text15_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 And Text15.Text <> "" Then

If Text15 <> "" Then
datos.Recordset.Filter = " marca like '*" + Text15 + "*'"
Text15.Text = ""
Else
Text15.Text = ""
datos.Recordset.Filter = ""
datos.Refresh

End If
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 08:00.