Jump to content
View in the app

A better way to browse. Learn more.

FMForums.com

A full-screen app on your home screen with push notifications, badges and more.

To install this app on iOS and iPadOS
  1. Tap the Share icon in Safari
  2. Scroll the menu and tap Add to Home Screen.
  3. Tap Add in the top-right corner.
To install this app on Android
  1. Tap the 3-dot menu (⋮) in the top-right corner of the browser.
  2. Tap Add to Home screen or Install app.
  3. Confirm by tapping Install.

Sample VB.NET Code for 360Works Web services manager

Featured Replies

  • Newbies

Does anyone have, or willing to write a few lines of code, to demonstrate how to consume the sample 360works addtwonumbers and dividetwonumbers web services using Microsoft VB.NET?

It would be a great help to a lot of people to get it working.

Edited by Guest

  • Author
  • Newbies

 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        Dim value1 As String

        Dim value2 As String

        Dim result As String

        Dim objWS As New acornTest.AddTwoNumbersRequest



        value1 = txt1.Text

        value2 = txt2.Text



        objWS.Addend1 = value1

        objWS.Addend2 = value2



        result = objWS.Equals(objWS)

        txtResult.Text = result.ToString



    End Sub

Ive got as far as the above, but the web service is just returning true or false, where have I gone wrong and how can I get it to return the result from the web service to a variable?

  • Author
  • Newbies

Help!

I can get the web service to return true or false.

but the bit im stuck with is getting the Output Value!

  • Author
  • Newbies

Here is the code! very simple, I was just over complicating matters.

Firstly create a web service reference inside visual studio and input the wsdl of the webservice.

The code to consume and use the addtwonumbers sample web service is as follows:-

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        Dim value1 As String = txt1.Text

        Dim value2 As String = txt2.Text



        Dim wsResult As Object = ws.AddTwoNumbers(value1, value2)

        txtResult.Text = wsResult.OutputValue





    End Sub

Create an account or sign in to comment

Important Information

By using this site, you agree to our Terms of Use.

Configure browser push notifications

Chrome (Android)
  1. Tap the lock icon next to the address bar.
  2. Tap Permissions → Notifications.
  3. Adjust your preference.
Chrome (Desktop)
  1. Click the padlock icon in the address bar.
  2. Select Site settings.
  3. Find Notifications and adjust your preference.