【VB.NET】SOAP通信するサービスを作成してみる

概要

SOAP通信を行い情報を返却する簡単なサービスの作り方を画像付きで紹介します。

おおまかな作業の流れは下記の通りです。

プロジェクト作成
Webサービスメソッド作成
実行してみる

非常に簡単なのでさっそくやってみましょう。

プロジェクトを作成する

ASP.NET Web アプリケーションプロジェクトを作成します。

プロジェクトの設定は画像のように指定します。

出来上がったソリューションとプロジェクトはこんな感じです。

プロジェクト→追加→新しい項目を選択

Webサービス（ASMX）を選択

こんな感じのソースが自動作成されます。

Imports System.Web.Services
Imports System.Web.Services.Protocols
Imports System.ComponentModel

' この Web サービスを、スクリプトから ASP.NET AJAX を使用して呼び出せるようにするには、次の行のコメントを解除します。
' <System.Web.Script.Services.ScriptService()> _
<System.Web.Services.WebService(Namespace:="http://tempuri.org/")> _
<System.Web.Services.WebServiceBinding(ConformsTo:=WsiProfiles.BasicProfile1_1)> _
<ToolboxItem(False)> _
Public Class WebService1
    Inherits System.Web.Services.WebService

    <WebMethod()> _
    Public Function HelloWorld() As String
        Return "Hello World"
    End Function

End Class

HelloWorld()という引数を持たず、”Hello World”という文字列を返すWebメソッドが作成されています。

このまま起動します。

起動したことが確認出来ました。

実際にWebServiceを呼び出してみます

サービス名をクリック

起動ボタンをクリック

HelloWorld　の文字列が返却されました。

WebServiceを追加してみる

これだけでは寂しいのでサービスを追加してみます。

起動を止めてからWebService1.asmx.vb にコードを追加します。

    <WebMethod()>
    Public Function Calc(input1 As Integer, input2 As Integer) As String
        Return (input1 + input2).ToString
    End Function

再起動します。

WebServiceが追加されました。

呼び出してみます。

上手くいったようです。