为编程爱好者分享易语言教程源码的资源网
辅助教程学习 程序员交流社区 挂机,挂机器人服务器95一年 广告位招租 三叶资源网交流群④ 【采购季】上云仅¥223/3年
广告位招租 每日疯抢商品 建站服务器 便宜好看的文具盒 三叶资源网交流群④ 【采购季】上云仅¥223/3年
程序员交流社区 每日疯抢商品 建站服务器 便宜好看的文具盒 三叶资源网交流群④ 【采购季】上云仅¥223/3年

网站首页 易语言相关 网络相关源码 正文

搜索QQ空间背景音乐易语言源码

三叶资源网 2012-05-27 网络相关源码 721 ℃ 1 评论

源码程序结合易语言正则表达式支持库,实现QQ空间背景音乐的搜索。

@易语言资源网

.版本 2
.支持库 RegEx
.支持库 spec
.支持库 iext

.子程序 搜索背景音乐
.参数 QQuser, 文本型
.局部变量 局部_内容, 文本型
.局部变量 局部_正则, 正则表达式
.局部变量 局部_搜索结果, 搜索结果, , "0"
.局部变量 局部_计次, 整数型
.局部变量 局部_表项, 整数型

局部_内容 = 到文本 (对象_HTTP读文件 (“GET”, “http://qzone-music.qq.com/fcg-bin/cgi_playlist_xml.fcg?json=1&uin=” + QQuser))
调试输出 (局部_内容)
局部_正则.创建 (#常量_搜索音乐, )
局部_搜索结果 = 局部_正则.搜索全部 (局部_内容)
超级列表框1.全部删除 ()
.计次循环首 (取数组成员数 (局部_搜索结果), 局部_计次)
    调试输出 (局部_搜索结果 [局部_计次].取子匹配文本 (局部_内容, 3, ))
    局部_表项 = 超级列表框1.插入表项 (, 到文本 (局部_计次), , , , )
    超级列表框1.置标题 (局部_表项, 1, 局部_搜索结果 [局部_计次].取子匹配文本 (局部_内容, 1, ))
    超级列表框1.置标题 (局部_表项, 2, 局部_搜索结果 [局部_计次].取子匹配文本 (局部_内容, 3, ))
.计次循环尾 ()
标签_状态.标题 = “一共搜索到 [” + 到文本 (超级列表框1.取表项数 ()) + “]首歌曲...”
文件下载


Tags:QQ空间易语言源码

来源:三叶资源网,欢迎分享,公众号:iisanye,(三叶资源网④群:72857039

已有1位网友发表了看法:

欢迎 发表评论:

百度站内搜索
关注微信公众号
三叶资源网④群:三叶资源网③群

网站分类
随机tag
EXUI例程鼠标连发矩阵应用代理注册自绘滚动条英文智能提示易编辑框源码微信Hook高并发http模型中间件易语言与PHP交互邮件大站协议纯组件实现圆形头像DX2登录易语言做网站快手did获取勒索病毒Edge浏览器幻影动图特效数组去重复
最新评论
友情链接