19 messages in org.openoffice.fr.progRe: [prog] OOo1.1.2: Base de don...
FromSent OnAttachments
tens...@no-log.orgNov 11, 2004 10:04 am 
Tony GALMICHENov 11, 2004 10:53 am 
Laurent GodardNov 11, 2004 11:12 am 
tens...@no-log.orgNov 11, 2004 11:13 am 
tens...@no-log.orgNov 11, 2004 11:24 am 
tens...@no-log.orgNov 12, 2004 6:28 am 
Laurent GodardNov 12, 2004 6:48 am 
tens...@no-log.orgNov 12, 2004 7:44 am 
Laurent GodardNov 12, 2004 7:52 am 
tens...@no-log.orgNov 12, 2004 8:40 am 
Philippe progOONov 12, 2004 11:41 am 
Laurent GodardNov 12, 2004 11:58 am 
Bernard MarcellyNov 12, 2004 12:23 pm 
Alex ThurgoodNov 13, 2004 3:17 am 
tens...@no-log.orgNov 13, 2004 9:38 am 
tens...@no-log.orgNov 13, 2004 10:34 am 
Alex ThurgoodNov 15, 2004 12:42 am 
Philippe progOONov 16, 2004 2:08 am 
tens...@no-log.orgNov 16, 2004 3:10 am 
Actions with this message:
Paste this link in email or IM:
Paste this link in email or IM:
Atom feed for this thread
Paste this URL into your reader:
Subject:Re: [prog] OOo1.1.2: Base de données - connexion à une source?Actions...
From:Laurent Godard (lgod@indesko.com)
Date:Nov 11, 2004 11:12:11 am
List:org.openoffice.fr.prog

Bonsoir Ludo

Val1=oForm.GetByName("TYPE_ADH").effectivevalue If Val1="simple5,00" Then ValTotal=5 If Val1="Atelier Normal à 20,00 €" Then ValTotal=20 If Val1="Atelier Réduit à 13,00 €" Then ValTotal=13 If Val1="Famille Référent. à 15,00 €" Then ValTotal=15 If Val1="Famille Non Référent à 10,00 €" Then ValTotal=10 If Val1="Honneur (à partir de 25,00 €)" Then ValTotal=25 Else ValTotal=25

Maintenant, pas moyen d'obtenir autre chose que "25". C'est donc que mes
conditions ne fonctionnent pas. Mais je ne comprend pas. Quelqu'un à une idée???

Dans ton cas ve n'est a priori par une succession de if qu'il te caux utiliser mais plutot un select ... case Ton resultat systematique de 25 est normal si Val1<>"Honneur (à partir de 25,00 €)"

En effet, la derniere condition est evaluée quelle que soit l'evalutaion des précdente exmple

Val1="Atelier Réduit à 13,00 €"

If Val1="simple5,00" Then ValTotal=5 --> ne passe pas le test --> ok --> a ce moment valTotal indéfini If Val1="Atelier Normal à 20,00 €" Then ValTotal=20 --> ne passe pas le test --> ok --> a ce moment valTotal indéfini If Val1="Atelier Réduit à 13,00 €" Then ValTotal=13 --> passe le test --> a ce moment valTotal=13 If Val1="Famille Référent. à 15,00 €" Then ValTotal=15 --> ne passe pas le test --> a ce moment valTotal=13 If Val1="Famille Non Référent à 10,00 €" Then ValTotal=10 --> ne passe pas le test --> a ce moment valTotal=13 If Val1="Honneur (à partir de 25,00 €)" Then ValTotal=25 Else

ValTotal=25 --> ne passe pas le test --> evalue donc la condition else --> valTotal=25

il te faut donc utiliser select ... case (ou des elseif mais c'est moins clair)

(ceci est expliqué page 84 du livre)

Bonne soirée

laurent