Vb6 : datagrid

vitri_truong_bouleau Messages postés 1 Date d'inscription mardi 21 mars 2006 Statut Membre Dernière intervention 21 mars 2006 - 21 mars 2006 à 18:09
ta4444 Messages postés 36 Date d'inscription vendredi 17 mars 2006 Statut Membre Dernière intervention 6 novembre 2006 - 21 mars 2006 à 22:41
bonjour,

Je voudrais afficher des lignes d'une table d'une base de donnée en VB6


mais...j'ai bien le nombre de lignes et de colonnes qui correspondent à ma requete mais rien ne s'affiche manifestement à l'intérieur des cellules de la datagrid.


j'ai regardé sur le forum pour trouver des solutions mais je n'ai pas trouvé.
si vous avez des suggestions,
merci d'avance
bonne soirée


mon code est le suivant:
strsql = "****" ' ma requete du genre select colonne1, colonne2 from table

Set cmd = New ADODB.Command
cmd.ActiveConnection = g_connect_base 'la connexion est ok
cmd.CommandText = strsql
' Open your recordset
If rs.State <> 0 Then
rs.Close
End If
Set rs = New ADODB.Recordset
rs.CursorType = adOpenStatic
rs.LockType = adLockReadOnly
rs.Open cmd

Set MyDataGrid.DataSource = rs


MyDataGrid.Columns(0).DataField = "num_xx"
MyDataGrid.Columns(1).DataField = "nom_yy"

MyDataGrid.Refresh
MyDataGrid.visible = True

Cordialement,
JimTruand

1 réponse

ta4444 Messages postés 36 Date d'inscription vendredi 17 mars 2006 Statut Membre Dernière intervention 6 novembre 2006
21 mars 2006 à 22:41
Set rs = New ADODB.Recordset
rs.CursorType = adOpenStatic
rs.LockType = adLockReadOnly
rs.Properties("IrowsetIdentity") = True
rs.Open cmd
0
Rejoignez-nous