Pb datagrid : reremplir (urgent, merci d'avance)

stuffparadiz Messages postés 12 Date d'inscription jeudi 15 avril 2004 Statut Membre Dernière intervention 28 novembre 2005 - 10 mai 2004 à 09:21
stuffparadiz Messages postés 12 Date d'inscription jeudi 15 avril 2004 Statut Membre Dernière intervention 28 novembre 2005 - 10 mai 2004 à 09:21
salut a tous après avoir cherché pendant deux jours comment on fait pour rmeplir le datagrid.
Maintenant j'ai trouve mais le probleme c'est que si je relance la meme procedure pour reafficher dans le datagrid il reste vide.
HElp
Voici mon code

If Conn.State = adStateOpen Then

    Conn.Close

    
Else

End If

RECHERCHE.DataGrid1.Visible = True

Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=C:\Documents and Settings\bcag\Bureau\CSCAslim.mdb"
With Obj_Result
.ActiveConnection = Conn
.CursorLocation = adUseClient
.CursorType = adOpenStatic
.LockType = adLockOptimistic
.Open (str_sql)
End With
Set RECHERCHE.Adodc1.Recordset = Obj_Result

End Function


:sad)
Rejoignez-nous