Discussion :

[hayron]

Bonjour,


Je dois réalisé un programme en VBA qui va nécessité de tester dans un premier temps, si une requête SQL renvoie rien et sinon faire quelque chose. Existe-t-il un moyen de faire ca ?
J'ai pensé à cette manière :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
if (IsEmpty(SQL)) Then..
Else if  ...
End if

Dans un deuxième temps, je vais devoir récupérer une variable de type numérique que je vais décrémenter.
Exemple : 43247517
Dans un premier temps ma requête SQL va recherché des entrées pour ce numéro si elle renvoie rien. Il faut re-tester pour le 4324751 et à nouveau re-tester pour le 432475 jusqu'à ce que ma requête SQL renvoie des résultats...

Pour la gestion de la variable je pensais utiliser

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

len(mavariable)

et une astuce du type left (mavarible, len(mavariable) - i)

Je débute en VBA/SQL, je nage donc un peu pour ces problématiques..

Si vous avez des solutions pour la partie conditionnelle portant sur le SQL, je suis preneur

Merci d'avance, pour vos contributions

cdt,

hayron

[Heureux-oli]

Salut,

Avant de tester si une requête renvoie bien un résultat, il faut lui donner au moins une source de données.

Je ne connais pas le type de ton serveur de données, mais l'ADO devrait pouvoir te venir en aide.

http://access.developpez.com/cours/?page=dataaccess#ado

[hayron]

Merci pour la réponse, je ne connaissais pas ADO.

J'ai finalement réussi à me dépatouiller sans recordset j'ai utilisé un listbox pour afficher les résultats des requêtes. Et j'ai trouvé une propriété de la méthode rowsource de la listbox qui m'a permis de tester si mon listbox contenait des résultats ou pas... IsEmpty ne testait que la chaine SQL et non le résultat des requêtes..

Si y en a que ça intéresse, je peux fournir le code !