This commit is contained in:
@@ -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
|
||||
|
||||
Reference in New Issue
Block a user