PB 生成和解析JSON格式数据「建议收藏」

2022-11-01 16:35:04 浏览数 (1)

大家好,又见面了,我是你们的朋友全栈君。

代码语言:javascript复制
一 创建用户对象sailjson

forward
global type sailjson from nonvisualobject
end type
type json_pair from structure within sailjson
end type
end forward

type json_pair from structure
	string		name
	any		value
end type

global type sailjson from nonvisualobject
end type
global sailjson sailjson

type variables
/*
	Sailjson:from www.pblsoft.com
	Please reserve this information
	
	Version:2.1
	Release date:2016-1-13
	update:add root is array. getrootarray
	
	Version:2.0
	Release date:2016-1-1
*/

private:
	json_pair pairs[]
	string is_json
	char ichars[]
	long idx, imaxlen

	treeview tree
	integer objectpcxidx, arraypcxidx, itempcxidx
	string is_ident
public:
	boolean ignoreCase = false
	integer ilevel
	string pair_index

end variables

forward prototypes
public function string parse (string as_json)
public function integer getarray (string itemname, ref any va[])
public function boolean isarray (any value)
public function any getattribut

版权声明:本文内容由互联网用户自发贡献,该文观点仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 举报,一经查实,本站将立刻删除。

0 人点赞