通过

如何：异步调用 Web 服务 (Visual Basic)

  • 项目

此示例在 Web 服务的异步处理程序事件中附加了一个处理程序，以便它能检索异步方法调用的结果。 此示例使用了 DemoTemperatureService Web 服务（位于 http://www.xmethods.net）。

在 Visual Studio 集成开发环境 (IDE) 中引用项目中的 Web 服务时，该服务将添加到 My.WebServices 对象中，且 IDE 将生成一个客户端代理类来访问指定的 Web 服务

使用此代理类可以同步调用 Web 服务方法，而应用程序则在 Web 服务方法内等待函数执行完成。 另外，代理还创建其他成员来协助异步调用方法。 对于每一个 Web 服务函数（NameOfWebServiceFunction），代理都会创建一个 NameOfWebServiceFunctionAsync 子例程、一个 NameOfWebServiceFunctionCompleted 事件和一个 NameOfWebServiceFunctionCompletedEventArgs 类。 此示例演示如何使用异步成员访问 DemoTemperatureService Web 服务的 getTemp 函数。

注意

因为 ASP.NET 不支持 My.WebServices 对象，所以这段代码不适用于 Web 应用程序。

以异步方式调用 Web 服务

  1. 引用 DemoTemperatureService Web 服务（位于 http://www.xmethods.net）。 网址为

    http://www.xmethods.net/sd/2001/DemoTemperatureService.wsdl

  2. 为 getTempCompleted 事件添加事件处理程序：

    Private Sub getTempCompletedHandler(ByVal sender As Object,
    ByVal e As net.xmethods.www.getTempCompletedEventArgs)

    MsgBox("Temperature: " & e.Result)
End Sub

    注意

    不能使用 Handles 语句将事件处理程序与 My.WebServices 对象的事件关联起来。

  3. 如果已将事件处理程序添加到 getTempCompleted 事件，则添加要跟踪的字段：

    Private handlerAttached As Boolean = False

  4. 添加一个方法，以将事件处理程序添加到 getTempCompleted 事件（如有必要）并调用 getTempAsync 方法：

    Sub CallGetTempAsync(ByVal zipCode As Integer)
    If Not handlerAttached Then
        AddHandler My.WebServices.
            TemperatureService.getTempCompleted,
            AddressOf Me.TS_getTempCompleted
        handlerAttached = True
    End If
    My.WebServices.TemperatureService.getTempAsync(zipCode)
End Sub

    若要以异步方式调用 getTemp Web 方法，请调用 CallGetTempAsync 方法。 当 Web 方法执行完成后，其返回值将被传递到 getTempCompletedHandler 事件处理程序。

另请参阅