Re: MySQL, Champ Binaire et Export
Posté par daniel le 7/6/2007 14:25:12
Si le problème vient uniquement des caractères 0, il suffit de les remplacer par
X = Remplace(X, Caract(0), "\0")
Sinon une solution est de transformer dans ton export la valeur de X par du base64
Si tu restes dans du cadre Windev/Windev utiliser la fonction crypte ou décrypte qui va te faire un base64 pas conforme mais qui fonctionnera dans le cadre Windev/Windev/Webdev.
Si tu veux faire du base64 conforme voici le code qui permet de le faire
Faire du Base64
Décoder du Base64
X = Remplace(X, Caract(0), "\0")
Sinon une solution est de transformer dans ton export la valeur de X par du base64
Si tu restes dans du cadre Windev/Windev utiliser la fonction crypte ou décrypte qui va te faire un base64 pas conforme mais qui fonctionnera dans le cadre Windev/Windev/Webdev.
Si tu veux faire du base64 conforme voici le code qui permet de le faire
Faire du Base64
PROCEDURE B64E(pChaine est une chaîne)
T est une chaîne =""
// ok sauf formatage sur 76 caractères
SELON modulo(Taille(pChaine),3)
CAS 0 : T=""
CAS 1 : T="=="
CAS 2 : T="="
FIN
RENVOYER Crypte(pChaine,"",crypteAucun)+T
Décoder du Base64
PROCEDURE B64D(pChaine est chaîne)
T est une chaîne
T = Remplace(pChaine,"=","")
RENVOYER Décrypte(T,"",crypteAucun)
Cette contribution était de : http://old.wdforge.org/newbb/viewtopic.php?forum=17&topic_id=5195&post_id=21447