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)

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

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

A+
Serge

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



Répondre à