Bonjour,
Je suis en train d'essayer d'utiliser une API d'un site (Exact Online) pour récupérer des informations sur leur sites. (Import de donnée sous format XML).
La première étape de l'utilisation consiste à s'authentifier. Afin de pouvoir s'authentifier, il faut ouvrir une fenêtre d'authentification et entrer des identifiants valides. Une fois ces identifiants entrés, la page nous renvoi vers un autre site (site au choix, c'est juste une redirection) et ajoute dans l'url du site un code d'autorisation (sous forme de ?code=notrecode).
J'ai commencé à coder pour ouvrir la fenêtre d'authentification et pouvoir y entrer les identifiants :
1 2 3 4
| Dim objShell
set objShell = CreateObject("Shell.Application")
objShell.ShellExecute "C:\Program Files (x86)\Google\Chrome\Application\chrome.exe", "https://start.exactonline.fr/api/oauth2/auth?client_id={029396fa-b451-4873-a899-19976da99a50}&redirect_uri=http://distributors.caseware.com/france&response_type=code&force_login=1", "", "", 1 |
Ce code m'ouvre la page d'indentification (en ouvrant une nouvelle fenêtre Chrome) et je peux saisir mes identifiants. En validant, j'ai bien la redirection vers notre page d'accueil : http://distributors.caseware.com/france mais son URL est changé pour avoir :
http://distributors.caseware.com/france?code=y10t%21IAAAABEr5_Y4dyfK3luBkT8LVjjwX60xlMjltwNazw5r3NjIAQEAAAHorrks3AZWmNd3ISbrm7OC2-Ia26xAE4queqLn2xT2mtDPDsDh3h2aiWnXHTseIGIaXkov2pGJCB2h-VRa87eSK9NcAwsTdEmg9D_Di22a8QsCj8KDoVq-lgfQhQhk-5n8qS5Vr_6aLNiUT3Cw3ZJurTIbQnyvX8eyPCzqXUJg_Sb6rdtU5NZQOU2o5QQOKJp68XgPnYBnF8fuc6TQMmdMCy3SYYuoVeASJwF6d1ZgPOifin8AyxhXuqSZtSE_ryJy1A2LqjkYFANhV78ywAJYClP1_DTUyYwwGcv-9GMjqOBzupzysdQ7Ku9FtqW8zLdqjbOqyaEPILS9MFb4b5cE
J'aimerai savoir comment faire pour récupérer le code présent dans l'URL.
Merci d'avance pour vos réponses.
PS : J'utilise du code en vbs car j'avais un exemple en vbs. Si la solution nécessite d'utiliser un autre langage, je suis preneur aussi
Cordialement.
Partager