Recordset et DataSource

Salut!
Voila en affichant mes données dans mon flexgrid je voudrait faire un test pour voir si le recordset est vide ou non, comme ca s'il l'est, je met le flexgrid a visible=false.
Voici mon code:

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19

Private Sub Form_Load()   Dim cnx As New ADODB.Connection 'Pour la connexion a la BDD Dim rst As New ADODB.Recordset 'Pour la requete   cnx.ConnectionString = "DSN=" & monDSN & ";UID=" & monUID & ";PWD=" & monPWD & ";"   cnx.Open   rst.Open "SELECT DateComposant, Signature FROM COMPOSANT WHERE Editeur='McAfee'", cnx   If Not rst.EOF Then Set MSHFlexGrid1.DataSource = rst End If   rst.Close   End Sub

---

Et la ca me met un msg d'arreur:

Erreur d'exécution '30023'
Imopssible d'accéder aux données. Les paramètres de la sources de données doivent être
incorrects ou sa fonctionnalité est peut-être limitée.

Et je ne comprend pas pq! C peut etre mon "if" qui ne va pas pcq si je l'enléve tout fonctionne nickel.
Si qq1 pouvait m'expliquer ce serait super gentil merci! :mrgreen:

Salut tu peut utiliser les debug.print c'est tres utilise pour savoir si ta requete ou ta connection marche bien.

de plus pour boucler tu peut utiliser les DO UNTIL rst.eof(end of file) puis tu boucle avec un LOOP c'est plus simple a mon avis si non je peut pas plus t'aider désolé

DO UNTIL ... LOOP ???????? Ca servirait a rien, il n'y a aucune boucle dans ce code !!! C'est juste un test!! :koi:

Bref, fait tourner ton programme en pas à pas afin de nous dire sur quelle ligne de commande est générée l'erreur.;)

Salut, merci de m'avoir répondu.
Voila l'erreur est sur cette ligne, ca la surligne:

Code:

---

1 2	Set MSHFlexGrid1.DataSource = rst

---

Je comprend vraiment pas pcq si j'enléve le if tout fonctionne normalement!
Merci

Met les partie les plus importante de ton code, car la ligne que tu viens de me donner ne fait pas partie du code précédent

:? Cmt ca elle ne fait pas partie du code précédent?? Si si... Je crois ke je n'ai pas bien compris ce ke tu veux...

Code:

---

1 2 3 4 5 6

If not rst.EOF then MSHFlexGrid1.DataSource=rst Else MSHFlexGrid.Visible=False Enf If

---

En fait ca plante a partir de mon if. Dés kil passe ce if, c comme si le recordset était "vide", ou bien kon ne peut plus le réutiliser... :roll:

Oups, j'avais pas fait gaffe :oops: :oops:

je cherche ....

Je viens de lire quelque chose dans MSDN et je ne sais pas dans quel cas tu te trouve :? :

Citation:

---

Utilisez la déclaration Set pour définir la propriété DataSource , comme indiqué ci-dessous :

Set Text1.DataSource = ADODC1

Note Deux contrôles plus anciens, Data et RemoteData peuvent être utilisés comme sources de données bien qu'ils ne puissent être attribués à la propriété DataSource d'un autre contrôle ou objet au moment de l'exécution. Par exemple, le code suivant aboutira à un échec :

Set Text1.DataSource = Data1 ' Échec! Vous ne pouvez attribuer une
' propriété DataSource à un contrôle Data
' intrinsèque au moment de l'exécution.

Pour utiliser les contrôles Data ou RemoteData comme source de données, vous pouvez définir la propriété DataSource des contrôles dépendants uniquement au moment de la création.

---

:? Je comprend pas vraiment la! Moi je n'utilise pas de controle data, uniquement un recordset, en fait tout le code ke j'utilise est dans mon premier msg...

Désolé, jvois pas, peut-etre que quelqu'un d'autre poura t'aider:oops: :(
Bon courage quand meme;)

Ok, je te remercie en tout cas d'avoir essayé de m'aider c deja ca! :)
A+

Bonjour

Essaie:

Code:

---

1 2 3

rst.CursorLocation = adUseClient rst.open......

---

juste avant ton rst.open

Merci jacma pour ton aide! J'ai mis ta ligne de code et ca fonctionne!
Mais pourrais tu juste m'expliquer en quoi consiste cette ligne de code et pq faut-il la mettre pour que ca fonctionne stp? J'aimerais comprendre!
En tout cas merci bcp! :P

Citation:

---

Envoyé par sab_etudianteBTS

Merci jacma pour ton aide! J'ai mis ta ligne de code et ca fonctionne!
Mais pourrais tu juste m'expliquer en quoi consiste cette ligne de code et pq faut-il la mettre pour que ca fonctionne stp? J'aimerais comprendre!
En tout cas merci bcp! :P

---

C'est une question récurente. Pour résumer le curseur peut se situer coté serveur ou coté client. Suivant sa position, la bibliothèque de curseurs est différentes. Pour un curseur coté client, il propose plus de fonctions. Mais regardes l'aide MSDN sur ce mot clé pour en savoir un peu plus.

Ok je te remercie bcp! Je n'ai pas l'aide MSDN mais je vais regarder sur le net!
En tout cas tu me sauve la vie car aujourd'hui est mon dernier jour de stage et je bloké sur ca heureusement ke maintenant c réglé je peut boucler le projet!
Encore merci et je vous souhaite a tous une excellente journée :P