www.pudn.com > SearchEngine.zip > Reference.vb, change:2006-08-08,size:29337b


'------------------------------------------------------------------------------ 
' <auto-generated> 
'     This code was generated by a tool. 
'     Runtime Version:2.0.50727.42 
' 
'     Changes to this file may cause incorrect behavior and will be lost if 
'     the code is regenerated. 
' </auto-generated> 
'------------------------------------------------------------------------------ 
 
Option Strict Off 
Option Explicit On 
 
Imports System 
Imports System.ComponentModel 
Imports System.Diagnostics 
Imports System.Web.Services 
Imports System.Web.Services.Protocols 
Imports System.Xml.Serialization 
 
' 
'This source code was auto-generated by Microsoft.VSDesigner, Version 2.0.50727.42. 
' 
Namespace MSN 
     
    '''<remarks/> 
    <System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "2.0.50727.42"),  _ 
     System.Diagnostics.DebuggerStepThroughAttribute(),  _ 
     System.ComponentModel.DesignerCategoryAttribute("code"),  _ 
     System.Web.Services.WebServiceBindingAttribute(Name:="MSNSearchPortBinding", [Namespace]:="http://schemas.microsoft.com/MSNSearch/2005/09/fex")>  _ 
    Partial Public Class MSNSearchService 
        Inherits System.Web.Services.Protocols.SoapHttpClientProtocol 
         
        Private SearchOperationCompleted As System.Threading.SendOrPostCallback 
         
        Private useDefaultCredentialsSetExplicitly As Boolean 
         
        '''<remarks/> 
        Public Sub New() 
            MyBase.New 
            Me.Url = Global.Search_Engine.My.MySettings.Default.Search_Engine_com_msn_search_soap_MSNSearchService 
            If (Me.IsLocalFileSystemWebService(Me.Url) = true) Then 
                Me.UseDefaultCredentials = true 
                Me.useDefaultCredentialsSetExplicitly = false 
            Else 
                Me.useDefaultCredentialsSetExplicitly = true 
            End If 
        End Sub 
         
        Public Shadows Property Url() As String 
            Get 
                Return MyBase.Url 
            End Get 
            Set 
                If (((Me.IsLocalFileSystemWebService(MyBase.Url) = true)  _ 
                            AndAlso (Me.useDefaultCredentialsSetExplicitly = false))  _ 
                            AndAlso (Me.IsLocalFileSystemWebService(value) = false)) Then 
                    MyBase.UseDefaultCredentials = false 
                End If 
                MyBase.Url = value 
            End Set 
        End Property 
         
        Public Shadows Property UseDefaultCredentials() As Boolean 
            Get 
                Return MyBase.UseDefaultCredentials 
            End Get 
            Set 
                MyBase.UseDefaultCredentials = value 
                Me.useDefaultCredentialsSetExplicitly = true 
            End Set 
        End Property 
         
        '''<remarks/> 
        Public Event SearchCompleted As SearchCompletedEventHandler 
         
        '''<remarks/> 
        <System.Web.Services.Protocols.SoapDocumentMethodAttribute("http://schemas.microsoft.com/MSNSearch/2005/09/fex/Search", RequestNamespace:="http://schemas.microsoft.com/MSNSearch/2005/09/fex", ResponseNamespace:="http://schemas.microsoft.com/MSNSearch/2005/09/fex", Use:=System.Web.Services.Description.SoapBindingUse.Literal, ParameterStyle:=System.Web.Services.Protocols.SoapParameterStyle.Wrapped)>  _ 
        Public Function Search(ByVal Request As SearchRequest) As <System.Xml.Serialization.XmlElementAttribute("Response")> SearchResponse 
            Dim results() As Object = Me.Invoke("Search", New Object() {Request}) 
            Return CType(results(0),SearchResponse) 
        End Function 
         
        '''<remarks/> 
        Public Overloads Sub SearchAsync(ByVal Request As SearchRequest) 
            Me.SearchAsync(Request, Nothing) 
        End Sub 
         
        '''<remarks/> 
        Public Overloads Sub SearchAsync(ByVal Request As SearchRequest, ByVal userState As Object) 
            If (Me.SearchOperationCompleted Is Nothing) Then 
                Me.SearchOperationCompleted = AddressOf Me.OnSearchOperationCompleted 
            End If 
            Me.InvokeAsync("Search", New Object() {Request}, Me.SearchOperationCompleted, userState) 
        End Sub 
         
        Private Sub OnSearchOperationCompleted(ByVal arg As Object) 
            If (Not (Me.SearchCompletedEvent) Is Nothing) Then 
                Dim invokeArgs As System.Web.Services.Protocols.InvokeCompletedEventArgs = CType(arg,System.Web.Services.Protocols.InvokeCompletedEventArgs) 
                RaiseEvent SearchCompleted(Me, New SearchCompletedEventArgs(invokeArgs.Results, invokeArgs.Error, invokeArgs.Cancelled, invokeArgs.UserState)) 
            End If 
        End Sub 
         
        '''<remarks/> 
        Public Shadows Sub CancelAsync(ByVal userState As Object) 
            MyBase.CancelAsync(userState) 
        End Sub 
         
        Private Function IsLocalFileSystemWebService(ByVal url As String) As Boolean 
            If ((url Is Nothing)  _ 
                        OrElse (url Is String.Empty)) Then 
                Return false 
            End If 
            Dim wsUri As System.Uri = New System.Uri(url) 
            If ((wsUri.Port >= 1024)  _ 
                        AndAlso (String.Compare(wsUri.Host, "localHost", System.StringComparison.OrdinalIgnoreCase) = 0)) Then 
                Return true 
            End If 
            Return false 
        End Function 
    End Class 
     
    '''<remarks/> 
    <System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "2.0.50727.42"),  _ 
     System.SerializableAttribute(),  _ 
     System.Diagnostics.DebuggerStepThroughAttribute(),  _ 
     System.ComponentModel.DesignerCategoryAttribute("code"),  _ 
     System.Xml.Serialization.XmlTypeAttribute([Namespace]:="http://schemas.microsoft.com/MSNSearch/2005/09/fex")>  _ 
    Partial Public Class SearchRequest 
         
        Private appIDField As String 
         
        Private queryField As String 
         
        Private cultureInfoField As String 
         
        Private safeSearchField As SafeSearchOptions 
         
        Private flagsField As SearchFlags 
         
        Private locationField As Location 
         
        Private requestsField() As SourceRequest 
         
        Public Sub New() 
            MyBase.New 
            Me.safeSearchField = SafeSearchOptions.Moderate 
            Me.flagsField = SearchFlags.None 
        End Sub 
         
        '''<remarks/> 
        Public Property AppID() As String 
            Get 
                Return Me.appIDField 
            End Get 
            Set 
                Me.appIDField = value 
            End Set 
        End Property 
         
        '''<remarks/> 
        Public Property Query() As String 
            Get 
                Return Me.queryField 
            End Get 
            Set 
                Me.queryField = value 
            End Set 
        End Property 
         
        '''<remarks/> 
        Public Property CultureInfo() As String 
            Get 
                Return Me.cultureInfoField 
            End Get 
            Set 
                Me.cultureInfoField = value 
            End Set 
        End Property 
         
        '''<remarks/> 
        Public Property SafeSearch() As SafeSearchOptions 
            Get 
                Return Me.safeSearchField 
            End Get 
            Set 
                Me.safeSearchField = value 
            End Set 
        End Property 
         
        '''<remarks/> 
        Public Property Flags() As SearchFlags 
            Get 
                Return Me.flagsField 
            End Get 
            Set 
                Me.flagsField = value 
            End Set 
        End Property 
         
        '''<remarks/> 
        Public Property Location() As Location 
            Get 
                Return Me.locationField 
            End Get 
            Set 
                Me.locationField = value 
            End Set 
        End Property 
         
        '''<remarks/> 
        <System.Xml.Serialization.XmlArrayItemAttribute(IsNullable:=false)>  _ 
        Public Property Requests() As SourceRequest() 
            Get 
                Return Me.requestsField 
            End Get 
            Set 
                Me.requestsField = value 
            End Set 
        End Property 
    End Class 
     
    '''<remarks/> 
    <System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "2.0.50727.42"),  _ 
     System.SerializableAttribute(),  _ 
     System.Xml.Serialization.XmlTypeAttribute([Namespace]:="http://schemas.microsoft.com/MSNSearch/2005/09/fex")>  _ 
    Public Enum SafeSearchOptions 
         
        '''<remarks/> 
        Moderate 
         
        '''<remarks/> 
        Strict 
         
        '''<remarks/> 
        Off 
    End Enum 
     
    '''<remarks/> 
    <System.FlagsAttribute(),  _ 
     System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "2.0.50727.42"),  _ 
     System.SerializableAttribute(),  _ 
     System.Xml.Serialization.XmlTypeAttribute([Namespace]:="http://schemas.microsoft.com/MSNSearch/2005/09/fex")>  _ 
    Public Enum SearchFlags 
         
        '''<remarks/> 
        None = 1 
         
        '''<remarks/> 
        MarkQueryWords = 2 
         
        '''<remarks/> 
        DisableSpellCorrectForSpecialWords = 4 
         
        '''<remarks/> 
        DisableHostCollapsing = 8 
    End Enum 
     
    '''<remarks/> 
    <System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "2.0.50727.42"),  _ 
     System.SerializableAttribute(),  _ 
     System.Diagnostics.DebuggerStepThroughAttribute(),  _ 
     System.ComponentModel.DesignerCategoryAttribute("code"),  _ 
     System.Xml.Serialization.XmlTypeAttribute([Namespace]:="http://schemas.microsoft.com/MSNSearch/2005/09/fex")>  _ 
    Partial Public Class Location 
         
        Private latitudeField As Double 
         
        Private longitudeField As Double 
         
        Private radiusField As Double 
         
        Public Sub New() 
            MyBase.New 
            Me.radiusField = 5 
        End Sub 
         
        '''<remarks/> 
        Public Property Latitude() As Double 
            Get 
                Return Me.latitudeField 
            End Get 
            Set 
                Me.latitudeField = value 
            End Set 
        End Property 
         
        '''<remarks/> 
        Public Property Longitude() As Double 
            Get 
                Return Me.longitudeField 
            End Get 
            Set 
                Me.longitudeField = value 
            End Set 
        End Property 
         
        '''<remarks/> 
        <System.ComponentModel.DefaultValueAttribute(5)>  _ 
        Public Property Radius() As Double 
            Get 
                Return Me.radiusField 
            End Get 
            Set 
                Me.radiusField = value 
            End Set 
        End Property 
    End Class 
     
    '''<remarks/> 
    <System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "2.0.50727.42"),  _ 
     System.SerializableAttribute(),  _ 
     System.Diagnostics.DebuggerStepThroughAttribute(),  _ 
     System.ComponentModel.DesignerCategoryAttribute("code"),  _ 
     System.Xml.Serialization.XmlTypeAttribute([Namespace]:="http://schemas.microsoft.com/MSNSearch/2005/09/fex")>  _ 
    Partial Public Class SearchTag 
         
        Private nameField As String 
         
        Private valueField As String 
         
        '''<remarks/> 
        Public Property Name() As String 
            Get 
                Return Me.nameField 
            End Get 
            Set 
                Me.nameField = value 
            End Set 
        End Property 
         
        '''<remarks/> 
        Public Property Value() As String 
            Get 
                Return Me.valueField 
            End Get 
            Set 
                Me.valueField = value 
            End Set 
        End Property 
    End Class 
     
    '''<remarks/> 
    <System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "2.0.50727.42"),  _ 
     System.SerializableAttribute(),  _ 
     System.Diagnostics.DebuggerStepThroughAttribute(),  _ 
     System.ComponentModel.DesignerCategoryAttribute("code"),  _ 
     System.Xml.Serialization.XmlTypeAttribute([Namespace]:="http://schemas.microsoft.com/MSNSearch/2005/09/fex")>  _ 
    Partial Public Class Address 
         
        Private addressLineField As String 
         
        Private primaryCityField As String 
         
        Private secondaryCityField As String 
         
        Private subdivisionField As String 
         
        Private postalCodeField As String 
         
        Private countryRegionField As String 
         
        Private formattedAddressField As String 
         
        '''<remarks/> 
        Public Property AddressLine() As String 
            Get 
                Return Me.addressLineField 
            End Get 
            Set 
                Me.addressLineField = value 
            End Set 
        End Property 
         
        '''<remarks/> 
        Public Property PrimaryCity() As String 
            Get 
                Return Me.primaryCityField 
            End Get 
            Set 
                Me.primaryCityField = value 
            End Set 
        End Property 
         
        '''<remarks/> 
        Public Property SecondaryCity() As String 
            Get 
                Return Me.secondaryCityField 
            End Get 
            Set 
                Me.secondaryCityField = value 
            End Set 
        End Property 
         
        '''<remarks/> 
        Public Property Subdivision() As String 
            Get 
                Return Me.subdivisionField 
            End Get 
            Set 
                Me.subdivisionField = value 
            End Set 
        End Property 
         
        '''<remarks/> 
        Public Property PostalCode() As String 
            Get 
                Return Me.postalCodeField 
            End Get 
            Set 
                Me.postalCodeField = value 
            End Set 
        End Property 
         
        '''<remarks/> 
        Public Property CountryRegion() As String 
            Get 
                Return Me.countryRegionField 
            End Get 
            Set 
                Me.countryRegionField = value 
            End Set 
        End Property 
         
        '''<remarks/> 
        Public Property FormattedAddress() As String 
            Get 
                Return Me.formattedAddressField 
            End Get 
            Set 
                Me.formattedAddressField = value 
            End Set 
        End Property 
    End Class 
     
    '''<remarks/> 
    <System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "2.0.50727.42"),  _ 
     System.SerializableAttribute(),  _ 
     System.Diagnostics.DebuggerStepThroughAttribute(),  _ 
     System.ComponentModel.DesignerCategoryAttribute("code"),  _ 
     System.Xml.Serialization.XmlTypeAttribute([Namespace]:="http://schemas.microsoft.com/MSNSearch/2005/09/fex")>  _ 
    Partial Public Class DateTime 
         
        Private yearField As Integer 
         
        Private monthField As Integer 
         
        Private dayField As Integer 
         
        Private hourField As Integer 
         
        Private minuteField As Integer 
         
        Private secondField As Integer 
         
        '''<remarks/> 
        Public Property Year() As Integer 
            Get 
                Return Me.yearField 
            End Get 
            Set 
                Me.yearField = value 
            End Set 
        End Property 
         
        '''<remarks/> 
        Public Property Month() As Integer 
            Get 
                Return Me.monthField 
            End Get 
            Set 
                Me.monthField = value 
            End Set 
        End Property 
         
        '''<remarks/> 
        Public Property Day() As Integer 
            Get 
                Return Me.dayField 
            End Get 
            Set 
                Me.dayField = value 
            End Set 
        End Property 
         
        '''<remarks/> 
        Public Property Hour() As Integer 
            Get 
                Return Me.hourField 
            End Get 
            Set 
                Me.hourField = value 
            End Set 
        End Property 
         
        '''<remarks/> 
        Public Property Minute() As Integer 
            Get 
                Return Me.minuteField 
            End Get 
            Set 
                Me.minuteField = value 
            End Set 
        End Property 
         
        '''<remarks/> 
        Public Property Second() As Integer 
            Get 
                Return Me.secondField 
            End Get 
            Set 
                Me.secondField = value 
            End Set 
        End Property 
    End Class 
     
    '''<remarks/> 
    <System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "2.0.50727.42"),  _ 
     System.SerializableAttribute(),  _ 
     System.Diagnostics.DebuggerStepThroughAttribute(),  _ 
     System.ComponentModel.DesignerCategoryAttribute("code"),  _ 
     System.Xml.Serialization.XmlTypeAttribute([Namespace]:="http://schemas.microsoft.com/MSNSearch/2005/09/fex")>  _ 
    Partial Public Class Result 
         
        Private titleField As String 
         
        Private descriptionField As String 
         
        Private urlField As String 
         
        Private displayUrlField As String 
         
        Private cacheUrlField As String 
         
        Private sourceField As String 
         
        Private searchTagsField As String 
         
        Private phoneField As String 
         
        Private dateTimeField As DateTime 
         
        Private addressField As Address 
         
        Private locationField As Location 
         
        Private searchTagsArrayField() As SearchTag 
         
        Private summaryField As String 
         
        '''<remarks/> 
        Public Property Title() As String 
            Get 
                Return Me.titleField 
            End Get 
            Set 
                Me.titleField = value 
            End Set 
        End Property 
         
        '''<remarks/> 
        Public Property Description() As String 
            Get 
                Return Me.descriptionField 
            End Get 
            Set 
                Me.descriptionField = value 
            End Set 
        End Property 
         
        '''<remarks/> 
        Public Property Url() As String 
            Get 
                Return Me.urlField 
            End Get 
            Set 
                Me.urlField = value 
            End Set 
        End Property 
         
        '''<remarks/> 
        Public Property DisplayUrl() As String 
            Get 
                Return Me.displayUrlField 
            End Get 
            Set 
                Me.displayUrlField = value 
            End Set 
        End Property 
         
        '''<remarks/> 
        Public Property CacheUrl() As String 
            Get 
                Return Me.cacheUrlField 
            End Get 
            Set 
                Me.cacheUrlField = value 
            End Set 
        End Property 
         
        '''<remarks/> 
        Public Property Source() As String 
            Get 
                Return Me.sourceField 
            End Get 
            Set 
                Me.sourceField = value 
            End Set 
        End Property 
         
        '''<remarks/> 
        Public Property SearchTags() As String 
            Get 
                Return Me.searchTagsField 
            End Get 
            Set 
                Me.searchTagsField = value 
            End Set 
        End Property 
         
        '''<remarks/> 
        Public Property Phone() As String 
            Get 
                Return Me.phoneField 
            End Get 
            Set 
                Me.phoneField = value 
            End Set 
        End Property 
         
        '''<remarks/> 
        Public Property DateTime() As DateTime 
            Get 
                Return Me.dateTimeField 
            End Get 
            Set 
                Me.dateTimeField = value 
            End Set 
        End Property 
         
        '''<remarks/> 
        Public Property Address() As Address 
            Get 
                Return Me.addressField 
            End Get 
            Set 
                Me.addressField = value 
            End Set 
        End Property 
         
        '''<remarks/> 
        Public Property Location() As Location 
            Get 
                Return Me.locationField 
            End Get 
            Set 
                Me.locationField = value 
            End Set 
        End Property 
         
        '''<remarks/> 
        <System.Xml.Serialization.XmlArrayItemAttribute(IsNullable:=false)>  _ 
        Public Property SearchTagsArray() As SearchTag() 
            Get 
                Return Me.searchTagsArrayField 
            End Get 
            Set 
                Me.searchTagsArrayField = value 
            End Set 
        End Property 
         
        '''<remarks/> 
        Public Property Summary() As String 
            Get 
                Return Me.summaryField 
            End Get 
            Set 
                Me.summaryField = value 
            End Set 
        End Property 
    End Class 
     
    '''<remarks/> 
    <System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "2.0.50727.42"),  _ 
     System.SerializableAttribute(),  _ 
     System.Diagnostics.DebuggerStepThroughAttribute(),  _ 
     System.ComponentModel.DesignerCategoryAttribute("code"),  _ 
     System.Xml.Serialization.XmlTypeAttribute([Namespace]:="http://schemas.microsoft.com/MSNSearch/2005/09/fex")>  _ 
    Partial Public Class SourceResponse 
         
        Private sourceField As SourceType 
         
        Private offsetField As Integer 
         
        Private totalField As Integer 
         
        Private resultsField() As Result 
         
        '''<remarks/> 
        Public Property Source() As SourceType 
            Get 
                Return Me.sourceField 
            End Get 
            Set 
                Me.sourceField = value 
            End Set 
        End Property 
         
        '''<remarks/> 
        Public Property Offset() As Integer 
            Get 
                Return Me.offsetField 
            End Get 
            Set 
                Me.offsetField = value 
            End Set 
        End Property 
         
        '''<remarks/> 
        Public Property Total() As Integer 
            Get 
                Return Me.totalField 
            End Get 
            Set 
                Me.totalField = value 
            End Set 
        End Property 
         
        '''<remarks/> 
        <System.Xml.Serialization.XmlArrayItemAttribute(IsNullable:=false)>  _ 
        Public Property Results() As Result() 
            Get 
                Return Me.resultsField 
            End Get 
            Set 
                Me.resultsField = value 
            End Set 
        End Property 
    End Class 
     
    '''<remarks/> 
    <System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "2.0.50727.42"),  _ 
     System.SerializableAttribute(),  _ 
     System.Xml.Serialization.XmlTypeAttribute([Namespace]:="http://schemas.microsoft.com/MSNSearch/2005/09/fex")>  _ 
    Public Enum SourceType 
         
        '''<remarks/> 
        Web 
         
        '''<remarks/> 
        News 
         
        '''<remarks/> 
        Ads 
         
        '''<remarks/> 
        InlineAnswers 
         
        '''<remarks/> 
        PhoneBook 
         
        '''<remarks/> 
        WordBreaker 
         
        '''<remarks/> 
        Spelling 
    End Enum 
     
    '''<remarks/> 
    <System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "2.0.50727.42"),  _ 
     System.SerializableAttribute(),  _ 
     System.Diagnostics.DebuggerStepThroughAttribute(),  _ 
     System.ComponentModel.DesignerCategoryAttribute("code"),  _ 
     System.Xml.Serialization.XmlTypeAttribute([Namespace]:="http://schemas.microsoft.com/MSNSearch/2005/09/fex")>  _ 
    Partial Public Class SearchResponse 
         
        Private responsesField() As SourceResponse 
         
        '''<remarks/> 
        <System.Xml.Serialization.XmlArrayItemAttribute(IsNullable:=false)>  _ 
        Public Property Responses() As SourceResponse() 
            Get 
                Return Me.responsesField 
            End Get 
            Set 
                Me.responsesField = value 
            End Set 
        End Property 
    End Class 
     
    '''<remarks/> 
    <System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "2.0.50727.42"),  _ 
     System.SerializableAttribute(),  _ 
     System.Diagnostics.DebuggerStepThroughAttribute(),  _ 
     System.ComponentModel.DesignerCategoryAttribute("code"),  _ 
     System.Xml.Serialization.XmlTypeAttribute([Namespace]:="http://schemas.microsoft.com/MSNSearch/2005/09/fex")>  _ 
    Partial Public Class SourceRequest 
         
        Private sourceField As SourceType 
         
        Private offsetField As Integer 
         
        Private countField As Integer 
         
        Private resultFieldsField As ResultFieldMask 
         
        Public Sub New() 
            MyBase.New 
            Me.sourceField = SourceType.Web 
            Me.offsetField = 0 
            Me.countField = 10 
            Me.resultFieldsField = ((ResultFieldMask.Title Or ResultFieldMask.Description)  _ 
                        Or ResultFieldMask.Url) 
        End Sub 
         
        '''<remarks/> 
        Public Property Source() As SourceType 
            Get 
                Return Me.sourceField 
            End Get 
            Set 
                Me.sourceField = value 
            End Set 
        End Property 
         
        '''<remarks/> 
        Public Property Offset() As Integer 
            Get 
                Return Me.offsetField 
            End Get 
            Set 
                Me.offsetField = value 
            End Set 
        End Property 
         
        '''<remarks/> 
        Public Property Count() As Integer 
            Get 
                Return Me.countField 
            End Get 
            Set 
                Me.countField = value 
            End Set 
        End Property 
         
        '''<remarks/> 
        Public Property ResultFields() As ResultFieldMask 
            Get 
                Return Me.resultFieldsField 
            End Get 
            Set 
                Me.resultFieldsField = value 
            End Set 
        End Property 
    End Class 
     
    '''<remarks/> 
    <System.FlagsAttribute(),  _ 
     System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "2.0.50727.42"),  _ 
     System.SerializableAttribute(),  _ 
     System.Xml.Serialization.XmlTypeAttribute([Namespace]:="http://schemas.microsoft.com/MSNSearch/2005/09/fex")>  _ 
    Public Enum ResultFieldMask 
         
        '''<remarks/> 
        All = 1 
         
        '''<remarks/> 
        Title = 2 
         
        '''<remarks/> 
        Description = 4 
         
        '''<remarks/> 
        Url = 8 
         
        '''<remarks/> 
        DisplayUrl = 16 
         
        '''<remarks/> 
        CacheUrl = 32 
         
        '''<remarks/> 
        Source = 64 
         
        '''<remarks/> 
        SearchTags = 128 
         
        '''<remarks/> 
        Phone = 256 
         
        '''<remarks/> 
        DateTime = 512 
         
        '''<remarks/> 
        Address = 1024 
         
        '''<remarks/> 
        Location = 2048 
         
        '''<remarks/> 
        SearchTagsArray = 4096 
         
        '''<remarks/> 
        Summary = 8192 
    End Enum 
     
    '''<remarks/> 
    <System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "2.0.50727.42")>  _ 
    Public Delegate Sub SearchCompletedEventHandler(ByVal sender As Object, ByVal e As SearchCompletedEventArgs) 
     
    '''<remarks/> 
    <System.CodeDom.Compiler.GeneratedCodeAttribute("System.Web.Services", "2.0.50727.42"),  _ 
     System.Diagnostics.DebuggerStepThroughAttribute(),  _ 
     System.ComponentModel.DesignerCategoryAttribute("code")>  _ 
    Partial Public Class SearchCompletedEventArgs 
        Inherits System.ComponentModel.AsyncCompletedEventArgs 
         
        Private results() As Object 
         
        Friend Sub New(ByVal results() As Object, ByVal exception As System.Exception, ByVal cancelled As Boolean, ByVal userState As Object) 
            MyBase.New(exception, cancelled, userState) 
            Me.results = results 
        End Sub 
         
        '''<remarks/> 
        Public ReadOnly Property Result() As SearchResponse 
            Get 
                Me.RaiseExceptionIfNecessary 
                Return CType(Me.results(0),SearchResponse) 
            End Get 
        End Property 
    End Class 
End Namespace