Jump to content

Recommended Posts

Posted

Im trying to read a JSON file into an array.

 

The JSON looks like this:

 

{
  "project_info": {
    "project_number": "123456789",
    "url": "https://www.website.com",
    "project_id": "PRJ08",
    "Bucket": "Buk09"
  },
  "client": [
    {
      "client_info": {
        "id": "1:1001306455",
        "info": {
          "name": "banana"
        }
      },
      "oauth_client": [
        {
          "client_id": "1001306455694-m3h6v",
          "client_type": 3
        }
      ],
      "a_key": [
        {
          "key": "dkldkdkd"
        }
      ],
      "Avail": {
        "ana": {
          "status": 1
        },
        "vit": {
          "status": 1,
          "other": []
        },
        "ad": {
          "status": 2
        }
      }
    },
    {
      "client_info": {
        "id": "1:1838346",
        "info": {
          "name": "orange"
        }
      },
      "oauth_client": [
        {
          "client_id": "2145696315633-dmdhe",
          "client_type": 3
        }
      ],
      "a_key": [
        {
          "key": "osikdme"
        }
      ],
      "Avail": {
        "ana": {
          "status": 1
        },
        "vit": {
          "status": 1,
          "other": []
        },
        "ad": {
          "status": 2
        }
      }
    },
  ],
  "configuration_version": "1"
}

What I want to do is read it all into one single large array, can anyone help? 

All I have so far is:

#include "JSON.au3"
#include "array.au3"

$file = fileread("C:\file.json")

JsonToArray($file)

Func JsonToArray($JSON)
    $JSON = StringRegExpReplace($JSON, "[\[\]{}]", "")
    $sBreak = StringSplit($JSON, ",")
    For $a = 1 To $sBreak[0]
        $t = _JSONDecode("{" & $sBreak[$a] & "}")
        _ArrayDisplay($t, "multi " & $a & " of " & $sBreak[0])
    Next 
EndFunc   ;==>JsonToArray

 

Posted
  On 2/16/2017 at 8:42 PM, cookiemonster said:

read it all into one single large array

Expand  

But why ?
Did you realize that this would be multidimensional array ?
There are many different depth in this JSON path.

project_info.project_number
project_info.url
project_info.project_id
project_info.Bucket
client[0].client_info.id=1:1001306455
client[0].client_info.info.name
client[0].oauth_client.client_id
client[0].oauth_client.client_type
....
client[1].client_info.id=1:1838346
...
configuration_version=1

 

I would suggest you to use:

 

Signature beginning:
Please remember: "AutoIt"..... *  Wondering who uses AutoIt and what it can be used for ? * Forum Rules *
ADO.au3 UDF * POP3.au3 UDF * XML.au3 UDF * IE on Windows 11 * How to ask ChatGPT for AutoIt Codefor other useful stuff click the following button:

  Reveal hidden contents

Signature last update: 2023-04-24

Posted
  On 2/16/2017 at 9:04 PM, mLipok said:

But why ?
Did you realize that this would be multidimensional array ?
There are many different depth in this JSON path.

project_info.project_number
project_info.url
project_info.project_id
project_info.Bucket
client[0].client_info.id=1:1001306455
client[0].client_info.info.name
client[0].oauth_client.client_id
client[0].oauth_client.client_type
....
client[1].client_info.id=1:1838346
...
configuration_version=1

 

I would suggest you to use:

 

Expand  
 

That is true, sorry let me drill down to what I do need as most of it I dont... what I do need is just:

