Recientemente publiqué en VFPX un grupo de funciones para manejar Json de manera fácil.
Puedes descargarlas desde:
https://vfpx.codeplex.com/releases/view/620040Para convertir Json a un objeto o viceversa sólo necesitas una línea de código:
miObjeto = nfJsonRead( cJsonString )
miJson = nfJsonCreate( m.miObjeto )
También incluyo las funciones para convertir tablas o colecciones de/a Json y ejemplos de uso.
Saludos.