Sql est une Chaine
Rs est une source de données
Sql=
[
SELECT WL.Val(fichier.rubrique1) AS Rubrique1,
WL.Val(fichier.Rubrique2) AS Rubrique2,
Fichier.Rubrique3 AS Rubrique3
FROM fichier
WHERE
Rubrique3 = @Param1
ORDERBY Rubrique1,Rubrique2
]
Sql = Remplace( Sql, "@Param1", "'75'" )
Si Pas HExecuteRequeteSQL( Rs, HRequeteDefaut, Sql ) Alors
Erreur(HErreurInfo())
Fin
Fin
HLitPremier( Rs )
//Renvoie le nombre d'enregistrements de la requête
Info( HNbEnr( Rs )
//pour alimenter une table fichier existante
MaTable..FichierParcourue="Rs"
Cette contribution était de : http://old.wdforge.org/newbb/viewtopic.php?forum=18&topic_id=5702&post_id=23252