基于易语言，百度推广，飞鱼信息流，快手信息流等整合系统

代码：

.版本 2

.子程序 getUserListByMccid, 文本型, 公开, 账户管家查询下辖子账户
.参数 管家账户, 文本型
.参数 管家密码, 文本型
.参数 Token, 文本型
.局部变量 局_网址, 文本型
.局部变量 局_方式, 整数型
.局部变量 局_提交数据, 文本型
.局部变量 ADD_协议头, 类_POST数据类
.局部变量 局_提交协议头, 文本型
.局部变量 局_结果, 字节集
.局部变量 局_返回, 文本型

局_网址 ＝ “https://api.baidu.com/json/feed/v1/MccFeedService/getUserListByMccid”
局_方式 ＝ 1
局_提交数据 ＝ “{” ＋ #引号 ＋ “header” ＋ #引号 ＋ “:{” ＋ #引号 ＋ “authorityType” ＋ #引号 ＋ “:1,” ＋ #引号 ＋ “username” ＋ #引号 ＋ “:” ＋ #引号 ＋ 管家账户 ＋ #引号 ＋ “,” ＋ #引号 ＋ “password” ＋ #引号 ＋ “:” ＋ #引号 ＋ 管家密码 ＋ #引号 ＋ “,” ＋ #引号 ＋ “token” ＋ #引号 ＋ “:” ＋ #引号 ＋ Token ＋ #引号 ＋ “}}”
ADD_协议头.添加 (“User-Agent”, “Mozilla/5.0 (Windows NT 10.0; Win64; x64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/92.0.4515.131 Safari/537.36”)
局_提交协议头 ＝ ADD_协议头.获取协议头数据 ()
局_结果 ＝ 网页_访问_对象 (局_网址, 局_方式, , , , 局_提交协议头, , , , 编码_UTF8编码 (局_提交数据))
局_返回 ＝ 到文本 (编码_编码转换对象 (局_结果))
返回 (局_返回)

.子程序 getAccountInfo, 文本型, 公开, 查询账户余额预算
.参数 管家账户, 文本型
.参数 管家密码, 文本型
.参数 Token, 文本型
.参数 username, 文本型
.局部变量 局_网址, 文本型
.局部变量 局_方式, 整数型
.局部变量 局_提交数据, 文本型
.局部变量 ADD_协议头, 类_POST数据类
.局部变量 局_提交协议头, 文本型
.局部变量 局_结果, 字节集
.局部变量 局_返回, 文本型

局_网址 ＝ “https://api.baidu.com/json/sms/service/AccountService/getAccountInfo”
局_方式 ＝ 1
局_提交数据 ＝ “{” ＋ #引号 ＋ “header” ＋ #引号 ＋ “:{” ＋ #引号 ＋ “authorityType” ＋ #引号 ＋ “:1,” ＋ #引号 ＋ “username” ＋ #引号 ＋ “:” ＋ #引号 ＋ 管家账户 ＋ #引号 ＋ “,” ＋ #引号 ＋ “password” ＋ #引号 ＋ “:” ＋ #引号 ＋ 管家密码 ＋ #引号 ＋ “,” ＋ #引号 ＋ “token” ＋ #引号 ＋ “:” ＋ #引号 ＋ Token ＋ #引号 ＋ “,” ＋ #引号 ＋ “target” ＋ #引号 ＋ “:” ＋ #引号 ＋ username ＋ #引号 ＋ “},” ＋ #引号 ＋ “body” ＋ #引号 ＋ “:{” ＋ #引号 ＋ “accountFields” ＋ #引号 ＋ “:[” ＋ #引号 ＋ “cost” ＋ #引号 ＋ “,” ＋ #引号 ＋ “balance” ＋ #引号 ＋ “,” ＋ #引号 ＋ “userStat” ＋ #引号 ＋ “,” ＋ #引号 ＋ “budgetType” ＋ #引号 ＋ “,” ＋ #引号 ＋ “budget” ＋ #引号 ＋ “,” ＋ #引号 ＋ “pcBalance” ＋ #引号 ＋ “,” ＋ #引号 ＋ “excludeIp” ＋ #引号 ＋ “,” ＋ #引号 ＋ “openDomains” ＋ #引号 ＋ “,” ＋ #引号 ＋ “payment” ＋ #引号 ＋ “,” ＋ #引号 ＋ “regDomain” ＋ #引号 ＋ “,” ＋ #引号 ＋ “regionTarget” ＋ #引号 ＋ “,” ＋ #引号 ＋ “userLevel” ＋ #引号 ＋ “,” ＋ #引号 ＋ “regionPriceFactor” ＋ #引号 ＋ “,” ＋ #引号 ＋ “userId” ＋ #引号 ＋ “,” ＋ #引号 ＋ “budgetOfflineTime” ＋ #引号 ＋ “]}}”
ADD_协议头.添加 (“User-Agent”, “Mozilla/5.0 (Windows NT 10.0; Win64; x64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/92.0.4515.131 Safari/537.36”)
局_提交协议头 ＝ ADD_协议头.获取协议头数据 ()
局_结果 ＝ 网页_访问_对象 (局_网址, 局_方式, , , ,