WDForge.org - Forums

Re: Hexa vers chaine

Sujet: Re: Hexa vers chaine
par drcharly93 sur 26/12/2004 1:41:39

Bonjour Oceans,

Un petit bout de code du cru

PROCEDURE HexaToAscii(sChaineHexa est une chaîne)
i est un entier
sAscii est une chaîne

POUR i = 1 A Taille(sChaineHexa)  PAS 2
  sAscii += Caract(Val(sChaineHexa[[i A i+1]],"x"))
FIN
RENVOYER sAscii

Pour test:

Info(HexaToAscii("7777772E5744466F7267652E6F7267"))

Difficile à trouver sans l'exécuter

Connexion

Perdu le mot de passe ?

Inscrivez-vous maintenant !

Accueil Dossiers Articles Forums Petites Annonces Téléchargements FAQ Gabarits Glossaire Partenaires Livre d'or Réaliser un lien Plan du site

Chercher WDForge

Chercher Web

Partenaires

Visualiser tous les Partenaires...

WinDev, WebDev, WinDev Mobile et HyperFile sont des marques déposées par PCSoft. | Voter | Legal | Contact |