bonsoir
j'ai une application concernanat la gestion des permanants au sein d'une entreprise
j'ai un blm lors je vx appeler les dates de la BD et les afficher sur une colonne d'un MSFlexGrid mais ca marche pas, j'ai essayé de remplir la colonne avec des nombres ca marche, mais pour les dates je sais pas pourquoi???
voila le code
With MSFlexGrid1
.Row = 0
.Col = 0
.Text = "Jour"
.Col = 1
.Text = "Séance1"
.Col = 2
.Text = "Séance2"
.Col = 3
.Text = "Scéance3"
End With
For x = 1 To n
With MSFlexGrid1
Set ADOConnection = New ADODB.Connection
Set adorecordset = New ADODB.Recordset
connectstring = "Provider=Microsoft.Jet.OLEDB.4.0;" & " Data Source=D:\Doc MIAGE Stage\Permanances.mdb"
ADOConnection.Open connectstring
adorecordset.Open "select Date as mont1 from Perm , ADOConnection"
Do Until adorecordset.EOF
MSFlexGrid1.AddItem adorecordset!mont1
adorecordset.MoveNext
Loop
adorecordset.Close
ADOConnection.Close
Set adorecordset = Nothing
Set ADOConnection = Nothing
.Col = 0
.Row = mont1
'.RowHeight(x) = 260
.Text = mont1
End With
Next x
Merci d'vance