快手采集直播ID例子源码

快手采集直播ID例子源码

.版本 2

.程序集 窗口程序集_启动窗口
.程序集变量 did, 文本型
.程序集变量 sig, 文本型

.子程序 _按钮1_被单击

编辑框1.内容 ＝ 采集直播 ()

.子程序 采集直播, 文本型
.局部变量 局_网址, 文本型
.局部变量 局_提交数据, 文本型
.局部变量 协议头, 类_POST数据类
.局部变量 局_结果, 字节集
.局部变量 局_返回, 文本型

局_网址 ＝ “http://api.gifshow.com/rest/n/live/getEndRecommend?lon=113.2662730&appver=” ＋ 到文本 (取随机数 (1000, 9999)) ＋ “&lat=23.1317163&ver=6.5&did=” ＋ did
局_提交数据 ＝ “client_key=” ＋ “56c3713c”
局_提交数据 ＝ 局_提交数据 ＋ “&country_code=” ＋ “cn”
局_提交数据 ＝ 局_提交数据 ＋ “&language=” ＋ “zh-Hans-CN%3Bq%3D1”
局_提交数据 ＝ 局_提交数据 ＋ “&liveStreamId=” ＋ “xvuDGSxITWU”
局_提交数据 ＝ 局_提交数据 ＋ “&sig=” ＋ sig
协议头.添加 (“Connection”, “Keep-Alive”)
协议头.添加 (“Content-Length”, “125”)
协议头.添加 (“Content-Type”, “application/x-www-form-urlencoded”)
协议头.添加 (“Host”, “api.gifshow.com”)
协议头.添加 (“User-Agent”, “Mozilla/5.0 (compatible; MSIE 10.0; Windows NT 6.2)”)
局_结果 ＝ 网页_访问_对象 (局_网址, 1, 局_提交数据, , , 协议头.获取协议头数据 ())
局_返回 ＝ 编码_Utf8到Ansi (局_结果)
返回 (局_返回)

.子程序 __启动窗口_创建完毕

@枯叶蝶