Function escapeQuotes(quotedString As String) As String
'agrega un escape a las comillas para que sea aceptado por la linea de comandos
'convierte {"key":"value"} en "{\"key\":\"value\"}"
escQuotes = Replace(quotedString, Chr(34), "\" & Chr(34))
escapeQuotes = Chr(34) & escQuotes & Chr(34)
End Function
'agrega un escape a las comillas para que sea aceptado por la linea de comandos
'convierte {"key":"value"} en "{\"key\":\"value\"}"
escQuotes = Replace(quotedString, Chr(34), "\" & Chr(34))
escapeQuotes = Chr(34) & escQuotes & Chr(34)
End Function
Hola Rubén. tienes un correo donde poder escribirte?
ResponderEliminarGracias.
rubendario1980@hotmail.com
EliminarHola Rubén tienes pagina de facebook o suscripciones por corre, para saber cuando publicas tu artículos
ResponderEliminar