Remplir une Datagrid avec un recordset

steevy92 Messages postés 16 Date d'inscription mercredi 17 août 2005 Statut Membre Dernière intervention 28 septembre 2005 - 17 août 2005 à 17:49
steevy92 Messages postés 16 Date d'inscription mercredi 17 août 2005 Statut Membre Dernière intervention 28 septembre 2005 - 18 août 2005 à 09:43
Bonjour,

Je suppose que la question a été posée maintes fois et je remercie par avance celui ou celle qui aura l'amabilité de me répondre.

Je suis en VB6 et j'accède à une base Access.
Je souhaite renseigner une DataGrid à partir d'un RecordSet.
Mon code ne plante pas mais ne remplit pas ma DataGrid.

Un grand merci impatient.
Steevy92.

4 réponses

EREF Messages postés 31 Date d'inscription samedi 18 novembre 2000 Statut Membre Dernière intervention 24 février 2006
17 août 2005 à 19:20
l'idéal quand c'est comme çà, envoi ton code afin qu'on puisse voir où çà pèche !!!!!
0
cs_redwings Messages postés 24 Date d'inscription jeudi 2 décembre 2004 Statut Membre Dernière intervention 28 avril 2008 2
18 août 2005 à 02:31
salut
normalement tu ouvre ton recordset puis il suffit d'affecter le datagrid avec ce dernier comme suit
par exemple
dim rs as new record set

set rs=nothing
rs.open "select * from ...",connexion,...
set le_nom_de_la_datagrid.DataSource = rs

ca marche avec le truedatagrid un activX
0
steevy92 Messages postés 16 Date d'inscription mercredi 17 août 2005 Statut Membre Dernière intervention 28 septembre 2005
18 août 2005 à 09:42
Merci pour vos réponses.

Voici mon code :

Set rstRS = New ADODB.Recordset
With rstRS
.Open _
Source:="dossier", _
ActiveConnection:=cnnDB, _
CursorType:=adOpenKeyset, _
LockType:=adLockOptimistic, _
Options:=adCmdTable
End With

Set dgDossier.DataSource = rstRS

Malgré cela, ma datagrid reste vide ! ! ! !

J'attends vos prochaines réponses.
0
steevy92 Messages postés 16 Date d'inscription mercredi 17 août 2005 Statut Membre Dernière intervention 28 septembre 2005
18 août 2005 à 09:43
Merci pour ta réponse.

Voici mon code :

Set rstRS = New ADODB.Recordset
With rstRS
.Open _
Source:="dossier", _
ActiveConnection:=cnnDB, _
CursorType:=adOpenKeyset, _
LockType:=adLockOptimistic, _
Options:=adCmdTable
End With

Set dgDossier.DataSource = rstRS

Malgré cela, ma datagrid reste vide ! ! ! !

J'attends ta prochaine réponse.
0
Rejoignez-nous