目前主流的轻量级数据交换格式非Json和xml莫属,这里说下利用dotnet版本Newtonsoft.Json.dll解析Json数据,xml数据可直接调用dotnet方法读写操作。
废话不多说上代码,一瞧便知。
1、需要解析的Json文件,这里命名为Test_1130.json:
{
"整形": 100,
"整形1": 200,
"整形2": 300,
"字符串": "string value",
"布尔值": "bool value",
"整形数组": [111,
222,
333],
"Json对象数组": [{
"整形元素": 9999,
"字符串元素": "string value"
}]
}
2、parseJosn.ms解析的maxscript代码。
JsonDllPath = @"G:\CSDN\ParseJson\Newtonsoft.Json.dll"
JsonFilePath = @"G:\CSDN\ParseJson\Test_1130.json"
-- 读取本地Json文件到字符变量
JsonString = ""
JsonFile = openFile JsonFilePath
while not eof JsonFile do
(
JsonString += readchar JsonFile
)
close JsonFile
-- 加载模块
(dotnetClass "System.Reflection.assembly").Load ((dotnetClass "System.IO.File").ReadAllBytes(JsonDllPath))
-- 解析Json格式的字符
LinqJsonObj = (dotNetObject "Newtonsoft.Json.Linq.JObject").parse JsonString
-- 输出对象的值
OutValue = (LinqJsonObj.GetValue "整形").Value
-- 如果是整形对象输出需要把Integer64类型转化为Integer
format "\n整形:%\n" (OutValue as Integer)
-- print (OutValue as Integer)
-- 整形
-- print ((LinqJsonObj.GetValue "整形1").Value as Integer)
format "\n整形1:%\n" ((LinqJsonObj.GetValue "整形1").Value as Integer)
-- print ((LinqJsonObj.GetValue "整形2").Value as Integer)
format "\n整形2:%\n" ((LinqJsonObj.GetValue "整形2").Value as Integer)
-- 字符串
-- print (LinqJsonObj.GetValue "字符串").Value
format "\n字符串:%\n" (LinqJsonObj.GetValue "字符串").Value
-- 布尔
-- print (LinqJsonObj.GetValue "布尔值").Value
format "\n布尔值:%\n" (LinqJsonObj.GetValue "布尔值").Value
-- 整形数组
TestArray = (LinqJsonObj.GetValue "整形数组")
TestArray.Count --数组数量
for Index = 0 to (TestArray.Count - 1) do
(
-- print (TestArray.Item[Index].Value as Integer)
format "\n整形数组%:%\n" Index (TestArray.Item[Index].Value as Integer)
)
-- Json对象数组
TestJsonObjArray = (LinqJsonObj.GetValue "Json对象数组")
for Index = 0 to (TestJsonObjArray.Count - 1) do
(
-- print ((TestJsonObjArray.Item[Index].GetValue "整形元素").Value as Integer)
format "\n整形元素:%\n" ((TestJsonObjArray.Item[Index].GetValue "整形元素").Value as Integer)
-- print (TestJsonObjArray.Item[Index].GetValue "字符串元素").Value
format "\n字符串元素:%\n" (TestJsonObjArray.Item[Index].GetValue "字符串元素").Value
)
源代码和相关文件: http://u.163.com/qfG13x1y 提取码: EArxeSmr