cs_Mcjo
Messages postés403Date d'inscriptiondimanche 12 août 2001StatutMembreDernière intervention 3 septembre 20122 28 nov. 2002 à 03:50
Ben si tu ne tien pas compte de la case
if chaine1 = chaine2 then
sinon il faut faire une petite fonction
function send_code(chaine)
dim ma_chaine
ma_chaine = chaine
send_code = ""
for i = 1 to len(ma_chaine )
send_code = send_code & asc(mid(ma_chaine , i, 1)
nextif send_code & "" "" then send_code 00
end function
valeur1 = send_code(chaine1)
valeur2 = send_code(chaine2)
if valeur1 = valeur2 then ...
if valeur1 > valeur2 then ...
if valeur1 < valeur2 then ...