Luiz,
I can not test, because even the VBScript sample fails, with a
"Failed to resolve server name" error. Please forward a functioning
sample.
Ron
On Aug 5, 2008, at 5:09 AM, Luiz Rafael Culik Guimaraes wrote:
> Ron
>
>
> VBS
>
> dim e
> set e = CreateObject("PocketSOAP.Envelope.2")
>
> e.methodName = "getQuote"
> e.URI = "urn:xmethods-delayed-quotes"
>
> e.Parameters.Create "symbol", "MSFT"
>
> dim t
> set t = CreateObject("PocketSOAP.HTTPTransport.2")
> t.SOAPAction = ""
> t.Send "http://services.xmethods.net/soap";, e.serialize
> e.parse t
>
> wscript.echo "Stock quote for MSFT = " & e.parameters.item(0).Value
>
> xharbour
>
> func main
> Local searchRes
> Local encode:="",ret
>
> Local e,t,res,env
> altd()
> e := CreateObject("PocketSOAP.Envelope.2")
>
> e:methodName = "getQuote"
> e:URI = "urn:xmethods-delayed-quotes"
>
> e:Parameters:Create( "symbol", "MSFT")
>
>
> t := CreateObject("PocketSOAP.HTTPTransport")
> t:SOAPAction("")
> env:= e:serialize
> t:Send( "http://services.xmethods.net/soap";, env)
> e:parse(t)
>
> ?"stock = " + e:parameters:item(0):Value
>
> regards
> Luiz
>
> ----------------------------------------------------------------------
> ---
> This SF.Net email is sponsored by the Moblin Your Move Developer's
> challenge
> Build the coolest Linux based applications with Moblin SDK & win
> great prizes
> Grand prize is a trip for two to an Open Source event anywhere in
> the world
> http://moblin-contest.org/redirect.php?banner_id=100&url=/
> _______________________________________________
> xHarbour-developers mailing list
> [email protected]
> https://lists.sourceforge.net/lists/listinfo/xharbour-developers
>
-------------------------------------------------------------------------
This SF.Net email is sponsored by the Moblin Your Move Developer's challenge
Build the coolest Linux based applications with Moblin SDK & win great prizes
Grand prize is a trip for two to an Open Source event anywhere in the world
http://moblin-contest.org/redirect.php?banner_id=100&url=/
_______________________________________________
xHarbour-developers mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/xharbour-developers
