Programación General > Visual Basic 6.0 e inferiores

 Como Ordenar Alfabeticamente Una Msflexgrid?

(1/2) > >>

cufarinis:
Saludos

Estoy haciendo una aplicacion con: data, MSFlexgrid, acces 97 y tengo dos pequeñitos problamitas que me tienen loko. Necesito que "Ordene alfabeticamente" los datos que ingreso a la MSFlexgrid automáticamente despues de haberlos ingresados y tambien necesito un motor de busqueda que muestre los resultados en otra MSflexgrid, tengo un motor de busqueda, pero solo busca hasta encontrar 1 registro  solamente pero yo necesito un motor que busque todos los registros exitentes y que se detenga cuando ya no queden registros

ej:    Tengo varios libros  de un mismo autor (Larson), pero de diferentes títulos    ( Claculo diferencial, Calculo Comun etc..). cuando quiero buscar a un autor que tenga varios libros, me busca hasta encontrar el primero que tenga como autor "Larson", y yo necesito que aparezcan todos los libros con autor "Larson"


Si alguien tiene algun link donde pueda investigar o si alguien tiene el codigo, por favor ayudeme

saludos ; aqui les dejo el motor de busqueda que tengo:



       
Private Sub Command1_Click()

        Data1.Recordset.Index = "Autor"
        Data1.Recordset.Seek "=", Text1
          If Data1.Recordset.NoMatch Then
            MsgBox "El Autor ingresado no existe", , "Intentelo Nuevamente"
            Text1.Text = ""
            Text1.Setfocus
          Else
            Data1.Recordset.Index = "Autor"
            Data1.Recordset.Seek "=", Text1.Text
            Grilla.Col = 0
            Grilla.Text = Data1.Recordset.Fields("Numero de Registro")
            Grilla.Col = 1
            Grilla.Text = Data1.Recordset.Fields("Titulo")
            Grilla.Col = 2
            Grilla.Text = Data1.Recordset.Fields("Autor")
            Grilla.Col = 3
            Grilla.Text = Data1.Recordset.Fields("Nº de Copias")
            Text1.Text = ""
          End If

End Sub

cufarinis:
un detalle para no confundirse

Grilla es el nombre que le puse a MSFlexgrid

Sagutxo:
Salu2. Utiliza su propiedad Sort

MsFlexGrid.Sort

Lo segundo podrias lanzar "Select" concretas en la apertura de la tabla para mostrar solamente lo que tu deseas.

 :comp:  :smartass:  :comp:

mamex:
Que tal, para eso se inventaron las consultas SQL, al recordset le asignas una consulta. Ejemplo:


--- Código: Text --- Data1.RecordSource="Select * from Libros where autor = 'Larson' "  
Te recomiendo que leas acerca de consultas SQL

cufarinis:
Hola:

Realmente no se como utilizar el codigo que me entregaste mamex, ya que nunca he utilizado sql. me podrias dar un link donde pueda descargar un tutorial sobre SQL?



Sagutxo, cuando utiligo la funcion Sort crea un error ¿Donde coloco el codigo?¿dentro de un Commandbutton, en el load?
disculpen las molestias

Navegación

[0] Índice de Mensajes

[#] Página Siguiente