易语言qq空间日记源码_易语言协议红包源码

文章目录：

• 1、易语言刷空间日志人气源码
• 2、易语言怎么取QQ空间日志里的内容
• 3、易语言QQ空间登陆源码
• 4、易语言怎么读取qq空间日志内容？

易语言刷空间日志人气源码

你是要一直点击你的qq空间的源码？

这个是比较叫容易的，你可以用个超文本浏览框，在用一个时钟，时钟设置好一个频率，在时钟事件里面写

超文本浏览框.地址=“你自己的空间网址”

就可以了

易语言怎么取QQ空间日志里的内容

实现代码如下：

[attachment=14999]

具体代码自己修改

复制代码

[e].版本 2

.支持库 EThread

.支持库 xplib

.支持库 iext

.支持库 internet

.程序集 窗口程序集1, , , 只能输入20个列

.程序集变量 日志编号, 文本型, , "0"

.程序集变量 QQ号码, 文本型

.子程序 _查询按钮_被单击

启动线程 (日志查询, 日志线程句柄)

XP风格 (2)

.子程序 日志查询

.局部变量 过度文本, 文本型

.局部变量 表项索引, 整数型

.局部变量 计次, 整数型

.局部变量 出现次数, 整数型

.局部变量 日志分类, 文本型, , "0"

.局部变量 日志标题, 文本型, , "0"

.局部变量 评论次数, 文本型, , "0"

QQ号码 ＝ QQ号码编辑框.内容

过度文本 ＝ “”

状态标签.标题 ＝ “正在搜索......”

日志超级列表框.全部删除 ()

过度文本 ＝ 到文本 (HTTP读文件 (“” ＋ QQ号码 ＋ “vuin=0property=GoREcategory=numperpage=20sorttype=0arch=0pos=0direct=1r=0.8082843897968415”))

.如果真 (寻找文本 (过度文本, “错误的QQ号码”, 1, 假) ≠ -1)

状态标签.标题 ＝ “ QQ号码有误请重输！”

返回 ()

.如果真结束

出现次数 ＝ 文本_取出中间 (过度文本, “category” ＋ #引号 ＋ “:” ＋ #引号, #引号 ＋ “,”, 日志分类)

文本_取出中间 (过度文本, “title” ＋ #引号 ＋ “:” ＋ #引号, #引号 ＋ “}”, 日志标题)

文本_取出中间 (过度文本, “replynum” ＋ #引号 ＋ “:”, “,”, 评论次数)

.计次循环首 (出现次数, 计次)

表项索引 ＝ 日志超级列表框.插入表项 (, , , , , )

日志超级列表框.置标题 (表项索引, 0, 到文本 (计次))

日志超级列表框.置标题 (表项索引, 1, 日志分类 [计次])

日志超级列表框.置标题 (表项索引, 2, 日志标题 [计次])

日志超级列表框.置标题 (表项索引, 3, 评论次数 [计次])

.计次循环尾 ()

.如果 (出现次数 ＝ 0)

状态标签.标题 ＝ “该QQ设置密码！”

.否则

状态标签.标题 ＝ “共有日志：” ＋ 到文本 (计次 － 1) ＋ “篇”

.如果结束

.子程序 文本_取出中间, 整数型, 公开, 此过程效率不太高，可以实现所要实现的功能BY：66378687

.参数 待找文本, 文本型

.参数 前面文本, 文本型

.参数 后面文本, 文本型

.参数 保留数组, 文本型, 数组

.局部变量 临时数组, 文本型, , "0"

.局部变量 前面长度, 整数型

.局部变量 零时位置, 整数型

.局部变量 临时文本, 文本型

.局部变量 临时数组长度, 整数型

.局部变量 计数, 整数型

.局部变量 保存数组, 文本型, , "0"

.局部变量 计数1, 整数型

.局部变量 数字, 整数型

前面长度 ＝ 取文本长度 (前面文本)

零时位置 ＝ 寻找文本 (待找文本, 前面文本, , 假)

临时数组 ＝ 分割文本 (待找文本, 前面文本, ) ' 零时数组第一个是不符合要求的，需要去掉后处理

' 下面对临时数组进行处理

.如果 (取数组成员数 (临时数组) ≤ 1)

返回 (0)

结束 ()

.否则

.如果结束

重定义数组 (保留数组, 假, 取数组成员数 (临时数组) － 1)

计数 ＝ 1

.循环判断首 ()

临时文本 ＝ 临时数组 [计数 ＋ 1]

保留数组 [计数] ＝ 临时文本

计数 ＝ 计数 ＋ 1

.循环判断尾 (计数 ＜ 取数组成员数 (临时数组))

临时数组长度 ＝ 取数组成员数 (临时数组)

.计次循环首 (取数组成员数 (保留数组), 计数)

零时位置 ＝ 寻找文本 (临时数组 [计数 ＋ 1], 后面文本, , 假)

保留数组 [计数] ＝ 取文本左边 (保留数组 [计数], 零时位置 － 1)

.计次循环尾 ()

返回 (计数 － 1)

[/e]

易语言QQ空间登陆源码

你好！

QQ空间是用GET。不是用POST。

GET比POST更安全些。

易语言怎么读取qq空间日志内容？

用超文本链接框（用于让用户登陆）。登陆后再用枚举文章连接把文章连接给枚举出来，枚举完以后再让易语言一个个的去读取文章的源代码后再枚举文章内容。所谓的枚举内容就是把一段文本中需要的那一段文本取出来。