教你开发列举网自动发帖软件!学习吧

又要来给大家分享编程技术啦!今天给大家提供的是一款用易语言开发列举网发帖的工具!
应用工具:
1、易语言
2、VIP模块
3、超文本浏览框
程序界面做出来大概是这个样子的:

还是老样子,直接分享代码大家下去了自己,研究,毕竟这里不能上传源码和程序,没办法,只能给大家发代码哈!一些开发的思路和技术点会跟大家讲到!

代码段:

.版本 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、从外部EXCEL文件读取发帖内容,再利用计次循环命令读取表内数据,再把数据通过填表模块写到网页里面,自动提交发布。

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

    推荐阅读