Bonjour à toutes et à tous,
Je viens aujourd'hui vers vous pour vous présenter une petite erreur de prog toute bête qui m'a fait perdre bêtement 30 minutes.
Examiner le code suivant et dites moi pourquoi RENVOYER :RqTemplate renvoie une chaîne vide, alors que juste avant :RqTemplate = IniLit(...) donnait la bonne valeur ?
(La solution est juste après le bout de code)
FONCTION TemplateRecuperer()
SELON :RqType
CAS "INSERT"
:RqTemplate = INILit("INSERT", "vSimple", "Paramètre non trouvé", "C:\STE.ini")
AUTRE CAS
// Renvoyer le template récupéré
RENVOYER :RqTemplate
FIN
Vous avez trouvé ? Super, vous ne me décevez pas...
Sinon, voici la solution :
FONCTION TemplateRecuperer()
SELON :RqType
CAS "INSERT"
:RqTemplate = INILit("INSERT", "vSimple", "Paramètre non trouvé", "C:\STE.ini")
AUTRE CAS
FIN
// Renvoyer le template récupéré
RENVOYER :RqTemplate
Et oui, le mot FIN associé à SELON, c'est lui qui provoque l'erreur. Ne me demandé pas pourquoi, je n'en sais rien. Ce qu'il y a de sur c'est que le premier Code Source ne fonctionne pas et le deuxième si.
Si un de nos administrateurs favoris, pouvait expliquer le pourquoi du commment ??
Voilà, j'espère que cela vous servira !!
Cette contribution était de : http://old.wdforge.org/newbb/viewtopic.php?forum=12&topic_id=1194&post_id=4799