>loUniversalThread=Createobject("mssoap.soapclient30") >loUniversalThread.mssoapinit("http://www.levelextreme.com/WebService/universalthread.asmx?WSDL") >loUniversalThread.Login(lcUsername,lcPassword) >lcXML=loUniversalThread.GetMessage(DATE(),5) >XMLTOCURSOR(lcXML,'temp') >I can't get your code to work. It fails at the GetMessage(). Does the following work for you? It also fails at the GetMessage()
* Create the SOAP object loUniversalThread=Createobject("mssoap.soapclient30") loUniversalThread.mssoapinit("http://www.levelextreme.com/WebService/universalthread.asmx?WSDL") lcUsername=INPUTBOX("Username:","Enter a Username") IF !EMPTY(lcUsername) lcPassword=INPUTBOX("Password:","Enter a Password") ENDIF IF !EMPTY(lcUsername) AND !EMPTY(lcPassword) IF loUniversalThread.Login(lcUsername,lcPassword) lcXML=loUniversalThread.GetMessage(DATE(),5) XMLTOCURSOR(lcXML, "csrMsg") SELECT csrMsg BROWSE NORMAL ENDIF ENDIF