GetAccessToken (rtl)

De Wiki1000
(Différences entre les versions)
m (Remplacement du texte — « <div style="font-color:#535068; border:none; padding:0.5em 1em 0.5em 0.7em; margin:0.5em 0em; background-color:#FFFFFF;font-size:100%;"> {|style="background-color:#FFFFFF;" |http://frp.sage.fr/wiki1000/medias/images/stock/ve)
Ligne 1 : Ligne 1 :
{{new|latest}}
+
{{new|700}}
 
<source lang="delphi">function GetAccessToken(iExpireInSeconds:Integer):string;</source>
 
<source lang="delphi">function GetAccessToken(iExpireInSeconds:Integer):string;</source>
  

Version du 13 janvier 2015 à 09:30

version700-48x48.png
function GetAccessToken(iExpireInSeconds:Integer):string;

Cette fonction retourne un jeton d'authentification correspondant au contexte utilisateur en cours.

iExpireInSeconds Durée de vie du jeton
Result Une chaine représentant le jeton
Tip-20px.png Tip : La durée de vie du jeton est limitée à 7 jours, si la valeur passée est zéro une durée de vie par défaut de 1 journée est utilisée.

Exemple :

//Procedure TestInQueueImport;
var msg:TdbmQueueMessage; idx:Integer;
begin
  for idx:=1 to 1 do
   begin
     msg := TdbmQueueMessage.Create;
     msg.QueueName := 'DBQUEUE1';
     msg.AddParameter('message.action','importdip');
     msg.AddParameter('message.accessToken',GetAccessToken(0));
     msg.AddParameter('import.name','testimport-wfclassea.dip');
     msg.BinaryContent.LoadFromFile('c:\temp\exports\wfclassea.txt');
     msg.Post;
   end;
end;

Voir aussi:

Développement DSMDéveloppement DSM

Outils personnels