VB.NET で Web サービスを作成する - TechRepublic

トピック — プロジェクト管理

出版2007年10月4日

VB.NETでは、クライアントとサーバー間のマーシャリングの大部分がバックグラウンドで行われるため、Webサービスを完全にローカルオブジェクトのように使用できます。このヒントでは、シンプルなWebサービスの作成方法を説明します。

Webサービス技術は、HTTP、Simple Object Access Protocol（SOAP）、およびXMLに基づいています。Webサービスはオープンスタンダードを採用しているため、Webサービスの呼び出しは非常に簡単です。

例

Webサービスを作成し、現在のマシンのIPアドレスを返すWeb関数を追加します。Webサービスの作成手順は以下のとおりです。

Visual Studio.Net を開き、VB.NET の下にある [新しい Web サイトの作成] を選択します。
リストされたオプションから Web サービスを選択します。
コードウィンドウが開いたら、次のコードを追加します。

<Webメソッド()> _
       パブリック関数 GetMachineIPAddress() を文字列として
        Dim strHostName As String = ""
        Dim strIPAddress As String = ""
        System.Net.IPHostEntry のホストを暗くする
        strHostName = System.Net.Dns.GetHostName()
        strIPAddress = System.Net.Dns.GetHostEntry(strHostName).HostName.ToString()
        ホスト = System.Net.Dns.GetHostEntry(strHostName)
        Dim ip As System.Net.IPAddress
        host.AddressList内の各IPについて
            ip.ToString() を返す
        次
        戻る ""
    終了関数

例をデバッグすると、図Aのような画面が表示されます。
図A

利用可能なWebメソッドが2つ表示されます。生成されたメソッド（HelloWorld）と私が作成したメソッド（GetMachineIPAddress）です。GetMachineIPAddressのリンクをクリックすると、このメソッドに関する詳細情報と呼び出し方法を確認できる画面が表示されます（図B）。
図B

「Invoke」ボタンをクリックすると、結果は図Cのようになります。
図C