DiscoveryClientProtocol.DiscoveryClientResultsFile Class
.NET Framework 2.0
Represents the root element of an XML document containing the results of all files written when the WriteAll method is invoked.
Namespace: System.Web.Services.Discovery
Assembly: System.Web.Services (in system.web.services.dll)
Assembly: System.Web.Services (in system.web.services.dll)
When you invoke the DiscoveryClientProtocol.WriteAll method, all resolved discovery documents and a file containing a map of all those files are saved to a directory. The map file is described in XML with the root element being DiscoveryClientProtocol.DiscoveryClientResultsFile; this class is passed to the XmlSerializer class to serialize the results.
Imports System Imports System.Web.Services.Discovery Imports System.Net Imports System.Xml Imports System.Xml.Serialization Class myDiscoveryClient_Results Shared Sub Main() Dim outputDirectory As String = "c:\InetPub\wwwroot" Dim myClient As New DiscoveryClientProtocol() ' Use default credentials to access the URL being discovered. myClient.Credentials = CredentialCache.DefaultCredentials Try Dim myDocument As DiscoveryDocument ' Discover the supplied URL to determine if it is a discovery document. myDocument = myClient.Discover("http://localhost/MathService_vb.vsdisco") myClient.ResolveAll() Dim myCollection As DiscoveryClientResultCollection = _ myClient.WriteAll(outputDirectory, "MyDiscoMap.discomap") ' Get the DiscoveryClientProtocol.DiscoveryClientResultsFile. Dim myResultFile As New DiscoveryClientProtocol.DiscoveryClientResultsFile() Dim mySerializer As New XmlSerializer(myResultFile.GetType()) Dim reader = New XmlTextReader("http://localhost/MyDiscoMap.discomap") myResultFile = CType(mySerializer.Deserialize(reader), _ DiscoveryClientProtocol.DiscoveryClientResultsFile) ' Get a collection of 'DiscoveryClientResult' objects. Dim myResultcollection As DiscoveryClientResultCollection = _ myResultFile.Results Console.WriteLine("Referred file(s) : ") Dim myResult As DiscoveryClientResult For Each myResult In myResultcollection Console.WriteLine(myResult.Filename) Next myResult Catch e As Exception Console.WriteLine(e.Message) End Try End Sub 'Main End Class 'myDiscoveryClient_Results
Windows 98, Windows Server 2000 SP4, Windows Millennium Edition, Windows Server 2003, Windows XP Media Center Edition, Windows XP Professional x64 Edition, Windows XP SP2, Windows XP Starter Edition
The Microsoft .NET Framework 3.0 is supported on Windows Vista, Microsoft Windows XP SP2, and Windows Server 2003 SP1.Community Additions
ADD
Show: