PC SOFT

FORUMS PROFESSIONNELS
WINDEVWEBDEV et WINDEV Mobile

Accueil → WINDEV 2024 → Interface + requête + champ table
Interface + requête + champ table
Débuté par ISSAM, 14 nov. 2006 15:08 - 4 réponses
Posté le 14 novembre 2006 - 15:08
bonjour,
je suis débutant à windev.
je veux récupérer une valeur qui sera donné en entrée dans ma fenêtre, pour utiliser cette valeur dans une requête.
et je veux afficher le résultat de cette requête dans un champ table dans la même fenêtre.
est ce que vous pouvez me donner des indices SVP.
merci pour votre aide.
Posté le 14 novembre 2006 - 15:41
//chaine de ta requete
chreq = "SELECT * from essai where age="+variable de ta fenetre

//execution de la requete
SI PAS SQLExec(chreq,"Requete1") ALORS
//en cas d'erreur
SQLInfoGene("Requete1")
Info("Erreur d'execution dans la requete",SQL.Erreur+" : "+SQL.MesErreur)
SQLFerme("Requete1")
RETOUR

FIN

//parcours du resultat de ta recherche
TANTQUE SQLFetch("Requete1")=0


valeur a afficher=SQLLitCol("Requete1",1)//tu recupere la premiere colonne de ta requete
sClecli=SQLLitCol("Requete1",2)//tu recupere la deuxieme colonne de ta requete si tu en a plusieurs
FIN
Posté le 14 novembre 2006 - 15:48
Tiens plus simple dans le cas ou tu es sur que ta requete ne te renvois qu'une valeur :
chreq="SELECT * from table where age="+tavaleur

SI PAS SQLExec(chreq, "ReqEntetes") ALORS
SQLInfoGene("ReqEntetes")
Info(SQL.Erreur+" : "+SQL.MesErreur)
SQLFerme( "ReqEntetes")
RETOUR
FIN

//Recuperation de ta valeur
SI SQLFetch("ReqEntetes")=0 ALORS
glfNumfact=(SQLLitCol("ReqEntetes", 1))
FIN
SQLFerme( "ReqEntetes")
Posté le 14 novembre 2006 - 16:33
je ne sais pas si t'a vu cette application sur le site pcsoft.fr,
en fait je veux faire pareil que cette application


http://www.pcsoft-windev-webdev.com/videos10/2-3-10-Milliards/10-Milliards.html
Posté le 15 novembre 2006 - 00:36
Bonjour,

Etape 1 :

ouvre(MaFenetreX,MonParametreAEnvoyer)

Etape 2 : Dans la declaration globale de la fenetre : MafenetreX

PROCEDURE MaFen(xParam="")
si sansespace(xParam)=""
erreur("Pas de paramètre reçu pour la création de la source de données!!")
sinon
si pas hexecuterequete("mAreqtX",hrequetedefaut,xParam)
erreur("Erreur à l'execution de la requete 'MaReqtX'",herreurinfo())
sinon
pour tout mAreqtX
//traitement .......
fin
fin
fin

Bon Devlop.

--
Ali Hindi : Alidev7@yahoo.fr