Rs est une Source de données
Sql est une Chaine
Sql = "SELECT Rub1 AS RubAAfficher, Rub2 AS RubCle FROM Fichier"
SI PAS HExecuteRequeteSQL(Rs,HRequetedefaut,Sql) Alors
Erreur(HErreurInfo())
Retour
FIN
FichierVersListeMemoire(<NomListe>,<Fichier>,RubAAfficher,RubAAfficher,RubCle)
Cette contribution était de : http://old.wdforge.org/newbb/viewtopic.php?forum=12&topic_id=1427&post_id=5841