Voila comment je verais la solution à ce probleme, à savoir que je ne suis qu'étudiant et que ca fait qu'une semaine que je fais du windev ... Maintenant si ca marchait je pourrais effectuer une masturbation mentale avancée persuadé de ne pas mériter ce statut si ingrat de stagiaire.
ResSQL est un entier
MaChaine est une chaîne = ""
ResSQL = SQLExec("SELECT ticketing_ticket.Client_id FROM ticketing_ticket WHERE ticketing_ticket.Etat = 'P'","REQ1")
SI ResSQL ALORS
SQLPremier("REQ1") // Affiche la première ligne
SI PAS SQL.EnDehors ALORS
MaChaine = SQLCol("REQ1",1)
FIN
TANTQUE PAS SQL.EnDehors
SQLSuivant("REQ1")
MaChaine = MaChaine + RC + SQLCol("REQ1",1)
FIN
ResSQL = SQLExec("select clients.id AS ID, clients.nom_commercial AS nom_commercial, clients.rue AS rue, clients.boite as boite, clients.ville as ville, clients.codepostal FROM clients WHERE clients.id IN" + MaChaine,"REQ2")
SI ResSQL ALORS
//Ton traitement ...
FIN
SINON
//Traitement de l'erreur
FIN
SQLFerme("REQ1")
SQLFerme("REQ2")