快云接码平台对接api模块DEMO

.子程序 快云_取号, 逻辑型, 公开, 获取手机号
.参数 token, 文本型, , 登录时返回的token
.参数 获取数量, 文本型, 可空, 不填默认1个
.参数 项目ID, 文本型, , 第一次使用的项目要先去收藏
.参数 开发者参数, 文本型, 可空, 请登录平台查看
.参数 运营商, 文本型, 可空, [空为随机] 格式：移动，联通，电信，虚拟商，非虚拟商 注意：无需url编码
.参数 号段排除或指定, 文本型, 可空, excl[号段排除] incl[号段指定]
.参数 号段, 文本型, 可空, 号段（如：170|171|138）
.参数 区域, 文本型, 可空, [空为随机] 格式：省份/城市 例如：河南/郑州 注意：无需url编码
.参数 手机号码, 文本型, 参考, 返回格式：手机号码1, 手机号码2
.参数 失败原因, 文本型, 参考 可空
.局部变量 局_地址, 文本型
.局部变量 局_结果, 文本型
.局部变量 局_文本数组, 文本型, , "0"

运营商 ＝ 编码_URL编码 (运营商, 真, 真)
区域 ＝ 编码_URL编码 (区域, 真, 真)
局_地址 ＝ “………………………………” ＋ token ＋ “&getPhoneCount=” ＋ 获取数量 ＋ “&projId=” ＋ 项目ID ＋ “&sp=” ＋ 运营商 ＋ “&fltType=” ＋ 号段排除或指定 ＋ “&fltText=” ＋ 号段 ＋ “®ion=” ＋ 区域 ＋ “&du=” ＋ 开发者参数
局_结果 ＝ 编码_Utf8到Ansi (网页_访问 (局_地址))
局_文本数组 ＝ 分割文本 (局_结果, “|”, )
.如果真 (取数组成员数 (局_文本数组) ＜ 2)
失败原因 ＝ 局_结果
返回 (假)
.如果真结束
.如果真 (局_文本数组 [1] ＝ “1”)
手机号码 ＝ 局_文本数组 [2]
返回 (真)
.如果真结束
失败原因 ＝ 局_文本数组 [2]
返回 (假)