Bonjour,
je suis actuellement en train de développer une appli VB & SQL server, et j'aimerais afficher des valeurs dans un datagrid, ce datagrid est commun à différents affichages de requetes sql. j'ai donc :
je n'ai aucune erreur lors de l'exécution saif que rien ne s'affiche dans le datagrid, la requete renvoit pourtant bien des valeurs. Normalement je n'ai pas non plus besoin d'utilisé la méthode DataFields de l'objet Columns.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13 Private Sub insertouv_Click(Index As Integer) 'Call adminouv Dim insertouv As ADODB.Recordset resultSql = "SELECT refOuv, titreOuv, dateOuv, descOuv, dispoOuv, codeEdition, codeGenre, refAuteur FROM OUVRAGE" Set insertouv = New ADODB.Recordset insertouv.Open resultSql, Connexion, adOpenKeyset, adLockBatchOptimistic Set dgadmin.DataSource = insertouv cmdAjout.Caption = "Ajouter un livre" cmdsuppr.Caption = "Supprimer un livre" idx = 6 End Sub
Pouvez vous m'aider s'il vous plait ? Merci d'avance
Partager