francisco
06 de Febrero del 2003

MSFlexGrid como le asigno los datos de un Recordset

ccortes
06 de Febrero del 2003

PRUEBA ESTO:

If Not moRecordset.EOF And Not moRecordset.BOF Then
Do While Not moRecordset.EOF
MSFlexGrid.AddItem moRecordset.Fields(0).Value + Chr$(9) + moRecordset.Fields(1).Value + Chr$(9) + moRecordset.Fields(2).Value + Chr$(9) + moRecordset.Fields(3).Value + Chr$(9) + moRecordset.Fields(4).Value + Chr$(9) + moRecordset.Fields(5).Value + Chr$(9) + moRecordset.Fields(6).Value
moRecordset.MoveNext

Loop

moRecordset.Close
Else
MsgBox "MENSAJE SI NO HAY NADA !!!", vbCritical, "Atención"

End If

RECUERDA QUE ANTES DEBES DE CONFIGURAR EL NUMERO DE COLUMNAS DEL FLEX