DiscoveryReference Class
.NET Framework 2.0
The base class for discoverable references using XML Web services discovery.
Namespace: System.Web.Services.Discovery
Assembly: System.Web.Services (in system.web.services.dll)
Assembly: System.Web.Services (in system.web.services.dll)
ContractReference, SchemaReference, and DiscoveryDocumentReference all inherit from DiscoveryReference, and represent the three types of documents discoverable through XML Web services discovery: Service Descriptions, XML Schema Definition (XSD) schemas, and discovery documents, respectively.
Imports System Imports System.IO Imports System.Web.Services.Discovery Imports System.Net Class MyDiscoveryDocumentClass Public Shared Sub Main() Try Dim myDiscoveryDocument As DiscoveryDocument Dim myStreamReader As New StreamReader("c:\Inetpub\wwwroot\dataservice.disco") Dim myStream As New FileStream("c:\MyDiscovery.disco", FileMode.OpenOrCreate) Console.WriteLine("Demonstrating DiscoveryReference class.") ' Read the discovery file. myDiscoveryDocument = DiscoveryDocument.Read(myStreamReader) ' Create an instance of the DiscoveryReference class. Dim myDiscoveryReference As MyDiscoveryReferenceClass myDiscoveryReference = New MyDiscoveryReferenceClass() Dim myDiscoveryClientProtocol As New DiscoveryClientProtocol() myDiscoveryClientProtocol.Credentials = _ CredentialCache.DefaultCredentials ' Set the client protocol. myDiscoveryReference.ClientProtocol = myDiscoveryClientProtocol ' Read the default file name. Console.WriteLine("Default file name is: " _ & myDiscoveryReference.DefaultFilename) ' Write the document. myDiscoveryReference.WriteDocument(myDiscoveryDocument, myStream) ' Read the document. myDiscoveryReference.ReadDocument(myStream) ' Set the URL. myDiscoveryReference.Url = "http://localhost/dataservice.disco" Console.WriteLine("Url is : " + myDiscoveryReference.Url) ' Resolve the URL. myDiscoveryReference.Resolve() myStreamReader.Close() myStream.Close() Catch e as Exception Console.WriteLine("Exception caught! - {0}", e.Message) End Try End Sub End Class ' Class derived from DiscoveryReference class and overriding it members. Class MyDiscoveryReferenceClass Inherits DiscoveryReference Private myDocumentUrl As String Public Overrides ReadOnly Property DefaultFilename() As String Get Return "dataservice.disco" End Get End Property Public Overrides Function _ ReadDocument(ByVal stream As System.IO.Stream) As Object Return stream End Function Public Overloads Sub Resolve() Try Dim myDiscoveryRefDocument As DiscoveryDocument myDiscoveryRefDocument = MyBase.ClientProtocol.Discover(Url) Catch e As Exception Throw e End Try End Sub Protected Overloads Overrides Sub _ Resolve(ByVal contentType As String, ByVal stream As Stream) End Sub Public Overrides Property Url() As String Get Return myDocumentUrl End Get Set(ByVal Value As String) myDocumentUrl = Value End Set End Property Public Overrides Sub WriteDocument _ (ByVal document As Object, ByVal stream As System.IO.Stream) Dim myDiscoveryDocument As DiscoveryDocument = _ CType(document, DiscoveryDocument) myDiscoveryDocument.Write(stream) End Sub End Class
System.Object
System.Web.Services.Discovery.DiscoveryReference
System.Web.Services.Discovery.ContractReference
System.Web.Services.Discovery.DiscoveryDocumentReference
System.Web.Services.Discovery.SchemaReference
System.Web.Services.Discovery.DiscoveryReference
System.Web.Services.Discovery.ContractReference
System.Web.Services.Discovery.DiscoveryDocumentReference
System.Web.Services.Discovery.SchemaReference
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: