MyPW Developer Resources

MyPW Example: Visual Basic

This example is based on Simon Fell's PocketXML-RPC client COM component.

Sample Code

set f = CreateObject("pocketXMLRPC.Factory")
set p = f.Proxy("https://services.mypw.com/RPC2", "auth.")

set myStruct = CreateObject("PocketXMLRPC.Struct")
myStruct.siteid = "yoursiteid"
myStruct.authkey = "yourauthkey"
myStruct.tokenid = "59334051"
myStruct.tokenvalue = "123456"

set r = p.auth (myStruct)

if r.code = 0 then
	' success!
else
	' failure :(
	msgbox (r.message)
end if

Subscribe to MyPW Developers

Email:

Visit this group

Have you created a bit of code that might be of interest to other MyPW developers? Post it on MyPW google groups.