Création de l’application dans Azure

1. Se connecter à https://portal.azure.com/
2. Aller dans
   • Azure Active Directory
   • puis Inscriptions d’applications
3. Cliquer sur + Nouvelle inscription
4. Renseigner
   • Le Nom (peut être modifié par la suite)
   • Types de comptes
     pour une utilisation de n’importe quel utilisateur sélectionner : Comptes dans un annuaire d’organisation (tout annuaire Azure AD – Multilocataire) et comptes Microsoft personnels (par exemple, Skype, Xbox)
   • URI de redirection
     • Choisir Web
     • pour Webdev en test renseigner http://localhost:8025/WD250AWP/WD250Awp.exe/OAUTH2_RETOUR
     • pour Webdev site déployé https://MonSiteWeb/WD250AWP/WD250Awp.exe/OAUTH2_RETOUR
5. Cliquer sur le bouton S’inscrire

Ensuite sur l’onglet Authentification descendre jusqu’à Octroi implicite et cochez Jetons d’accès et Jetons d’ID. Penser à Enregistrer

Dans API autorisées vous pouvez ajouter des API à utiliser dans votre site/application.

Dans Certificats & secrets créer un Nouveau secret client

Pour Webdev récupérer le Client ID et Client Secret comme suit :
ClientID : Id d’application (client) : Se trouve dans l’onglet Vue d’ensemble
ClientSecret : Récupérer la valeur qui se trouve dans l’onglet Certificats & secrets

---

Dans le site Webdev

Exemple de code de connexion à l’API en mode local/test
Code du serveur :

OAuth2Params est un OAuth2Paramètres
Montoken est un AuthToken

OAuth2Params..ClientID = "Clé ClientID"
OAuth2Params..ClientSecret = "Clé ClientSecret"

OAuth2Params..URLAuth = "https://login.microsoftonline.com/common/oauth2/v2.0/authorize"
OAuth2Params..URLToken = "https://login.microsoftonline.com/common/oauth2/v2.0/token"

// Il est important que cette URl corresponde exactement avec celle renseignée dans AZURE
OAuth2Params..URLRedirection = "http://localhost:8025/WD250AWP/WD250Awp.exe/OAUTH2_RETOUR"

// OAuth2Params..Scope = "User.Read"
OAuth2Params..Scope = "https://outlook.office.com/calendars.readwrite"
 

Montoken = AuthIdentifie(OAuth2Params)

SI Montoken.Valide = Faux ALORS
	Info("Erreur de connexion", ErreurInfo())
SINON
	Info("Connexion ok")
FIN

Liens utiles