Les codes RC sont interfprétés par la messagerie.
J'utilise le code suivant pour remplacer les RC.
i est un
entier
sTexte est une chaîne = "Ligne1"+RC+"Ligne2"+RC+"Ligne3"
i =
10
sTexte=Remplace(sTexte, Caract(i), "%"+NumériqueVersChaîne(i,"02X"))
i =
13
sTexte=Remplace(sTexte, Caract(i), "%"+NumériqueVersChaîne(i,"02X"))
sAdresse est une chaîne =
"destinataire@societe.fr"
sSujet
est
une chaîne = "Sujet
email"
LanceAppliAssociée("mailto:"+sAdresse+"?subject="+sSujet+"&body="+sTexte)