zoukankan      html  css  js  c++  java
  • 基于jwt制作Token

    function TfrmSimple.BuildTokenFR(path, key: string; validtime:Int64): string;
    var
       LToken: TJWT;
    begin
         LToken := TJWT.Create;
         try
            LToken.Claims.Subject := path;
            LToken.Claims.IssuedAt := Now;
            LToken.Claims.Expiration := Now + validtime;
            LToken.Claims.Issuer := '';
            LToken.Claims.JWTId:='';
            result:=TJOSE.SHA256CompactToken(key,LToken);
         finally
            LToken.Free;
         end;
    end;

    直接上代码,下面是调用代码:

     memoCompact.Lines.Add(  BuildTokenFR('order.cpt','123456',30*60*1000));

    返回结果:

    eyJ0eXAiOiJKV1QiLCJhbGciOiJIUzI1NiJ9.eyJzdWIiOiJvcmRlci5jcHQiLCJpYXQiOjE1OTQwMzAzNTIsImV4cCI6MTU3MTE0MDMwMzUyfQ.DsceM8yrgp8S4-2Xor7de11YXq9eULYkD2-blY6B2BE

    开源地址:

    https://github.com/paolo-rossi/delphi-jose-jwt

  • 相关阅读:
    bzoj1648
    bzoj3404
    bzoj1650
    bzoj1625
    bzoj1606
    bzoj1464
    bzoj1572
    bzoj1617
    bzoj1092
    bzoj1091
  • 原文地址:https://www.cnblogs.com/kinglandsoft/p/13256183.html
Copyright © 2011-2022 走看看