?? reference.vb
字號:
Dim invokeArgs As System.Web.Services.Protocols.InvokeCompletedEventArgs = CType(arg,System.Web.Services.Protocols.InvokeCompletedEventArgs)
RaiseEvent NavigateBookmarkCompleted(Me, New NavigateBookmarkCompletedEventArgs(invokeArgs.Results, invokeArgs.Error, invokeArgs.Cancelled, invokeArgs.UserState))
End If
End Sub
'''<remarks/>
<System.Web.Services.Protocols.SoapHeaderAttribute("ServerInfoHeaderValue", Direction:=System.Web.Services.Protocols.SoapHeaderDirection.Out), _
System.Web.Services.Protocols.SoapHeaderAttribute("ExecutionHeaderValue"), _
System.Web.Services.Protocols.SoapHeaderAttribute("TrustedUserHeaderValue"), _
System.Web.Services.Protocols.SoapDocumentMethodAttribute("http://schemas.microsoft.com/sqlserver/2005/06/30/reporting/reportingservices/Fin"& _
"dString", RequestNamespace:="http://schemas.microsoft.com/sqlserver/2005/06/30/reporting/reportingservices", ResponseNamespace:="http://schemas.microsoft.com/sqlserver/2005/06/30/reporting/reportingservices", Use:=System.Web.Services.Description.SoapBindingUse.Literal, ParameterStyle:=System.Web.Services.Protocols.SoapParameterStyle.Wrapped)> _
Public Function FindString(ByVal StartPage As Integer, ByVal EndPage As Integer, ByVal FindValue As String) As <System.Xml.Serialization.XmlElementAttribute("PageNumber")> Integer
Dim results() As Object = Me.Invoke("FindString", New Object() {StartPage, EndPage, FindValue})
Return CType(results(0),Integer)
End Function
'''<remarks/>
Public Overloads Sub FindStringAsync(ByVal StartPage As Integer, ByVal EndPage As Integer, ByVal FindValue As String)
Me.FindStringAsync(StartPage, EndPage, FindValue, Nothing)
End Sub
'''<remarks/>
Public Overloads Sub FindStringAsync(ByVal StartPage As Integer, ByVal EndPage As Integer, ByVal FindValue As String, ByVal userState As Object)
If (Me.FindStringOperationCompleted Is Nothing) Then
Me.FindStringOperationCompleted = AddressOf Me.OnFindStringOperationCompleted
End If
Me.InvokeAsync("FindString", New Object() {StartPage, EndPage, FindValue}, Me.FindStringOperationCompleted, userState)
End Sub
Private Sub OnFindStringOperationCompleted(ByVal arg As Object)
If (Not (Me.FindStringCompletedEvent) Is Nothing) Then
Dim invokeArgs As System.Web.Services.Protocols.InvokeCompletedEventArgs = CType(arg,System.Web.Services.Protocols.InvokeCompletedEventArgs)
RaiseEvent FindStringCompleted(Me, New FindStringCompletedEventArgs(invokeArgs.Results, invokeArgs.Error, invokeArgs.Cancelled, invokeArgs.UserState))
End If
End Sub
'''<remarks/>
<System.Web.Services.Protocols.SoapHeaderAttribute("ServerInfoHeaderValue", Direction:=System.Web.Services.Protocols.SoapHeaderDirection.Out), _
System.Web.Services.Protocols.SoapHeaderAttribute("ExecutionHeaderValue"), _
System.Web.Services.Protocols.SoapHeaderAttribute("TrustedUserHeaderValue"), _
System.Web.Services.Protocols.SoapDocumentMethodAttribute("http://schemas.microsoft.com/sqlserver/2005/06/30/reporting/reportingservices/Sor"& _
"t", RequestNamespace:="http://schemas.microsoft.com/sqlserver/2005/06/30/reporting/reportingservices", ResponseNamespace:="http://schemas.microsoft.com/sqlserver/2005/06/30/reporting/reportingservices", Use:=System.Web.Services.Description.SoapBindingUse.Literal, ParameterStyle:=System.Web.Services.Protocols.SoapParameterStyle.Wrapped)> _
Public Function Sort(ByVal SortItem As String, ByVal Direction As SortDirectionEnum, ByVal Clear As Boolean, ByRef ReportItem As String, ByRef NumPages As Integer) As <System.Xml.Serialization.XmlElementAttribute("PageNumber")> Integer
Dim results() As Object = Me.Invoke("Sort", New Object() {SortItem, Direction, Clear})
ReportItem = CType(results(1),String)
NumPages = CType(results(2),Integer)
Return CType(results(0),Integer)
End Function
'''<remarks/>
Public Overloads Sub SortAsync(ByVal SortItem As String, ByVal Direction As SortDirectionEnum, ByVal Clear As Boolean)
Me.SortAsync(SortItem, Direction, Clear, Nothing)
End Sub
'''<remarks/>
Public Overloads Sub SortAsync(ByVal SortItem As String, ByVal Direction As SortDirectionEnum, ByVal Clear As Boolean, ByVal userState As Object)
If (Me.SortOperationCompleted Is Nothing) Then
Me.SortOperationCompleted = AddressOf Me.OnSortOperationCompleted
End If
Me.InvokeAsync("Sort", New Object() {SortItem, Direction, Clear}, Me.SortOperationCompleted, userState)
End Sub
Private Sub OnSortOperationCompleted(ByVal arg As Object)
If (Not (Me.SortCompletedEvent) Is Nothing) Then
Dim invokeArgs As System.Web.Services.Protocols.InvokeCompletedEventArgs = CType(arg,System.Web.Services.Protocols.InvokeCompletedEventArgs)
RaiseEvent SortCompleted(Me, New SortCompletedEventArgs(invokeArgs.Results, invokeArgs.Error, invokeArgs.Cancelled, invokeArgs.UserState))
End If
End Sub
'''<remarks/>
<System.Web.Services.Protocols.SoapHeaderAttribute("ServerInfoHeaderValue", Direction:=System.Web.Services.Protocols.SoapHeaderDirection.Out), _
System.Web.Services.Protocols.SoapHeaderAttribute("TrustedUserHeaderValue"), _
System.Web.Services.Protocols.SoapDocumentMethodAttribute("http://schemas.microsoft.com/sqlserver/2005/06/30/reporting/reportingservices/Get"& _
"RenderResource", RequestNamespace:="http://schemas.microsoft.com/sqlserver/2005/06/30/reporting/reportingservices", ResponseNamespace:="http://schemas.microsoft.com/sqlserver/2005/06/30/reporting/reportingservices", Use:=System.Web.Services.Description.SoapBindingUse.Literal, ParameterStyle:=System.Web.Services.Protocols.SoapParameterStyle.Wrapped)> _
Public Function GetRenderResource(ByVal Format As String, ByVal DeviceInfo As String, ByRef MimeType As String) As <System.Xml.Serialization.XmlElementAttribute("Result", DataType:="base64Binary")> Byte()
Dim results() As Object = Me.Invoke("GetRenderResource", New Object() {Format, DeviceInfo})
MimeType = CType(results(1),String)
Return CType(results(0),Byte())
End Function
'''<remarks/>
Public Overloads Sub GetRenderResourceAsync(ByVal Format As String, ByVal DeviceInfo As String)
Me.GetRenderResourceAsync(Format, DeviceInfo, Nothing)
End Sub
'''<remarks/>
Public Overloads Sub GetRenderResourceAsync(ByVal Format As String, ByVal DeviceInfo As String, ByVal userState As Object)
If (Me.GetRenderResourceOperationCompleted Is Nothing) Then
Me.GetRenderResourceOperationCompleted = AddressOf Me.OnGetRenderResourceOperationCompleted
End If
Me.InvokeAsync("GetRenderResource", New Object() {Format, DeviceInfo}, Me.GetRenderResourceOperationCompleted, userState)
End Sub
Private Sub OnGetRenderResourceOperationCompleted(ByVal arg As Object)
If (Not (Me.GetRenderResourceCompletedEvent) Is Nothing) Then
Dim invokeArgs As System.Web.Services.Protocols.InvokeCompletedEventArgs = CType(arg,System.Web.Services.Protocols.InvokeCompletedEventArgs)
RaiseEvent GetRenderResourceCompleted(Me, New GetRenderResourceCompletedEventArgs(invokeArgs.Results, invokeArgs.Error, invokeArgs.Cancelled, invokeArgs.UserState))
End If
End Sub
'''<remarks/>
<System.Web.Services.Protocols.SoapHeaderAttribute("ServerInfoHeaderValue", Direction:=System.Web.Services.Protocols.SoapHeaderDirection.Out), _
System.Web.Services.Protocols.SoapHeaderAttribute("TrustedUserHeaderValue"), _
System.Web.Services.Protocols.SoapDocumentMethodAttribute("http://schemas.microsoft.com/sqlserver/2005/06/30/reporting/reportingservices/Lis"& _
"tRenderingExtensions", RequestNamespace:="http://schemas.microsoft.com/sqlserver/2005/06/30/reporting/reportingservices", ResponseNamespace:="http://schemas.microsoft.com/sqlserver/2005/06/30/reporting/reportingservices", Use:=System.Web.Services.Description.SoapBindingUse.Literal, ParameterStyle:=System.Web.Services.Protocols.SoapParameterStyle.Wrapped)> _
Public Function ListRenderingExtensions() As <System.Xml.Serialization.XmlArrayAttribute("Extensions")> Extension()
Dim results() As Object = Me.Invoke("ListRenderingExtensions", New Object(-1) {})
Return CType(results(0),Extension())
End Function
'''<remarks/>
Public Overloads Sub ListRenderingExtensionsAsync()
Me.ListRenderingExtensionsAsync(Nothing)
End Sub
'''<remarks/>
Public Overloads Sub ListRenderingExtensionsAsync(ByVal userState As Object)
If (Me.ListRenderingExtensionsOperationCompleted Is Nothing) Then
Me.ListRenderingExtensionsOperationCompleted = AddressOf Me.OnListRenderingExtensionsOperationCompleted
End If
Me.InvokeAsync("ListRenderingExtensions", New Object(-1) {}, Me.ListRenderingExtensionsOperationCompleted, userState)
End Sub
Private Sub OnListRenderingExtensionsOperationCompleted(ByVal arg As Object)
If (Not (Me.ListRenderingExtensionsCompletedEvent) Is Nothing) Then
Dim invokeArgs As System.Web.Services.Protocols.InvokeCompletedEventArgs = CType(arg,System.Web.Services.Protocols.InvokeCompletedEventArgs)
RaiseEvent ListRenderingExtensionsCompleted(Me, New ListRenderingExtensionsCompletedEventArgs(invokeArgs.Results, invokeArgs.Error, invokeArgs.Cancelled, invokeArgs.UserState))
End If
End Sub
'''<remarks/>
<System.Web.Services.Protocols.SoapHeaderAttribute("ServerInfoHeaderValue", Direction:=System.Web.Services.Protocols.SoapHeaderDirection.Out), _
System.Web.Services.Protocols.SoapDocumentMethodAttribute("http://schemas.microsoft.com/sqlserver/2005/06/30/reporting/reportingservices/Log"& _
"onUser", RequestNamespace:="http://schemas.microsoft.com/sqlserver/2005/06/30/reporting/reportingservices", ResponseNamespace:="http://schemas.microsoft.com/sqlserver/2005/06/30/reporting/reportingservices", Use:=System.Web.Services.Description.SoapBindingUse.Literal, ParameterStyle:=System.Web.Services.Protocols.SoapParameterStyle.Wrapped)> _
Public Sub LogonUser(ByVal userName As String, ByVal password As String, ByVal authority As String)
Me.Invoke("LogonUser", New Object() {userName, password, authority})
End Sub
'''<remarks/>
Public Overloads Sub LogonUserAsync(ByVal userName As String, ByVal password As String, ByVal authority As String)
Me.LogonUserAsync(userName, password, authority, Nothing)
End Sub
'''<remarks/>
Public Overloads Sub LogonUserAsync(ByVal userName As String, ByVal password As String, ByVal authority As String, ByVal userState As Object)
If (Me.LogonUserOperationCompleted Is Nothing) Then
Me.LogonUserOperationCompleted = AddressOf Me.OnLogonUserOperationCompleted
End If
Me.InvokeAsync("LogonUser", New Object() {userName, password, authority}, Me.LogonUserOperationCompleted, userState)
End Sub
Private Sub OnLogonUserOperationCompleted(ByVal arg As Object)
If (Not (Me.LogonUserCompletedEvent) Is Nothing) Then
Dim invokeArgs As System.Web.Services.Protocols.InvokeCompletedEventArgs = CType(arg,System.Web.Services.Protocols.InvokeCompletedEventArgs)
RaiseEvent LogonUserCompleted(Me, New System.ComponentModel.AsyncCompletedEventArgs(invokeArgs.Error, invokeArgs.Cancelled, invokeArgs.UserState))
End If
End Sub
'''<remarks/>
<System.Web.Services.Protocols.SoapHeaderAttribute("ServerInfoHeaderValue", Direction:=System.Web.Services.Protocols.SoapHeaderDirection.Out), _
System.Web.Services.Protocols.SoapDocumentMethodAttribute("http://schemas.microsoft.com/sqlserver/2005/06/30/reporting/reportingservices/Log"& _
"off", RequestNamespace:="http://schemas.microsoft.com/sqlserver/2005/06/30/reporting/reportingservices", ResponseNamespace:="http://schemas.microsoft.com/sqlserver/2005/06/30/reporting/reportingservices", Use:=System.Web.Services.Description.SoapBindingUse.Literal, ParameterStyle:=System.Web.Services.Protocols.SoapParameterStyle.Wrapped)> _
Public Sub Logoff()
Me.Invoke("Logoff", New Object(-1) {})
End Sub
'''<remarks/>
Public Overloads Sub LogoffAsync()
Me.LogoffAsync(Nothing)
End Sub
'''<remarks/>
Public Overloads Sub LogoffAsync(ByVal userState As Object)
If (Me.LogoffOperationCompleted Is Nothing) Then
Me.LogoffOperationCompleted = AddressOf Me.OnLogoffOperationCompleted
End If
Me.InvokeAsync("Logoff", New Object(-1) {}, Me.LogoffOperationCompleted, userState)
End Sub
Private Sub OnLogoffOperationCompleted(ByVal arg As Object)
If (Not (Me.LogoffCompletedEvent) Is Nothing) Then
Dim invokeArgs As System.Web.Services.Protocols.InvokeCompletedEventArgs = CType(arg,System.Web.Services.Protocols.InvokeCompletedEventArgs)
RaiseEvent LogoffCompleted(Me, New System.ComponentModel.AsyncCompletedEventArgs(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.832"), _
System.SerializableAttribute(), _
System.Diagnostics.DebuggerStepThroughAttribute(), _
System.ComponentModel.DesignerCategoryAttribute("code"), _
System.Xml.Serialization.XmlTypeAttribute([Namespace]:="http://schemas.microsoft.com/sqlserver/2005/06/30/reporting/reportingservices"), _
System.Xml.Serialization.XmlRootAttribute([Namespace]:="http://schemas.microsoft.com/sqlserver/2005/06/30/reporting/reportingservices", IsNullable:=false)> _
Partial Public Class ServerInfoHeader
Inherits System.Web.Services.Protocols.SoapHeader
?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -