NotesJSONArray (LotusScript)

JSON の配列を表します。

包含関係

包含元: NotesJSONNavigator に含まれる。

プロパティ

Size プロパティ
配列のサイズ。

メソッド

GetFirstElement メソッド
配列内の最初の JSON 要素を返します。

GetNextElement メソッド
配列内の次の JSON 要素を返します。

GetNthElement メソッド
配列内の指定された位置にある JSON 要素を返します。

AppendElement メソッド
NotesJSONElement を NotesJSONArray に追加します。

AppendArray メソッド
NotesJSONArray を NotesJSONArray に追加します。

AppendObject メソッド
NotesJSONObject を NotesJSONArray に追加します。

Copy メソッド
NotesJSONArrayから値をコピーします。

Size プロパティ

配列のサイズ

データ型

Long

GetFirstElement メソッド

配列内の最初の JSON 要素を返します。

構文

Set el = jsarray.GetFirstElement()

パラメータ

なし

戻り値

配列内の最初の NotesJSONElement を返します。

例

次のコードは、最初の要素である 1 をメッセージボックスで表示します。

Set jsnav = s.CreateJSONNavigator(|{"numbers:" : [1,2,3,4,5]}|)
Set el = jsnav.GetFirstElement()
Set arr = el.value
Set el = arr.GetFirstElement()
MsgBox "First element: " & CStr(el.Value)

GetNextElement メソッド

配列内の次の JSON 要素を返します。

構文

Set el = jsarray.GetNextElement()

パラメータ

なし

戻り値

配列内の次の NotesJSONElement を返します。

例

次のコードは、配列内の 2 をメッセージボックスに表示します。

Set jsnav = s.CreateJSONNavigator(|{"numbers:" : [1,2,3,4,5]}|)
Set el = jsnav.GetFirstElement()
Set arr = el.value
Set el = arr.GetFirstElement()
Set el = arr.GetNextElement()
MsgBox "Next element: " & CStr(el.Value)

GetNthElement メソッド

配列内の指定された位置にある JSON 要素を返します。

構文

Set el = jsarray.GetNthElement(Index)

パラメータ

Index

整数

返す要素を識別するための 1 をベースとしたインデックス値。

戻り値

配列内の n 番目の NotesJSONElement を返します。

例

次のコードは、配列内の 4 をメッセージボックスに表示します。

Set jsnav = s.CreateJSONNavigator(|{"numbers:" : [1,2,3,4,5]}|)
Set el = jsnav.GetFirstElement()
Set arr = el.value
Set el = arr.GetnthElement(4)
MsgBox "Nth element: " & CStr(el.Value)

AppendElement メソッド

NotesJSONElement を NotesJSONArray に追加します。

パラメータ

value

Variant。NotesJSONArray に追加する値。使用できる型は、String、Integer、Long、Double、 Boolean。

戻り値

NotesJSONArray に追加された NotesJSONElement を返します。

例

"myarray" という名前の配列に 3 つの要素を追加します。

Dim session As New NotesSession()
Dim jsnav As NotesJSONNavigator
Dim el As NotesJSONElement
Dim array As NotesJSONArray
		
Set jsnav = session.createJSONNavigator("")
Set array = jsnav.appendArray("myarray")
Set el = array.appendElement(3)
Set el = array.appendElement(4)
Set el = array.appendElement(5)

Result: :{"myarray":[3,4,5]}

AppendArray メソッド

NotesJSONArray を NotesJSONArray に追加します。

パラメータ

name

String。オプション。配列の名前。

戻り値

NotesJSONArray に追加された NotesJSONArray を返します。

例

"nestedArr" という名前の配列を "arr" という名前の配列に追加します。

Dim session As New NotesSession()
Dim jsnav As NotesJSONNavigator
Dim arr As NotesJSONArray
Dim nestedArr As NotesJSONArray
Set jsnav = session.createJSONNavigator("")
Set arr = jsnav.appendarray("myarray")
Call arr.appendElement(1)
Call arr.appendElement(2)
Call arr.appendElement(3)
Set nestedArr = arr.appendArray()
Call nestedArr.appendElement(4)
Call nestedArr.appendElement(5)
Call nestedArr.appendElement(6)

Result:{"myarray":[1,2,3,[4,5,6]]}

AppendObject メソッド

NotesJSONObject を NotesJSONArray に追加します。

戻り値

NotesJSONArray に追加された NotesJSONObject を返します。

例

"arr" という名前の配列にオブジェクトを追加します。

Dim session As New NotesSession()
Dim jsnav As NotesJSONNavigator
Dim arr As NotesJSONArray
Dim nestedObj As NotesJSONObject
Set jsnav = session.createJSONNavigator("")
Set arr = jsnav.appendarray("myarray")
Call arr.appendElement(1)
Call arr.appendElement(2)
Call arr.appendElement(3)
Set nestedObj = arr.appendObject
Call nestedObj.appendElement(4, "first element")
Call nestedObj.appendElement(5, "second element")
Call nestedObj.appendElement(6, "third element")

Result: :{"myarray":[1,2,3,{"first element":4,"second element":5,"third element":6}]}