CargaEventos.ashx cambio json serialiser en opcion contrato_transportes

Ashx/CargaEventos.ashx

@@ -115,9 +115,22 @@ Public Class CargaEventos : Implements IHttpHandler, IRequiresSessionState
                         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)
 
-                            context.Response.Write(sJSON)
+
+                            '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
+
+
                         End If
                     End If
                     Exit Select