手把手教你开发列举网自动发帖软件!神器哈

又要来给大家分享编程技术啦!今天给大家提供的是一款用易语言开发列举网发帖的工具!

应用工具:

1、易语言

2、 VIP模块

3、超文本浏览框

程序界面做出来大概是这个样子的:

手把手教你开发列举网自动发帖软件!神器哈_第1张图片

还是老样子,直接分享代码大家下去了自己,研究,如果直接下载源码的话,我们已经上传好csdn站了

https://download.csdn.net/download/qq_15159657/12238463(此程序源码)

大家可以点击直接下载!

手把手教你开发列举网自动发帖软件!神器哈_第2张图片

代码段:

.版本 2
.支持库 eAPI
.支持库 spec
.支持库 eExcel2000
.支持库 HtmlView

.程序集 窗口程序集_启动窗口

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

打开指定网址 (“http://www.xkrj5.com”)

.子程序 发布信息, 逻辑型
.局部变量 填表, 网页填表
.局部变量 对象1, 对象
.局部变量 zz, 正则表达式类
.局部变量 文本, 文本型

填表.初始化 (超文本浏览框1.取窗口句柄 ())
延迟 (3000)
填表.组合框_置现行选中项 (“p8_fenlei_zone”, 2)
延迟 (1000)

编辑框2.内容 = 文本_取出文本中汉字 (编辑框2.内容)
填表.文本框_写内容 (“atc_title”, 编辑框2.内容)

填表.组合框_置现行选中项 (“atc_leibie”, 8)
填表.文本框_写内容 (“atc_dizhi”, “未知”)
延时 (2000)
填表.初始化 (超文本浏览框1.取窗口句柄 ())
填表.文本框_写内容 (“postdb[content]”, “19951220gjx”)
对象1 = 填表.网页_取元素对象 (“textarea”, “id==atc_content”)

填表.网页_写元素内容 (对象1, 内容)

延迟 (2000)

.判断开始 (填表.按钮_点击 (“提交发布”) = 真)
    返回 (真)
.默认
    返回 (假)
.判断结束


.子程序 _按钮2_被单击
.局部变量 y, 整数型
.局部变量 次数, 整数型


.计次循环首 (到整数 (编辑框5.内容), y)


    Excel程序1.创建 ()
    Excel工作簿1.置程序 (Excel程序1)
    Excel工作簿1.激活工作簿 ()
    Excel工作簿1.打开 (编辑框1.内容)
    次数 = 到整数 (编辑框4.内容) + y
    Excel工作簿1.首单元格 = “B” + 到文本 (次数)
    编辑框2.内容 = Excel工作簿1.内容
    Excel工作簿1.首单元格 = “C” + 到文本 (次数)
    内容 = Excel工作簿1.内容
    编辑框3.内容 = 内容
    编辑框3.加入文本 (#换行符 + “读取成功!延迟执行2秒钟”)
    延迟 (2000)

    .判断开始 (发布信息 () = 真)
        延迟 (2000)
        编辑框3.加入文本 (#换行符 + “成功的选择b” + 到文本 (次数))
        超文本浏览框1.跳转 (“http://bj.lieju.com/post/111”, , )
    .默认
        编辑框3.加入文本 (#换行符 + “失败的选择c” + 到文本 (次数))

    .判断结束

.计次循环尾 ()
信息框 (“发布完成.发布到:” + 编辑框2.内容, 0, , )
写到文件 (取当前目录 () + “/发布状态.txt”, 到字节集 (编辑框2.内容))

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

通用对话框1.打开 ()
编辑框1.内容 = 通用对话框1.文件名




.子程序 _按钮1_被单击
.局部变量 填表, 网页填表

填表.初始化 (超文本浏览框1.取窗口句柄 ())
填表.文本框_写内容 (“username”, 编辑框6.内容)
填表.文本框_写内容 (“password”, 编辑框7.内容)
延迟 (1000)
填表.按钮_点击 (“Submit3”)
延迟 (3000)
超文本浏览框1.跳转 (“http://bj.lieju.com/post/111”, , )

开发的思路和步骤:

1、打开列举网网址

 

2、通过填表功能,自动置入账号密码,然后进行登录。

手把手教你开发列举网自动发帖软件!神器哈_第3张图片

3、从外部EXCEL文件读取发帖内容,再利用计次循环命令读取表内数据,再把数据通过填表模块写到网页里面,自动提交发布。

手把手教你开发列举网自动发帖软件!神器哈_第4张图片

手把手教你开发列举网自动发帖软件!神器哈_第5张图片

 其实整个代码操作起来就这么简单,还不到50行代码就能实现列举网的批量发布信息的功能!大家可以照猫画虎的操作一下,直接把代码复制到你的程序里面即可,这太简答了。

 

你可能感兴趣的:(易语言,软件原理分析)