"id": "1:1001306455",
        "info": {
          "name": "banana"

  each time it occours, if this gives you any ideas?

Posted

Using Chilkat.au3

$oJSON.StringOf("client[0].client_info.info.name")

 

Signature beginning:
Please remember: "AutoIt"..... *  Wondering who uses AutoIt and what it can be used for ? * Forum Rules *
ADO.au3 UDF * POP3.au3 UDF * XML.au3 UDF * IE on Windows 11 * How to ask ChatGPT for AutoIt Codefor other useful stuff click the following button:

  Reveal hidden contents

Signature last update: 2023-04-24

Posted (edited)

Whether I can use your JSON string, as an example for my UDF ?

Edited by mLipok

Signature beginning:
Please remember: "AutoIt"..... *  Wondering who uses AutoIt and what it can be used for ? * Forum Rules *
ADO.au3 UDF * POP3.au3 UDF * XML.au3 UDF * IE on Windows 11 * How to ask ChatGPT for AutoIt Codefor other useful stuff click the following button:

  Reveal hidden contents

Signature last update: 2023-04-24

Posted

Check this:

#AutoIt3Wrapper_Au3Check_Parameters=-d -w 1 -w 2 -w 3 -w- 4 -w 5 -w 6 -w 7
;~ #AutoIt3Wrapper_Run_Debug_Mode=Y
#Tidy_Parameters=/sort_funcs /reel

#include <Array.au3>
#include <StringConstants.au3>
#include "Chilkat.au3"

Global $__g_oGLOBAL = _Example_Init()
_Example()

Func _Example()
    Local $oJSON = _Chilkat_JSON_ObjCreate()
    $oJSON.LoadFile(@ScriptDir & '\cookiemonster.json')

;~  https://www.example-code.com/vbscript/json_paths.asp
    Local $iClientSize = $oJSON.SizeOfArray("client")
    Local $sJSON_Path = ''
    For $iClient_idx = 0 To $iClientSize -1
        $sJSON_Path = "client[" & $iClient_idx & "].client_info.info.name"
        ConsoleWrite("+ " & $sJSON_Path & " = " & $oJSON.StringOf($sJSON_Path) & @CRLF)
    Next
EndFunc

Func _Example_Init()

    _ErrorLog_ChilkatWrapper(ConsoleWrite)
    _Chilkat_StartUp(@ScriptDir & '\ChilkatAx-9.5.0-win32.dll')
    _Chilkat_DllVersion($CHILKATOBJ_VERSION_950)

    $__g_oGLOBAL = _Chilkat_GLOBAL_ObjCreate()
    If @error Then MsgBox($MB_ICONERROR, 'GLOBAL Declartion', '@error = ' & @error & @CRLF & '@extended = ' & @extended)

    _Chilkat_GLOBAL_UnlockBundle($__g_oGLOBAL, "Anything for 30-day trial")
    If @error Then MsgBox($MB_ICONERROR, 'UnlockBundle', '@error = ' & @error & @CRLF & '@extended = ' & @extended)
    
    Return $__g_oGLOBAL
EndFunc   ;==>_Example_Init

 

Signature beginning:
Please remember: "AutoIt"..... *  Wondering who uses AutoIt and what it can be used for ? * Forum Rules *
ADO.au3 UDF * POP3.au3 UDF * XML.au3 UDF * IE on Windows 11 * How to ask ChatGPT for AutoIt Codefor other useful stuff click the following button:

  Reveal hidden contents

Signature last update: 2023-04-24

Posted

Here is another possible method.

#include <Array.au3>

Local $JSONTestFile = StringRegExpReplace(FileRead(@ScriptFullPath), "(?s)^.*#cs\v+|#ce.*$", "")
;ConsoleWrite($JSONTestFile & @CRLF)

; Results as asked for in post #3
Local $b = StringRegExp($JSONTestFile, '"id":\h*"[^"]+",\s*"info":\h*{\s+"name":\h*"[^"]+"', 3)
_ArrayDisplay($b)

; Or

; Specific results in 2D array.
Local $a = StringRegExp($JSONTestFile, '"id":\h*"([^"]+)",\s*"info":\h*{\s+"name":\h*"([^"]+)"', 3)
;_ArrayDisplay($a)

Local $Array2D[UBound($a) / 2][2] ; Convert 1D array into 2D array
For $i = 0 To UBound($Array2D) - 1
    $Array2D[$i][0] = $a[$i * 2]
    $Array2D[$i][1] = $a[($i * 2) + 1]
Next
_ArrayDisplay($Array2D)


#cs
{
  "project_info": {
    "project_number": "123456789",
    "url": "https://www.website.com",
    "project_id": "PRJ08",
    "Bucket": "Buk09"
  },
  "client": [
    {
      "client_info": {
        "id": "1:1001306455",
        "info": {
          "name": "banana"
        }
      },
      "oauth_client": [
        {
          "client_id": "1001306455694-m3h6v",
          "client_type": 3
        }
      ],
      "a_key": [
        {
          "key": "dkldkdkd"
        }
      ],
      "Avail": {
        "ana": {
          "status": 1
        },
        "vit": {
          "status": 1,
          "other": []
        },
        "ad": {
          "status": 2
        }
      }
    },
    {
      "client_info": {
        "id": "1:1838346",
        "info": {
          "name": "orange"
        }
      },
      "oauth_client": [
        {
          "client_id": "2145696315633-dmdhe",
          "client_type": 3
        }
      ],
      "a_key": [
        {
          "key": "osikdme"
        }
      ],
      "Avail": {
        "ana": {
          "status": 1
        },
        "vit": {
          "status": 1,
          "other": []
        },
        "ad": {
          "status": 2
        }
      }
    },
  ],
  "configuration_version": "1"
}
#ce

 

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
×
×
  • Create New...