KintoneQuery

種別 kintone
説明 kintoneからクエリデータを取得する

構文 KintoneQuery(Domain, AppNo, Query)
引数 Domain:kintoneのドメイン名
  (https://penconnect.cybozu.com/k/155/なら、penconnect)

AppNo :kintoneのアプリ番号
  (https://penconnect.cybozu.com/k/155/なら、155)

Query :レコードを特定するためのクエリ文字列。
  kintone API のクエリの書き方の基本は、以下のURLを参照。
  https://developer.cybozu.io/hc/ja/articles/900001057206
戻り値 取得したレコード数
使用例 Dim s,Query,no,AppNo,ss,cnt
Dim max,i,p,l

' kintone API のクエリの書き方の基本は、下記のURLを参照の事。
'https://developer.cybozu.io/hc/ja/articles/900001057206

'Query = "企業コード = ""1500"""
'Query = "社員名 like ""山本"""
Query = "区分 in (""" & 区分 & """)"
AppNo = 385

'kintoneからクエリデータを取得する
cnt = KintoneQuery("penconnect", AppNo, Query)

if cnt = 0 then
  MsgBox("該当するレコードはありません")
  Exit Action
endif

if cnt > 6 then cnt = 6 '最大数を6に制限

for i=1 to cnt
  商品名[i] = KintoneData("商品名", i)
  商品画像[i] = KintoneData("商品画像", i)
  キャッチコピー[i] = KintoneData("キャッチコピー", i)
  規格[i] = KintoneData("規格", i)
  入数[i] = KintoneData("入数", i)
  納価[i] = KintoneData("納価", i)
  賞味期限[i] = KintoneData("賞味期限", i)
  JANコード[i] = KintoneData("JANコード", i)
next i
実例  
備考 関連する関数(GetKintoneRecodeNo、KintoneQuery、
KintoneData、KintoneUpload、KintoneSet、KintoneUpdate)


ver6.3より使用可能