下面的代码提示：JSON未定义，

oScript = Createobject("ScriptControl")
oScript.Language = "javaScript"
oScript.AddCode('function fun1(jsonString){var obj = JSON.parse(jsonString);}')
? oScript.Run("fun1", '{"name":"Roob", "type":"CCC"}')

AddCode()  字符串长度有限吗，我读入一个 1M左右的 json字符串好像被截断了

刚刚测试 有效，谢谢！

另外问一下 如何判断 某个key 是否为数组？
Array.isArray(obj)，提示js 代码无效，可能如 吹版说的，ScriptControl 不是 js，
或者 有没有对应的 js脚本 可以 AddCode ，然后再用： Array.isArray(obj)

json = win.json(cJson)

这句显示错误： OLE 错误码 0x80020101:未知的COM状态码
WIN11系统

吹版，按照你说的，可以了
要是编译成EXE，是不是注册表 也要加进去啊？

[此贴子已经被作者于2023-7-12 22:00编辑过]