zhao4zhong1进来帮忙解决JSON获取object类型

[奋斗一生的程序员]

{"time_used": 1203,
"thresholds": {"1e-3": 62.327, "1e-5": 73.975, "1e-4": 69.101},
"confidence": 90.662,
"request_id": "1498464734,bfc27199-17f8-437c-86f5-290a0816d0c3"}

With ScriptControl1
    .Reset
    .Language = "javascript"
    .AddCode "var json = " & strFaceJSON & ";" 
    '获取三个参数的值
    txtConfidence = .Eval("json.confidence")
    txtTimeUsed = .Eval("json.time_used") 
    txtRequest_id = .Eval("json.request_id")
 
    'thresholds或1e-3，1e-5，1e-4如何获取？
    '
    txtTemp = .Eval("thresholds") '只返回  [object object] 真是愁人 真是愁人 真是愁人
End Sub

[笨狗先飞]

Public Function JSONParse(ByVal JSONPath As String, ByVal JSONString As String) As Variant
    Dim JSON As Object
    Set JSON = CreateObject("MSScriptControl.ScriptControl")
    JSON.Language = "JScript"
    JSONParse = JSON.eval("JSON=" & JSONString & ";JSON." & JSONPath & ";")
    Set JSON = Nothing
End Function


Public Sub main()
    Dim Str As String
    Str = "{""time_used"": 1203,""thresholds"": {""1e-3"": 62.327, ""1e-5"": 73.975, ""1e-4"": 69.101},""confidence"": 90.662,""request_id"": ""1498464734,bfc27199-17f8-437c-86f5-290a0816d0c3""}"
    Debug.Print JSONParse("thresholds['1e-3']", Str)
    Debug.Print JSONParse("thresholds['1e-5']", Str)
    Debug.Print JSONParse("thresholds['1e-4']", Str)
End Sub

[奋斗一生的程序员]

引用 1 楼 bakw 的回复:

[/code]

多谢前辈！瞬间结帖。

[赵4老师]

人老了，腿脚不太利索了。

[笨狗先飞]

引用 4 楼 jlmugua 的回复:

{
"faces1": [{"face_rectangle": {"width": 367, "top": 259, "left": 155, "height": 367}, "face_token": "6b9486d1b6e77b682eeffc047b6de139"}],
"faces2": [{"face_rectangle": {"width": 168, "top": 184, "left": 298, "height": 168}, "face_token": "eca652ec453660f7b2a6f60668a4fbfd"}],
"time_used": 1203,
"thresholds": {"1e-3": 62.327, "1e-5": 73.975, "1e-4": 69.101},
"confidence": 90.662,
"request_id": "1498464734,bfc27199-17f8-437c-86f5-290a0816d0c3"}

发完一楼帖子后，得到了圆满解决。 现在要获取的是 "faces2" 的 face_rectangle值，即{"width": 168, "top": 184, "left": 298, "height": 168}这个字符串，只要得到这个字符串，就可以分割获得width,top,left,height，此为后话。 [quote=引用 1 楼 bakw 的回复:] 还请您回来再续前缘，可再追加100分。

引用 3 楼 zhao4zhong1 的回复:

大师没有老，正当壮年。只是消息不灵通而已啦。

[/quote] 别的代码我也不贴了，你这样取吧：

     JSONParse("faces2[0].face_rectangle['left']", Str)
    JSONParse("faces2[0].face_rectangle['top']", Str)
    JSONParse("faces2[0].face_rectangle['width']", Str)
    JSONParse("faces2[0].face_rectangle['height']", Str)

[笨狗先飞]

其实就是个路径的问题，自己可以研究一下，这样收获更大些。。。

[赵4老师]

http://www.json.org

[奋斗一生的程序员]

{
"faces1": [{"face_rectangle": {"width": 367, "top": 259, "left": 155, "height": 367}, "face_token": "6b9486d1b6e77b682eeffc047b6de139"}],
"faces2": [{"face_rectangle": {"width": 168, "top": 184, "left": 298, "height": 168}, "face_token": "eca652ec453660f7b2a6f60668a4fbfd"}],
"time_used": 1203,
"thresholds": {"1e-3": 62.327, "1e-5": 73.975, "1e-4": 69.101},
"confidence": 90.662,
"request_id": "1498464734,bfc27199-17f8-437c-86f5-290a0816d0c3"}

发完一楼帖子后，得到了圆满解决。 现在要获取的是 "faces2" 的 face_rectangle值，即{"width": 168, "top": 184, "left": 298, "height": 168}这个字符串，只要得到这个字符串，就可以分割获得width,top,left,height，此为后话。

引用 1 楼 bakw 的回复:

还请您回来再续前缘，可再追加100分。

引用 3 楼 zhao4zhong1 的回复:

大师没有老，正当壮年。只是消息不灵通而已啦。

[奋斗一生的程序员]

谢谢二位前辈，分别转赠100分。

[奋斗一生的程序员]

		"attributes": {
			"gender": {
				"value": "Female"
			},
			"age": {
				"value": 21
			},
			"headpose": {
				"yaw_angle": -26.625063,
				"pitch_angle": 12.921974,
				"roll_angle": 22.814377
			},
			"smile": {
				"threshold": 30.1,
				"value": 2.566890001296997
			}
		},
		"face_rectangle": {
			"width": 140,
			"top": 89,
			"left": 104,
			"height": 141
		}

已知，获取left值，可以这样写： .Eval("json.faces[0].face_rectangle['left']") 那么，如何获取attributes的age值和smile的threshold值？烦请指导。

[奋斗一生的程序员]

引用 7 楼 zhao4zhong1 的回复:

http://www.json.org

大师，帮忙看看上面的问题哦。

[赵4老师]

http://bbs.csdn.net/topics/392308759