AdminADS/SIG
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

CargaEventos.ashx cambio json serialiser en opcion contrato_transportes

Browse Source
This commit is contained in:
rakcsle
2024-08-05 10:15:52 -07:00
parent 34a66e517b
commit d66307431f
1 changed files with 18 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

23
Ashx/CargaEventos.ashx
View File

@@ -112,12 +112,25 @@ Public Class CargaEventos : Implements IHttpHandler, IRequiresSessionState
FI = context.Request("start").ToDate
FF = context.Request("end").ToDate
If Not GetContratos(context:=context) Then
'Convierte el objeto de Eventos en JSON
'Dim oSerializer As System.Web.Script.Serialization.JavaScriptSerializer = New System.Web.Script.Serialization.JavaScriptSerializer
Dim sJSON As String = Newtonsoft.Json.JsonConvert.SerializeObject(events)
If Not GetContratos(context:=context) Then
'Convierte el objeto de Eventos en JSON
'Dim oSerializer As System.Web.Script.Serialization.JavaScriptSerializer = New System.Web.Script.Serialization.JavaScriptSerializer
'Dim settings As New Newtonsoft.Json.JsonSerializerSettings With {
' .NullValueHandling = Newtonsoft.Json.NullValueHandling.Ignore,
' .Formatting = Newtonsoft.Json.Formatting.None
' }
'Dim sJSON As String = Newtonsoft.Json.JsonConvert.SerializeObject(events, settings)
'context.Response.Write(sJSON)
Dim serializer As New Newtonsoft.Json.JsonSerializer()
Using writer As New IO.StringWriter()
serializer.Serialize(writer, events)
context.Response.Write(writer.ToString())
End Using
context.Response.Write(sJSON)
End If
End If
Exit Select