SELECT CODEPOSTAUX.Ville AS Ville
FROM CODEPOSTAUX
WHERE CODEPOSTAUX.CodePostal IN ({Param1})
SI HExécuteRequête(Req_VILLES,hRequêteDéfaut,"26120"+TAB+"26000") ALORS
HLitPremier(Req_VILLES)
TANTQUE PAS HEnDehors()
Trace(Req_VILLES.Ville)
HLitSuivant(Req_VILLES)
FIN
SINON
Erreur(HErreurInfo())
FIN
HAnnuleDéclaration(Req_VILLES)
Cette contribution était de : http://old.wdforge.org/newbb/viewtopic.php?forum=12&topic_id=2037&post_id=8517