This commit is contained in:
JORGE LUIS CAUDILLO ESPARZA
2021-12-13 05:41:07 -07:00
parent 01d0d6128a
commit fffbfa8576
2 changed files with 4 additions and 3 deletions

View File

@@ -1360,6 +1360,7 @@ Public Class SIGWeb : Implements IHttpHandler, IRequiresSessionState
End Function
#End Region
Private Function GetFilesDirectory(ByVal context As HttpContext) As String
Dim retorno As String = ""
Dim urlhost As String = context.Request.Url.Host.ToUpper()
@@ -1376,7 +1377,7 @@ Public Class SIGWeb : Implements IHttpHandler, IRequiresSessionState
Next
xmlarchivos.Add(xfolder)
retorno = xmlarchivos.ToString()
context.Response.ContentType = "text/xml"
context.Response.ContentType = "application/xml"
context.Response.Write(retorno)
context.Response.StatusCode = 200
Else