' This assume the Web reference has been added in the project under this name Dim loUT As UniversalThread.UniversalThread = New UniversalThread.UniversalThread Dim llLogged AS Boolean Dim lcXML As String ' Create the cookie container loUT.CookieContainer = New System.Net.CookieContainer ' Do the login and just show the status llLogged = loUT.Login("myusername", "mypassword") If llLogged Then MessageBox.Show("Login successfull!") Else MessageBox.Show("Login failed!") End If ' Call a method as an example to retrieve the latest .NET news for the last 15 days lcXML = loUT.GetNews(DateAdd("d", -15, Date.Today), Date.Today(), 44) ' Just show the XML string that was returned MessageBox.Show(lcXML)
* Create the SOAP object loUniversalThread=Createobject("mssoap.soapclient30") loUniversalThread.mssoapinit("http://www.universalthread.com/WebService/ universalthread.asmx?WSDL") lcUsername='something' lcPassword='something' * Do the login loUniversalThread.Login(lcUsername,lcPassword) * Call a method * Get the message for one day lcXML=loUniversalThread.GetMessage(DATE(),5)