GetAccessToken (rtl)
De Wiki1000
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 : 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: