Ayuda en una Busqueda
Hola amigos de la Programacion, solamente quiero ver si alguien me ayuda a crear una busqueda en un datagrd, o sea tengo un text1.text un boton de comando que dice buscar y por ultimo un data grid,,,, y bien quiero que cuando yo introduzca el numero de registro o nombre de una persona, me lo encuentre,,,,, alguien puede ayudarme?????????????????? pleaseeeeeeeeeeeeeeeeeeeeeeeeeeeee heeeeeeeeeeeelpmeeeeeeeeeeeeeeeeeeeeee, a si desean pueden visitar mi Pagina personal es: www.usuarios.lycos.es/riv24 espero una respuesta de ustedes, muchas gracias y que Dios les Bendiga, bye
yo uso un datagris enlazado a un adodc la busqueda la hago por medio de sql
esto es para que busque los registros que empieze con lo que tenga el text1.text y los resultados que concuerden los muestre en el datagrid
Dim strsql As String, buscar As String
buscar = Text1.Text
strsql = "SELECT * FROM [tu tabla]"
strsql = strsql & " WHERE [tu registro] LIKE '" & buscar & "%'"
Adodc1.RecordSource = strsql
Adodc1.Refresh
DataGrid1.Refresh
esto para que terminen
strsql = strsql & " WHERE [tu registro] LIKE '%" & buscar & "'"
esto que contenga
strsql = strsql & " WHERE [tu registro] LIKE '%" & buscar & "%'"
esto la palabra completa
strsql = strsql & " WHERE [tu registro] LIKE '" & buscar & "'"
espero te de una idea
esto es para que busque los registros que empieze con lo que tenga el text1.text y los resultados que concuerden los muestre en el datagrid
Dim strsql As String, buscar As String
buscar = Text1.Text
strsql = "SELECT * FROM [tu tabla]"
strsql = strsql & " WHERE [tu registro] LIKE '" & buscar & "%'"
Adodc1.RecordSource = strsql
Adodc1.Refresh
DataGrid1.Refresh
esto para que terminen
strsql = strsql & " WHERE [tu registro] LIKE '%" & buscar & "'"
esto que contenga
strsql = strsql & " WHERE [tu registro] LIKE '%" & buscar & "%'"
esto la palabra completa
strsql = strsql & " WHERE [tu registro] LIKE '" & buscar & "'"
espero te de una idea