Hi,
After investigating the Source of xmlrpc i thought i know how to use it...
Everything work so far, but the last Step does not work.
The line: myStruc.Value(a) has to return the result, but instead of giving
back an int i get an RpcStruct again and again.
The sample does not much useful, but when it ends it throws the following
Errors to the Console:
WARNING: circular references detected
RpcStruct (1)
WARNING: 9 allocation(s) non freed.
Is there any additional Documentation i missed?
PUBLIC SUB Main()
DIM RpcF AS RpcFunction
DIM myStruc AS RpcStruct
DIM client AS RpcClient
DIM hVar AS NEW Variant[]
DIM ret AS Variant
DIM a AS Integer
DIM name AS String
DIM dType AS Integer
a = 0
RpcF = NEW RpcFunction("sample.sumAndDifference", [XmlRpc.xInteger,
XmlRpc.xInteger], XmlRpc.xStruct)
client = NEW RpcClient(RpcF)
client.URL = "http://xmlrpc-c.sourceforge.net/api/sample.php";
hVar.Add(5)
hVar.Add(3)
myStruc = client.Call(hVar)
DO WHILE a < myStruc.Count
name = myStruc.Key(a)
dType = myStruc.dataType(a)
ret = myStruc.Value(a)
INC a
LOOP
END
--
http://www.afaik.de/usenet/faq/zitieren/
BOFH excuse #335:
the AA battery in the wallclock sends magnetic interference
-------------------------------------------------------------------------
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=/
_______________________________________________
Gambas-user mailing list
Gambas-user@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/gambas-user
