ChaineAEncoder est une chaîne = "TOTOF1212"
GUID est une chaîne = ""
i est un entier
POUR i=1 A Taille(ChaineAEncoder)
//*** Transformation de chaque caractère de la chaine à encoder en hexa ***//
GUID += NumériqueVersChaîne( Asc( ChaineAEncoder[[ i ]] ), "2X")
FIN
Trace(GUID)
Cette contribution était de : http://old.wdforge.org/newbb/viewtopic.php?forum=17&topic_id=4649&post_id=19333