精易论坛

标题: 利用接口获取QQ名称 [打印本页]

作者: hhhql    时间: 2017-10-27 18:42
标题: 利用接口获取QQ名称
易语言新手多关照
源码调用了精易模块
.版本 2
.支持库 internet
.支持库 spec
.子程序 取QQ名称, , 公开
.参数 QQ, 文本型
.参数 是否编辑框, 逻辑型, 可空, 如果为空则会调试输出名称     如果为真则存放名称的编辑框可用   如果为假则存放名称的标签可用    存放名称的编辑框为不可用
.参数 存放名称的编辑框, 编辑框, 可空
.参数 存放名称的标签, 标签, 可空
.局部变量 全部文本, 文本型
.局部变量 取出的QQ名称, 文本型
全部文本 = 到文本 (HTTP读文件 (“http://r.pengyou.com/fcg-bin/cgi_get_portrait.fcg?uins=” + QQ))
取出的QQ名称 = 文本_取出中间文本 (全部文本, “1,0,0,0,” + #引号, #引号 + “,0]})”, , )
调试输出 (取出的QQ名称)
.如果真 (是否为空 (是否编辑框))
    是否编辑框 = 假
.如果真结束
.如果 (是否编辑框 = 真)
    存放名称的编辑框.加入文本 (取出的QQ名称)
.否则
    存放名称的标签.标题 = 取出的QQ名称
.如果结束
返回 ()

QQ截图20171027183604.png (66.51 KB, 下载次数: 1)

QQ截图20171027183604.png

作者: 李麻花    时间: 2017-10-27 19:41
正需要,谢谢了
作者: 风里刀    时间: 2017-10-27 19:43
下载观摩一下
作者: 紫色风铃    时间: 2017-10-28 08:09
补充下。。取出的QQ名称 = 文本_取出中间文本 (全部文本, “1,0,0,0,” + #引号, #引号 + “,0]})”, , )  不是每次都取的出来!!!
.版本 2
.支持库 internet
.支持库 spec

.子程序 QQ_QQ号取名称, 文本型, 公开, QQ小于10001返回空
.参数 QQ, 文本型
.局部变量 文本, 文本型
.局部变量 QQ名称, 文本型

.如果真 (到整数 (QQ) ≤ 10000)
    返回 (“”)
.如果真结束
文本 = 到文本 (HTTP读文件 (“http://r.pengyou.com/fcg-bin/cgi_get_portrait.fcg?uins=” + QQ))
文本 = 文本_取右边 (文本, “http”)
文本 = 文本_取出中间文本 (文本, #引号 + “,”, #引号 + “,”)
QQ名称 = 文本_取右边 (文本, #引号)
返回 (QQ名称)

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

调试输出 (QQ_QQ号取名称 (编辑框1.内容))

作者: 人气猫    时间: 2017-10-28 09:42
这个可以有。。。。。。。。。。。。。。
作者: hhhql    时间: 2017-10-28 10:17
紫色风铃 发表于 2017-10-28 08:09
补充下。。取出的QQ名称 = 文本_取出中间文本 (全部文本, “1,0,0,0,” + #引号, #引号 + “,0]})”, ,  ...

感谢,
作者: napianhai    时间: 2017-10-28 10:52
这个可以有。。。。。。。。。。。。。
作者: 风九幽    时间: 2017-10-28 11:11
怎么找出来的接口
作者: 奶夫    时间: 2017-10-28 13:52
爱爱爱
作者: kagari    时间: 2017-10-28 16:28
怎么找出来的接口
作者: 那小子很坏    时间: 2017-10-29 18:58
不行啊 你试一下  120180032  这个

作者: 诺亚方舟    时间: 2017-10-30 18:47
怎么没有源码

作者: hhhql    时间: 2017-12-27 21:15
自己回复得精币

作者: TianWang233    时间: 2019-7-21 14:00
这个QQ的模块去哪里下载?我下载的没这个命令
作者: 常家人    时间: 2022-4-12 21:38
感谢1111111111111
作者: CHEN7333    时间: 2022-8-22 21:49
66666666666666666666
作者: 全网算账罗某    时间: 2024-7-6 15:56
12312试试看




欢迎光临 精易论坛 (https://125.confly.eu.org/) Powered by Discuz! X3.4