Discussion :

[fozzeuh]

Bonjour,


Je reprend windev et j'ai beaucoup de mal à me souvenir de comment je faisait les requêtes et comment je les parcourais.Pour l'instant je teste sa mais je galère encore beaucoup , si quequ'un pouvait me mettre sur une piste.

Code :

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

1
2
3
4
5
6
7
Resultidentif est une chaîne	
	Reqidentif est une chaîne
	MConnexion_source est une Source de Données
	Reqidentif = "SELECT * FROM Correspondance"
	HExécuteRequête(Reqidentif,MConnexion_source,hRequêteSansCorrection)
	Resultidentif = HLitPremier(Reqidentif)
	Info(Resultidentif)

Merci Cordialement fozzeuh

[miripesage]

Bonjour, vous voulez faire quoi avec ce code ?

[L.nico]

Bonjour

Code :

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

1
2
3
4
Res est un entier
Reqidentif est une chaîne
Conn est une Connexion
MConnexion_source est une Source de Données

IL faut ensuite ouvrir la Conn avec HOuvreConnexion (Voir l'aide)

puis dans la suite il faut utiliser HExécuteRequêteSQL à la place de HExécuteRequête.
On utilise HExécuteRequête pour executer les requêtes paramétrées de Windev.

Code :

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

1
2
3
4
5
6
Reqidentif = "SELECT * FROM Correspondance"
HExécuteRequêteSQL(MConnexion_source,Conn,hRequêteSansCorrection,Reqidentif)
Res = HLitPremier(MConnexion_source )
Si pas hendeHors(MConnexion_source ) alors
   Info(MConnexion_source .NomChamp)
FIN

il faut remplacer pour votre exemple NomChamp par un champ existant réellement dans la table Correspondance

Replongez vous dans les livres d’auto-formation pour une petite remise à niveau
Bon courage !

[EDIT] Exemple modifié

[fozzeuh]

Et bien je cherche juste à parcourir une requête sql. Merci pour votre aide mais il me dit que je ne peux pas faire ceci info(Reqidentif.Nomdechamp)

Il n'accepte pas le .nomdemonchamp

et il me met ceci aussi.

Code :

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

1
2
3
Erreur à la ligne 8 du traitement Clic sur BTN_validconnect.
Vous avez appelé la fonction HLitPremier.
Aucune analyse n'est ouverte et le fichier <SELECT * FROM Correspondance> n'a pas été décrit.

[L.nico]

Montrez nous votre code modifié suivant mes indications.
Aussi, si vous voulez parcourir une requête, il va falloir utiliser une boucle du Type :

Code :

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

1
2
3
4
Tantque pas HEnDehors(MConnexion_source )
    Info(MConnexion_source.NomChamp)
    HLitSuivant(MConnexion_source )
Fin

Et bien sûr, NomChamp n'existe pas puisque cela fait partie de l'exemple et que je ne connais pas la définition de la table Correspondance ....
J'ai mis l'instruction Info dans la boucle parceque vous l'aviez initialement mais que devient le curseur que vous lisez ?
Vous voulez alimenter une table, une liste ?
Précisez votre objectif.

[EDIT]
j'avais fait une erreur dans l'exemple.

[miripesage]

Salut, ici vous pouver trouver des exemples d'exécution de requêtes sql :
http://doc.pcsoft.fr/fr-FR/?10000030...etesql-exemple et beaucoup de documentation

[gardangel]

On fait de la formation Windev sur le forum maintenant ? Je tiens en haute estime votre patience !

L'aide en ligne est bien montée... une question trouve très souvent réponse. Personnellement, désolé si j'en offusque certains, la paresse morale ("bofff... sa me tente pas d'y penser") n'apporte rien de bons au forum.

Programmer, c'est des mathématiques à longueur de journée. Pour programmer, il faut d'abord être un penseur assidu avec un bon sens de la jugeotte.

L'ami, F1 sera ma meilleure réponse.

Jean-François

[thx51]

Personnellement je suis familier avec la syntaxe :

Code :

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

1
2
3
4
5
SI HExecuteRequêteSQL(sdSource, Connecteur, hRequêteSansCorrection, cRequête) _ET_ HLitPremier(sdSource) ALORS
BOUCLE
// Traitements..
A FAIRE TANTQUE HLitSuivant(sdSource)
FIN

qui ajoute un peu de robustesse, et qui évite l'utilisation des HTrouve et HEnDehors, qui sont dans les 95% du temps inutiles.

A noter l'utilisation du "_ET_" en lieu et place du "ET", qui permet l'évaluation paresseuse.