PC SOFT

FORUMS PROFESSIONNELS
WINDEVWEBDEV et WINDEV Mobile

Accueil → WEBDEV 2024 → Convertir code PHP en WLanguage
Convertir code PHP en WLanguage
Débuté par FOFANA LASSINA, 11 oct. 2017 21:28 - 6 réponses
Posté le 11 octobre 2017 - 21:28
SALUT A TOUS JE SUIS CONFRONTE A UN PROBLEME DE CONVERSION DE CODE SOURCE MERCI DE VOULOIR BIEN M'APPORTER VOTRE AIDES
CODE PHP

$apikey='xxx';
$apisecret='xxx';
$nonce=time();
$uri='https://bittrex.com/api/v1.1/market/getopenorders…;
$sign=hash_hmac('sha512',$uri,$apisecret);
$ch = curl_init($uri);
curl_setopt($ch, CURLOPT_HTTPHEADER, array('apisign:'.$sign));
$execResult = curl_exec($ch);
$obj = json_decode($execResult);
Membre enregistré
946 messages
Popularité : +53 (63 votes)
Posté le 12 octobre 2017 - 10:35
Bonjour,

Je dirai un truc comme ca

sApikey est une chaîne = "xxxx"
sApisecret est une chaîne = "xxxx"
nOnce est une chaîne = DateHeureSys()
suri est une chaîne = "https://bittrex.com/api/v1.1/market/getopenorders?apikey="+sApikey+"&nonce="+nOnce
bufSign est un Buffer = HashChaîne(HA_HMAC_SHA_512,suri,sApisecret)

demande est un httpRequête
reponse est un httpRéponse

demande.URL = suri
demande.Entête["apisign"] = bufSign

reponse = HTTPEnvoie(demande)
SI reponse.CodeEtat = 200 ALORS
vReponse est un Variant = JSONVersVariant(reponse.Contenu)
FIN


jordan
Membre enregistré
946 messages
Popularité : +53 (63 votes)
Posté le 12 octobre 2017 - 13:34
jordan a écrit :
Bonjour,

Je dirai un truc comme ca

sApikey est une chaîne = "xxxx"
sApisecret est une chaîne = "xxxx"
nOnce est une chaîne = DateHeureSys()
suri est une chaîne = "https://bittrex.com/api/v1.1/market/getopenorders…
bufSign est un Buffer = HashChaîne(HA_HMAC_SHA_512,suri,sApisecret)

demande est un httpRequête
reponse est un httpRéponse

demande.URL = suri
demande.Entête["apisign"] = bufSign

reponse = HTTPEnvoie(demande)
SI reponse.CodeEtat = 200 ALORS
vReponse est un Variant = JSONVersVariant(reponse.Contenu)
FIN


jordan

ou alors

sApikey est une chaîne = "xxxx"
sApisecret est une chaîne = "xxxx"
nOnce est une chaîne = DateHeureVersRéel(DateHeureSys())
suri est une chaîne = "https://bittrex.com/api/v1.1/market/getopenorders?apikey="+sApikey+"&nonce="+nOnce
bufSign est un Buffer = HashChaîne(HA_HMAC_SHA_512,suri,sApisecret)

demande est un httpRequête
reponse est un httpRéponse

demande.URL = suri
demande.Entête["apisign"] = bufSign

reponse = HTTPEnvoie(demande)
SI reponse.CodeEtat = 200 ALORS
vReponse est un Variant = JSONVersVariant(reponse.Contenu)
FIN


jordan
Posté le 26 juin 2020 - 08:41
Bonjour
Quelqu'un peut-il m'aider à traduire ce code PHP en windev :
<?php

$ch = curl_init();
curl_setopt($ch, CURLOPT_URL, 'https://api.smsenvoi.com/API/v1.0/REST/login…');

curl_setopt($ch, CURLOPT_RETURNTRANSFER, true);


$response = curl_exec($ch);
$info = curl_getinfo($ch);
curl_close($ch);

if ($info['http_code'] != 200) {
echo('Error! http code: ' . $info['http_code'] . ', body message: ' . $response);
}
else {
$values = explode(";", $response);
echo('user_key: ' . $values[0]);
echo('Session_key: ' . $values[1]);
}
?>
Merci pour votre aide
Posté le 26 juin 2020 - 08:43
Bonjour
J'au un problème similaire, quelqu'un peut-il m'aider à traduire ce code PHP en windev :
<?php

$ch = curl_init();
curl_setopt($ch, CURLOPT_URL, 'https://api.smsenvoi.com/API/v1.0/REST/login…');

curl_setopt($ch, CURLOPT_RETURNTRANSFER, true);


$response = curl_exec($ch);
$info = curl_getinfo($ch);
curl_close($ch);

if ($info['http_code'] != 200) {
echo('Error! http code: ' . $info['http_code'] . ', body message: ' . $response);
}
else {
$values = explode(";", $response);
echo('user_key: ' . $values[0]);
echo('Session_key: ' . $values[1]);
}
?>
Merci pour votre aide
Membre enregistré
946 messages
Popularité : +53 (63 votes)
Posté le 26 juin 2020 - 21:15
Bonjour,

Prenez un peu l'habitude d'aller voir l'aide en ligne... https://doc.pcsoft.fr/fr-FR/?1000021158

J'ai repris mon propre code de ce sujet.

Traduit ça donnerai ça

demande est un httpRequête
reponse est un httpRéponse

demande.URL ="https://api.smsenvoi.com/API/v1.0/REST/login…"
demande.methode = httpGet
reponse = HTTPEnvoie(demande)
SI reponse.CodeEtat <> 200 ALORS
Trace("Error! http code:" +reponse.CodeEtat + "body message:" + reponse.contenu)
SINON
TableauValeur est un tableau de chaîne
ChaîneVersTableau(TableauValeur,reponse.contenu,";")
Trace("User_key:" +TableauValeur[1])
Trace("Session_key:" +TableauValeur[2])
FIN


Jordan
Posté le 29 juin 2020 - 12:43
Merci pour le lien et pour la réponse