Ver Mensaje Individual
  #6 (permalink)  
Antiguo 14/11/2005, 20:20
Avatar de jc_moty
jc_moty
 
Fecha de Ingreso: septiembre-2005
Ubicación: Usulután, El Salvador
Mensajes: 477
Antigüedad: 18 años, 6 meses
Puntos: 1
Bueno, a decir verdad no utilizo mucho la FlexGrid, pero la he estado travesiando un poco y aqui esta la solucion de tu poblema:
Código:
' En la Parte General - Declaraciones; o sea por encima de todos los eventos pone esto
Dim db As Database

' En el Load del Form
Private Sub Form_Load()
Set db = OpenDatabase(App.Path & "\nombre de la base de datos.mdb")
End Sub

' Y finalmente en el evento Click del Combo
Private Sub Combo1_Click()
Set Data2.Recordset = db.OpenRecordset("SELECT * FROM Pedidos WHERE campo LIKE '" & Combo1 & "'")
End Sub
Ojo: la propiedad DataSource del FlexGrid debe ser igual al nombre del Data que hace referencia a la tabla Pedidos.
Que en mi caso es Data2

Cita:
controlar los anchos de columna.
Para hacer esto la Propiedad AllowUserResizing debe ser igual a 1 - flexResizeColumns

Espero te sirva

Última edición por jc_moty; 14/11/2005 a las 20:28