Débutant ne peut pas obtenir JSON

Essayez de ne nourrir que la chaîne de { jusqu'à } sans les lignes précédentes.

on mouseUp
  set the hideConsoleWindows to true
  put shell("C:\mongodb\bin\mongo.exe --eval" && \
    quote & "printjson(db.test.findOne())" & quote) into pJSON
  put pJSON into fld "a"
  put JSONToArray(line 3 to -1 of pJSON) into tArray // <-- this line changed
  put tArray["a"] into fld "B"
end mouseUp