QA@IT

VB.NET HTTP ステータスコードを取得する方法

2187 PV

VS2012 VB.NET でWSDLファイルを「サービス参照の追加」で読み込み、プロキシクラスを自動生成して
SOAP通信を試みようとしております。

商品名取得時のレスポンスのHTTPステータスコードを取得するためには、
どのように実装すればよろしいでしょうか?
ご教授願います!

    Private Function SEND_DATA() As Boolean

        Dim objSerializer As XmlSerializer

        Dim objClient As ServiceReference1.TestServiceClient

        '引数設定
        Dim objPrm As New ServiceReference1.TEST_PARAM
        Dim objRequest As ServiceReference1.Test_Request
        Dim objResponse As ServiceReference1.Test_Response

        Try

            objClient = New ServiceReference1.TestServiceClient()

            '商品コード
            objPrm.PRODUCT_CD = "A0001"

            'Request作成
            objRequest = New ServiceReference1.Test_Request()
            objRequest.PARAM = objPrm

            '送信処理
            Try
                '商品名取得
                objResponse = CType(objClient, ServiceReference1.TestService).GET_NAME(objRequest)

            Catch ex As System.ServiceModel.FaultException
                Return RetCode.NG
            End Try

            Return True

        Catch ex As Exception
            Return RetCode.NG
        Finally
        End Try

    End Function
ウォッチ

この質問への回答やコメントをメールでお知らせします。