Weather Airport Information Remote Service

Listing 1. Calling a remote Web Service to consume data in an ASP.NET AJAX application.

Imports System.Web
Imports System.Web.Services
Imports System.Web.Services.Protocols
Imports com.capeclear.live

Namespace XmlForAsp
    <System.Web.Script.Services.ScriptService()> _
    <WebService(Namespace:="http://www.xmlforasp.net")> _
    <WebServiceBinding(ConformsTo:=WsiProfiles.BasicProfile1_1)> _
    <Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
    Public Class WeatherService
        Inherits System.Web.Services.WebService

        <WebMethod()> _
        Public Function GetWeatherReport(ByVal code As String) _          
        As WeatherReport
            Dim proxy As New com.capeclear.live.GlobalWeatherBinding()
            Dim weather As New getWeatherReport()
            weather.code = code
            Dim report As getWeatherReportResponse = _              
            proxy.getWeatherReport(weather)
            Return report.return
        End Function

    End Class
End Namespace