[SQL2K][TSQL][VBA]Message de sortie en fonction du résultat de la requete

Bonjour,
Voulant faire une selection de lignes dans plusieurs tableau avec une condition j'ai ecrit ce

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13

IF ( (SELECT count(*) FROM tbl_Projet WHERE PtrIdClient = 96) = (SELECT count(*) FROM tbl_Projet WHERE PtrIdClient = 96 AND oEtatProjet = 0)) BEGIN SELECT * FROM tbl_Elevation WHERE PtrIdProjet IN (SELECT IdProjet FROM tbl_Projet WHERE *PtrIdClient = 96) SELECT * FROM tbl_Elevation_Annexes WHERE PtrIdProjet IN (SELECT IdProjet FROM tbl_Projet WHERE *PtrIdClient = 96) SELECT * FROM tbl_Elevation_Details WHERE PtrIdProjet IN (SELECT IdProjet FROM tbl_Projet WHERE *PtrIdClient = 96) SELECT * FROM tbl_Elevation_Element WHERE PtrIdProjet IN (SELECT IdProjet FROM tbl_Projet WHERE *PtrIdClient = 96) SELECT * FROM tbl_Elevation_Exemplaire WHERE PtrIdProjet IN (SELECT IdProjet FROM tbl_Projet WHERE *PtrIdClient = 96) SELECT * FROM tbl_Elevation_InfoSAI WHERE PtrIdProjet IN (SELECT IdProjet FROM tbl_Projet WHERE *PtrIdClient = 96) SELECT * FROM tbl_Elevation_Prix WHERE PtrIdProjet IN (SELECT IdProjet FROM tbl_Projet WHERE *PtrIdClient = 96) SELECT * FROM tbl_Elevation_PtBois WHERE PtrIdProjet IN (SELECT IdProjet FROM tbl_Projet WHERE *PtrIdClient = 96) SELECT * FROM tbl_Elevation_Traverse WHERE PtrIdProjet IN (SELECT IdProjet FROM tbl_Projet WHERE *PtrIdClient = 96) SELECT * FROM tbl_Clients WHERE IdClient = 96 END

---

Le truc c'est que j'aimerai afficher un message via VBA pour savoir si la condition était remplie ou si elle ne l'était pas ( en rajoutant un ELSE dans le code) mais je ne sais pas comment faire, j'ai voulue essayer avec RETURN et voir si il y avait possibilité de différencier les valeurs du RETURN dans VBA mais cela bloque déjà dans SQL car ce n'est pas possible d'utiliser un return dans une condition IS/ELSE .
Si quelqu'un a une idée de comment faire je suis preneur :D

En vous remerciant d'avance

Arthur

Bonjour,
Pourrais-tu un peu mieux décrire ce que tu souhaites ? Et le cadre de ce que tu fais ?
Franchement j'ai beau relire ton message, ce n'est pas compréhensible !
C'est une appli VBA qui attaque une base de données SQL Server en appelant une procédure stockée ?
Et puis ?

Bonjour,

Vous pouvez simplement vérifier si la procédure renvoie des recordsets ou pas...

Notez également, qu'il est tout à fait possible de mettre un RETURN dans un bloc ELSE, vous avez dû mal vous y prendre.

Enfin, je vous recommande d'apprendre les jointures et d'éviter les SELECT * les performances seraient bien meilleures...

Bonjours,
excusé moi du délais de réponse.

comment devrai je placer le return ?
Les SELECT * sont destiné à devenir des DELETE *

Le programme devra consisté à supprimé tout les liens d'un clients sélectionner si et SEULEMENT si il n'a jamais fait de commande (oEtatProjet=0 pour aucune commande) et bien sur le return me servirai a connaître la "réponse" , si il a exécuter le if ou le else

Merci d'avance pour vos réponses, en espérant que vous passiez de bonnes fetes
Cordialement
Arthur

Suite a mon precedent message, n'y a t'il pas moyen d'utiliser un PRINT ?
j'essaie mais comment je débute vraiment sur le transact je pense que je le place mal car je n'ai aucun message du au PRINT, peut on me montrer des exemples ou me l'ajouter directement dans le code ?
Merci d'avance.
Arthur.

Bonjour,

Vous pouvez bien utiliser RETURN :

Code:

---

1 2 3 4 5 6 7 8

IF ... BEGIN DELETE ...; DELETE ...; RETURN 0; END RETURN 1;

---

Si la condition est remplie, la procédure renverra 0, sinon elle renverra 1

Citation:

---

Envoyé par UnlimitedEden

Le programme devra consisté à supprimé tout les liens d'un clients sélectionner si et SEULEMENT si il n'a jamais fait de commande (oEtatProjet=0 pour aucune commande)

---

Bonjour,

Sauf que dans la requête que vous proposez, il n'y a aucun filtre sur une colonne "oEtatProjet"

Laquelle de vos tables est celle des commandes ? Dans quelle table se trouve la colonne "oEtatProjet" ?

Quoi qu'il en soit, d'après ce que je comprends de votre besoin, il semble qu'une requete utilisant NOT EXISTS serait une solution préférable à celle que vous envisagez :
vérifiez qu'il n'existe pas de commande pour laquelle "oEtatProjet" = 'O'

EDIT : désolé j'avais mal lu votre requête :oops:, en relisant j'ai trouvé votre test sur la colonne oEtatProjet=0.
Du coup ça confirme ce que je soupçonnais, vous pouvez simplifier ainsi :

Code:

---

1 2 3 4 5 6 7

IF NOT EXISTS (select 1 FROM tbl_Projet WHERE PtrIdClient = 96 AND oEtatProjet = 0) BEGIN DELETE FROM tbl_Elevation ...

---