如何使用 AutoIt 循环一个 json 数组
How to loop an json array with AutoIt
我有一个这种形式的数组
[{"var1":"test1","var2":"test1"},{"var1":"test2","var2":"test2"},{"var1":"test3","var2":"test3"}]
我想制作一个自动化脚本来循环数组和每个对象的 return var2
结果应该是这样
test1
test2
test3
我有这个工作脚本,但我不知道如何将它应用到我的案例中,因为每个元素都是 json 形式的对象
#include <array.au3>
Local $array[5] = ["a", "b", "c", "d", "e"]
_ArrayDisplay($array)
For $i = 0 To UBound($array) - 1
ConsoleWrite("Testing " & $array[$i] & @CRLF)
Next
_ArrayDisplay($array)
您可以使用 Json UDF 在 Autoit 中解析 JSON。
不要忘记将 Json.au3
和 BinaryCall.au3
添加到脚本的文件夹中。
您的问题示例:
#include "Json.au3"
#include <Array.au3>
$sJson = '[{"var1":"test1","var2":"test1"},{"var1":"test2","var2":"test2"},{"var1":"test3","var2":"test3"}]'
$oJSON = Json_Decode($sJson)
If IsArray($oJSON) Then
For $i=0 to UBound($oJSON)-1
$res = Json_ObjGet($oJSON[$i], "var2")
ConsoleWrite($res & @CRLF)
Next
EndIf
您也有没有 UDF 的选项:
$str = '[{"var1":"test1","var2":"test1"},{"var1":"test2","var2":"test2"},{"var1":"test3","var2":"test3"}]'
$aVar2 = StringRegExp($str , '"var2":"(.*?)"' , 3)
$sOut = ""
For $i = 0 To UBound($aVar2) - 1
$sOut &= $aVar2[$i] & @LF
Next
MsgBox(0, '' , $sOut)
我有一个这种形式的数组
[{"var1":"test1","var2":"test1"},{"var1":"test2","var2":"test2"},{"var1":"test3","var2":"test3"}]
我想制作一个自动化脚本来循环数组和每个对象的 return var2
结果应该是这样
test1
test2
test3
我有这个工作脚本,但我不知道如何将它应用到我的案例中,因为每个元素都是 json 形式的对象
#include <array.au3>
Local $array[5] = ["a", "b", "c", "d", "e"]
_ArrayDisplay($array)
For $i = 0 To UBound($array) - 1
ConsoleWrite("Testing " & $array[$i] & @CRLF)
Next
_ArrayDisplay($array)
您可以使用 Json UDF 在 Autoit 中解析 JSON。
不要忘记将 Json.au3
和 BinaryCall.au3
添加到脚本的文件夹中。
您的问题示例:
#include "Json.au3"
#include <Array.au3>
$sJson = '[{"var1":"test1","var2":"test1"},{"var1":"test2","var2":"test2"},{"var1":"test3","var2":"test3"}]'
$oJSON = Json_Decode($sJson)
If IsArray($oJSON) Then
For $i=0 to UBound($oJSON)-1
$res = Json_ObjGet($oJSON[$i], "var2")
ConsoleWrite($res & @CRLF)
Next
EndIf
您也有没有 UDF 的选项:
$str = '[{"var1":"test1","var2":"test1"},{"var1":"test2","var2":"test2"},{"var1":"test3","var2":"test3"}]'
$aVar2 = StringRegExp($str , '"var2":"(.*?)"' , 3)
$sOut = ""
For $i = 0 To UBound($aVar2) - 1
$sOut &= $aVar2[$i] & @LF
Next
MsgBox(0, '' , $sOut)