Re: HTTPRequête et XML-RPC

Posté par daniel le 23/6/2008 10:09:54
Bonjour

essaie d'adapter le code ci-dessous

s_encode est chaîne =pUser+":"+pPass
s_encode = B64E(s_encode,Vrai)
s_header = "Authorization: Basic "+s_encode+RC

vpost = "ta commande post"

HTTPRequête(tonsite,"MOZILLA Compatible",s_header,vpost,"application/x-www-form-urlencoded")



Pour avoir un base64 conforme

PROCEDURE B64E(pChaine est une chaîne,pTexte est un booléen=Vrai)
T est une chaîne =""

SELON modulo(Taille(pChaine),3)
	CAS 0 : T=""
	CAS 1 : T="=="
	CAS 2 : T="="
FIN

RENVOYER Crypte(pChaine,"",crypteAucun,pTexte)+T

Cette contribution était de : http://old.wdforge.org/newbb/viewtopic.php?forum=19&topic_id=5909&post_id=23853