Επεξεργασία

Κοινή χρήση μέσω


ContractReference.Contract Property

Definition

Gets a ServiceDescription object representing the service description.

public:
 property System::Web::Services::Description::ServiceDescription ^ Contract { System::Web::Services::Description::ServiceDescription ^ get(); };
public System.Web.Services.Description.ServiceDescription Contract { get; }
member this.Contract : System.Web.Services.Description.ServiceDescription
Public ReadOnly Property Contract As ServiceDescription

Property Value

A ServiceDescription object representing the service description.

Exceptions

The Documents property of ClientProtocol does not contain a discovery document with an URL of Url.

Examples

int main()
{
   try
   {
      // Create the file stream.
      FileStream^ discoStream = gcnew FileStream( "Service1_CS.disco",FileMode::Open );
      
      // Create the discovery document.
      DiscoveryDocument^ myDiscoveryDocument = DiscoveryDocument::Read( discoStream );
      
      // Get the first ContractReference in the collection.
      ContractReference^ myContractReference = dynamic_cast<ContractReference^>(myDiscoveryDocument->References[ 0 ]);
      
      // Set the client protocol.
      myContractReference->ClientProtocol = gcnew DiscoveryClientProtocol;
      myContractReference->ClientProtocol->Credentials = CredentialCache::DefaultCredentials;
      
      // Get the service description.
      ServiceDescription^ myContract = myContractReference->Contract;
      
      // Create the service description file.
      myContract->Write( "MyService1.wsdl" );
      Console::WriteLine( "The WSDL file created is MyService1.wsdl" );
      discoStream->Close();
   }
   catch ( Exception^ ex ) 
   {
      Console::WriteLine( "Exception: {0}", ex->Message );
   }
}
class MyClass1
{
   static void Main()
   {
      try
      {
         // Create the file stream.
         FileStream discoStream =
             new FileStream("Service1_CS.disco",FileMode.Open);

         // Create the discovery document.
         DiscoveryDocument myDiscoveryDocument =
             DiscoveryDocument.Read(discoStream);

         // Get the first ContractReference in the collection.
         ContractReference myContractReference =
             (ContractReference)myDiscoveryDocument.References[0];

         // Set the client protocol.
         myContractReference.ClientProtocol = new DiscoveryClientProtocol();
         myContractReference.ClientProtocol.Credentials =
             CredentialCache.DefaultCredentials;

         // Get the service description.
         ServiceDescription myContract = myContractReference.Contract;

         // Create the service description file.
         myContract.Write("MyService1.wsdl");
         Console.WriteLine("The WSDL file created is MyService1.wsdl");

         discoStream.Close();
      }
      catch(Exception ex)
      {
         Console.WriteLine("Exception: " + ex.Message);
      }
   }
}
Class MyClass1
   Shared Sub Main()
      Try
         ' Create the file stream.
         Dim discoStream As _
             New FileStream("Service1_vb.disco", FileMode.Open)

         ' Create the discovery document.
         Dim myDiscoveryDocument As _
             DiscoveryDocument = DiscoveryDocument.Read(discoStream)

         ' Get the first ContractReference in the collection.
         Dim myContractReference As ContractReference = _
             CType(myDiscoveryDocument.References(0), ContractReference)

         ' Set the client protocol.
         myContractReference.ClientProtocol = New DiscoveryClientProtocol()
         myContractReference.ClientProtocol.Credentials = _
             CredentialCache.DefaultCredentials

         ' Get the service description.
         Dim myContract As ServiceDescription = myContractReference.Contract

         ' Create the service description file.
         myContract.Write("MyService1.wsdl")
         Console.WriteLine("The WSDL file created is MyService1.wsdl")

         discoStream.Close()

      Catch ex As Exception
         Console.WriteLine("Exception: " + ex.Message)
      End Try
   End Sub
End Class

Applies to

See also