Comment : utiliser un moniker de service avec des contrats WSDL

Dans certains cas, vous pouvez avoir besoin d'un client COM Interop entièrement autonome. Le service que vous souhaitez appeler peut ne pas exposer de point de terminaison MEX et la DLL du client WCF risque de ne pas être enregistrée pour COM Interop. Le cas échéant, vous pouvez créer un fichier WSDL qui décrit le service et le transmet au moniker de service WCF. Cette rubrique décrit la manière d'appeler l'exemple de mise en route WCF à l'aide d'un moniker WCF WSDL.

Utilisation du moniker de service WSDL

1. Ouvrez et créez l'exemple de solution de mise en route.

2. Ouvrez Internet Explorer et naviguez jusqu'à https://localhost/ServiceModelSamples/Service.svc pour vous assurer que le service fonctionne.

3. Dans le fichier Service.cs, ajoutez l'attribut suivant sur la classe CalculatorService :

   [ServiceBehavior(Namespace = "http://Microsoft.ServiceModel.Samples")]
   // This service class implements the service contract.
   public class CalculatorService : ICalculator
   {
       public double Add(double n1, double n2)
       {
           return n1 + n2;
       }
   
       public double Subtract(double n1, double n2)
       {
           return n1 - n2;
       }
   
       public double Multiply(double n1, double n2)
       {
           return n1 * n2;
       }
   
       public double Divide(double n1, double n2)
       {
           return n1 / n2;
       }
   }
   

4. Ajoutez un espace de noms de liaison au service App.config :

   <endpoint address=""
             binding="wsHttpBinding"
             bindingNamespace="http://Microsoft.ServiceModel.Samples"
             contract="Microsoft.ServiceModel.Samples.ICalculator" />
   

5. Créez un fichier WSDL pour que l'application le lise. Étant donné que les espaces de noms ont été ajoutés lors des étapes 3 et 4, vous pouvez utiliser Internet Explorer pour interroger l'ensemble de la description WSDL du service en naviguant jusqu'à https://localhost/ServiceModelSamples/Service.svc? wsdl. Vous pouvez ensuite enregistrer le fichier à partir d'Internet Explorer en tant que serviceWSDL.xml. Si vous ne spécifiez pas les espaces de noms lors des étapes 3 et 4, le document WSDL renvoyé à l'issue de l'interrogation de l'URL ci-dessus ne sera pas le document WSDL complet. Le document WSDL renvoyé inclura plusieurs instructions import qui permettent d'importer d'autres documents WSDL. Vous devrez parcourir chaque instruction import et générer le document WSDL complet, en associant le WSDL renvoyé par le service avec le WSDL importé.

6. Ouvrez Visual Basic 6.0 et créez un fichier .exe standard. Ajoutez un bouton au formulaire et double-cliquez dessus pour ajouter le code suivant au gestionnaire Click :

   ' Open the WSDL contract file and read it all into the wsdlContract string.
   Const ForReading = 1
   Set objFSO = CreateObject("Scripting.FileSystemObject")
   Set objFile = objFSO.OpenTextFile("c:\serviceWsdl.xml", ForReading)
   wsdlContract = objFile.ReadAll
   objFile.Close
   
   ' Create a string for the service moniker including the content of the WSDL contract file.
   wsdlMonikerString = "service4:address='https://localhost/ServiceModelSamples/service.svc'"
   wsdlMonikerString = wsdlMonikerString + ", wsdl='" & wsdlContract & "'"
   wsdlMonikerString = wsdlMonikerString + ", binding=WSHttpBinding_ICalculator, bindingNamespace='http://Microsoft.ServiceModel.Samples'"
   wsdlMonikerString = wsdlMonikerString + ", contract=ICalculator, contractNamespace='http://Microsoft.ServiceModel.Samples'"
   
   ' Create the service moniker object.
   Set wsdlServiceMoniker = GetObject(wsdlMonikerString)
   
   ' Call the service operations using the moniker object.
   MsgBox "WSDL service moniker: 145 - 76.54 = " & wsdlServiceMoniker.Subtract(145, 76.54)
   

   Remarque :
   Si le moniker est mal formé ou si le service n'est pas disponible, l'appel de GetObject retourne une erreur indiquant que la syntaxe n'est pas valide. Si vous recevez cette erreur, assurez-vous que le moniker que vous utilisez est correct et que le service est disponible.

7. Exécutez l'application Visual Basic. Un message s'affiche avec les résultats de l'appel de Subtract(145, 76.54).

Voir aussi

Tâches

Getting Started, exemple

Concepts

Vue d'ensemble de l'intégration à des applications COM