LE LOUARNE Serge a �crit :
Francois Gatto (xhydrogene) a �crit :

Bonsoir Christian,

[...]


http://fr.openoffice.org/files/documents/67/2682/RISC103.sxw

[...]



Merci pour tes remarques.

Fran�ois GATTO

Hello,

Il semble que lien soit mort.
Sinon, j'ai r�ussi � faire "tourner" la testeur2 avec mes deux num�ros de compte, masi en modifiant le code de calcul de la cl� rib :


ncpte = numBanque & numGuichet & numCompte & "00"
compte = ncpte

bout1 = left(compte,9)
bout2 = mid(compte,10,7)
bout3 = right(compte,7)

msgbox bout1  & " " & bout2 & " " & bout3

cle1 = str(CLng(bout1) mod 97)
cle2 = str(CLng(cle1 & bout2) mod 97)
cle3 = str(CLng(cle2 & bout3) mod 97)

YYeesssss !

msgbox "Cle RIB : " & (97 - cle3)"

en lieu et place de la boucle avec les mdlo(i).Pourtant ca fait la m�me chose.

Effectivement Serge, c'est pourquoi j'ai repris un codage pr�c�dent qui est similaire � celui que tu pr�sentes ici.
J'ai pas compris r�ellement le probl�me. Il me semblait que la boucle (que j'avais mis en place apr�s coup ... pour le fun !) �tait correctement r�dig�e.
L'essentiel �tant tout de m�me d'aboutir � un r�sultat correct (sous r�serve d'autres bizareries).


A+
Serge

@+ Fran�ois GATTO

---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]



Répondre à