diff --git a/Ashx/SIGWeb.ashx b/Ashx/SIGWeb.ashx index 92c7de325..3c0189d72 100644 --- a/Ashx/SIGWeb.ashx +++ b/Ashx/SIGWeb.ashx @@ -10,7 +10,27 @@ Imports System.IO Public Class SIGWeb : Implements IHttpHandler, IRequiresSessionState Public Sub ProcessRequest(ByVal context As HttpContext) Implements IHttpHandler.ProcessRequest - context.Response.ContentType = "text/plain" + If context.Request("metodo").ToString() = "GetTokenAngular" Then + 'context.Response.ContentType = "application/json; charset=utf-8" + + context.Response.ContentType = "text/json" + Dim origin As String = context.Request.UrlReferrer.ToString() + context.Response.AddHeader("Access-Control-Allow-Origin", origin.Substring(0, origin.Length - 1)) + 'context.Response.AddHeader("Access-Control-Allow-Origin", "http://localhost:4200") + 'context.Response.AddHeader("Access-Control-Allow-Methods", "GET, POST") + context.Response.AddHeader("Access-Control-Allow-Headers", "Content-Type, Accept") + context.Response.AddHeader("Access-Control-Allow-Credentials", "true") + context.Response.StatusCode = 200 + Dim key As String = GetTokenAngular(context) + Dim json As String = JsonConvert.SerializeObject(key) + context.Response.Write(json) + context.Response.Flush() + context.Response.Close() + context.Response.End() + Else + context.Response.ContentType = "text/plain" + End If + Try Select Case context.Request("metodo") Case "getps" @@ -53,10 +73,6 @@ Public Class SIGWeb : Implements IHttpHandler, IRequiresSessionState context.Response.Write(sendMail(context)) Case "sendMailLPM" context.Response.Write(sendMailLPM(context)) - Case "GetTokenAngular" - context.Response.Write(GetTokenAngular(context)) - context.Response.End() - End Select Catch ex As Exception ex.GuardaLog(ex.Message) @@ -74,11 +90,6 @@ Public Class SIGWeb : Implements IHttpHandler, IRequiresSessionState Microsoft.IdentityModel.Tokens.SecurityAlgorithms.HmacSha256Signature)} Dim tokenHandler = New System.IdentityModel.Tokens.Jwt.JwtSecurityTokenHandler() Dim newtoken = tokenHandler.CreateToken(tokenDescriptor) - 'context.Response.AddHeader("Access-Control-Allow-Origin", "http://localhost:4200") - 'context.Response.AddHeader("Access-Control-Allow-Methods", "GET, POST") - 'context.Response.AddHeader("Access-Control-Allow-Headers", "Content-Type, Accept") - context.Response.AddHeader("Access-Control-Allow-Credentials", true ) - context.Response.StatusCode = 200 Dim stokenn As String = tokenHandler.WriteToken(newtoken) Return stokenn diff --git a/vwd.webinfo b/vwd.webinfo index 821cf7887..58b25d2ef 100644 --- a/vwd.webinfo +++ b/vwd.webinfo @@ -126,6 +126,10 @@ + + + +