version actual goCFDi

This commit is contained in:
2022-08-19 11:26:55 -07:00
parent 7e255cc50e
commit daed5effc7
2 changed files with 13 additions and 13 deletions

View File

@@ -278,19 +278,19 @@ Public Class SIGWeb : Implements IHttpHandler, IRequiresSessionState
Return retorno Return retorno
End Function End Function
Private Function GetTokenAngular(context As HttpContext) As String Private Function GetTokenAngular(context As HttpContext) As String
'Dim usuario As Usuario = UsuarioActual(context) Dim usuario As Usuario = UsuarioActual(context)
'Dim tokenDescriptor = New Microsoft.IdentityModel.Tokens.SecurityTokenDescriptor With { Dim tokenDescriptor = New Microsoft.IdentityModel.Tokens.SecurityTokenDescriptor With {
'.Subject = New System.Security.Claims.ClaimsIdentity(New System.Security.Claims.Claim() {New System.Security.Claims.Claim("CvePlataforma", usuario.CvePlataforma.ToString()), .Subject = New System.Security.Claims.ClaimsIdentity(New System.Security.Claims.Claim() {New System.Security.Claims.Claim("CvePlataforma", usuario.CvePlataforma.ToString()),
'New System.Security.Claims.Claim("CveUsuario", usuario.CveUsuario.ToString()), New System.Security.Claims.Claim("CveEmpresa", usuario.CveEmpresa.ToString()), New System.Security.Claims.Claim("CveUsuario", usuario.CveUsuario.ToString()), New System.Security.Claims.Claim("CveEmpresa", usuario.CveEmpresa.ToString()),
'New System.Security.Claims.Claim("CveRol", usuario.CveRol.ToString()), New System.Security.Claims.Claim("Fecha", Date.Now.ToLongDateString())}), New System.Security.Claims.Claim("CveRol", usuario.CveRol.ToString()), New System.Security.Claims.Claim("Fecha", Date.Now.ToLongDateString())}),
'.Expires = Date.UtcNow.AddHours(3), .Expires = Date.UtcNow.AddHours(3),
'.SigningCredentials = New Microsoft.IdentityModel.Tokens.SigningCredentials( .SigningCredentials = New Microsoft.IdentityModel.Tokens.SigningCredentials(
'New Microsoft.IdentityModel.Tokens.SymmetricSecurityKey(Encoding.ASCII.GetBytes("*_AsistenciaDesarrolloSistemas-SIGAPI_*17-06-2020")), New Microsoft.IdentityModel.Tokens.SymmetricSecurityKey(Encoding.ASCII.GetBytes("*_AsistenciaDesarrolloSistemas-SIGAPI_*17-06-2020")),
'Microsoft.IdentityModel.Tokens.SecurityAlgorithms.HmacSha256Signature)} Microsoft.IdentityModel.Tokens.SecurityAlgorithms.HmacSha256Signature)}
'Dim tokenHandler = New System.IdentityModel.Tokens.Jwt.JwtSecurityTokenHandler() Dim tokenHandler = New System.IdentityModel.Tokens.Jwt.JwtSecurityTokenHandler()
'Dim newtoken = tokenHandler.CreateToken(tokenDescriptor) Dim newtoken = tokenHandler.CreateToken(tokenDescriptor)
'Dim stokenn As String = tokenHandler.WriteToken(newtoken) Dim stokenn As String = tokenHandler.WriteToken(newtoken)
Return "" Return stokenn
End Function End Function
Private Function sendMailLPM(context As HttpContext) As String Private Function sendMailLPM(context As HttpContext) As String

Binary file not shown.