salut à vous tous

voila, je suis en train de développer un logiciel sous Windev10, et j'ai besoin de coder un système permettant de convertir un montant d'une devise à une autre en passant par un site comme http://www.xe.com/ ou http://www.fininfo.fr/fininfong/GetChanges.event?lg=fr

débutant dans la programmation windev, j'avoue être un peu perdu quant à la manière de ramener les données depuis Internet. J'ai à peu près compris qu'il fallait se servir de fonctions telles que HTTPRequête pour exécuter la requête sur le serveur, et HTTPDonneRésultat pour récupérer le résultat de la requête, mais en pratique, j'ai quand meme du mal.

vonc, si quelqu'un pouvait m'aiguiller pour résoudre ce problème (qui ne doit pas en être un en réalité), je lui en serais vraiment reconnaissant.

Merci


edit : au fait, moi c'est gidebo, et je ne suis pas anonyme

Bonjour,

Voici un petit lien vers un fichier XML mis à jour régulièrement qui vous permettra de réaliser facilement ce que vous avez à faire, grâce aux fonctions XML... de WinDev.

Cliquez >> ICI <<

Bon dév.,

Totof

bonjour et merci beaucoup pour le coup de main
je n'avais pas du tout pensé au xml, et il est vrai que cela simplifie pas mal les choses

Pour ceux qui cherchent comment réaliser ces conversions via internet, voici une astuce (testée et fonctionnelle) donnée par Peter en 2003 :

Tout d'abord, il faut importer un Service Soap :
http://www.webservicex.net/CurrencyConvertor.asmx?WSDL

Et ensuite, il faut simplement remplacer la procédure ConversionRate() par celle-ci :

-----------------------------------------------------------

PROCEDURE ConversionRate(FromCurrency, ToCurrency)

//Created by WD - not working
//Soap.XMLParam[1]=FromCurrency
//Soap.XMLParam[2]=ToCurrency

SOAP.Name[1]="FromCurrency"
SOAP.Type[1]=SOAPFloatType
SOAP.Value[1]=FromCurrency

SOAP.Name[2]="ToCurrency"
SOAP.Type[2]=SOAPFloatType
SOAP.Value[2]=ToCurrency
//

bRes is boolean
bRes=SOAPRun("http://www.webservicex.net/CurrencyConvertor.asmx",
"ConversionRate", "http://www.webserviceX.NET/",
"http://www.webserviceX.NET/ConversionRate")

IF NOT bRes THEN
IF SOAPError(SOAPErrMessage)~="" THEN
Error(ErrorInfo())
ELSE
Error(SOAPError(SOAPErrMessage))
END
END

RESULT SOAPGetResult(SOAPResult)

-----------------------------------------------------------

Le résultat est le taux de conversion d'une monnaie à l'autre.

Encore merci à Peter et à Totof pour leurs contributions.

Bye