小歪：adobe系列软件下载器

Eyy讲师小歪

一款可以自动获取Adobe系列软件的程序，其实实现这个方法更简单的是使用正则表达式，但是~！！！！！我！不！会    Adobe软件下载器.rar (1.63 MB, 下载次数: 60)

2017-6-22 08:22 上传

点击文件名下载附件
下载积分: 精币 -2 枚

软件打开的时候会弹出和我自己的聊天窗口，如果有能碰见正则的大神，希望能和我交流一下。




我发布源码的初衷还是和以前一样，想让大家都用上我们自己的软件，谁知道网上的软件是不是加了什么不干净的东西呢！




这个软件的实现非常简单，希望大神勿喷，仅供大家学习，不用到商业用途上，毕竟我给大家开源也没人给我钱。嘻嘻，好了看源码吧。

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

打开指定网址 (“tencent://message/?uin=1454144616&Site=在线咨询&Menu=yes;”)
生成语音 (0, 真, “已经为您打开与作者的QQ聊天窗口，如果您在使用过程中有任何的问题，请告诉作者！Has opened the chat window with the author for you, if you have any questions in the course of using, please tell the author!”)
皮肤_资源加载 ( #皮肤_QQ2011, , )
按钮_获取软件.标题 ＝ “正在获取，请稍后…………”
启动线程 (&取出软件名称, , )
设置窗口透明度 (卷帘式菜单1.取窗口句柄 (), 100)

子程序名	返回值类型	公开	备 注
取出软件名称

变量名	类 型	静态	数组	备 注
i	整数型

网站源代码 ＝ 到文本 (HTTP读文件 (“http://www.33lc.com/zhuanti/adoberjdq/”))
文本_取中间_批量 (网站源代码, #寻找标识符_左边, #寻找标识符_右边, 软件标识符)
文本_取中间_批量 (网站源代码, #寻找软件标题_左边, #寻找软件标题_右边, 软件标题)
文本_取中间_批量 (网站源代码, #寻找软件说明_左边, #寻找软件说明_右边, 软件说明)
文本_取中间_批量 (网站源代码, #寻找软件版本_左边, #寻找软件版本_右边, 软件版本)
计次循环首 (取数组成员数 (软件标识符), i)
调试输出 (软件标识符 [i])
调试输出 (软件说明 [i])
调试输出 (软件版本 [i])
软件标题 [i] ＝ 文本_取出中间文本 (网站源代码, #寻找软件标题_左边 ＋ 软件标识符 [i] ＋ #寻找软件标题_中间, #寻找软件标题_右边, )
调试输出 (软件标题 [i])
卷帘式菜单1.加入菜单 (软件标题 [i], , )
卷帘式菜单1.置菜单名称 (i － 1, 软件标题 [i])
卷帘式菜单1.置菜单提示文本 (i － 1, 软件标题 [i])
调试输出 (“菜单标识符：” ＋ 卷帘式菜单1.取菜单提示文本 (i － 1))
卷帘式菜单1.加入项目 (“软件标题：” ＋ 软件标题 [i] ＋ 软件版本 [i], i － 1, , , )
卷帘式菜单1.加入项目 (“软件标识符：” ＋ 软件标识符 [i], i － 1, , , )
卷帘式菜单1.加入项目 (“双击此处更新数据”, i － 1, , , )
写配置项 (取运行目录 () ＋ “/FileName.ini”, “Adobe软件自动生成Adobe文件名称_配置文件”, 到文本 (i), “软件标题：” ＋ 软件标题 [i] ＋ 软件版本 [i])
' 卷帘式菜单1.加入项目 (“软件说明：” ＋ 软件说明 [i], i － 1, , , )
计次循环尾 ()
软件对接码 ＝ 1
按钮_获取软件.标题 ＝ “加载完毕，正在获取详细说明…………”
_启动窗口.标题 ＝ “Adobe程序大全” ＋ “  - ->信息已经获取完毕，共找到：” ＋ 到文本 (i) ＋ “个Adobe软件  - ->”
启动线程 (&软件详细说明, , )

子程序名	返回值类型	公开	备 注
_卷帘式菜单1_菜单被单击
参数名	类 型	参考	可空	数组	备 注
菜单索引	整数型

变量名	类 型	静态	数组	备 注
i	整数型			http://www.33lc.com/soft/15126.html

计次循环首 (取数组成员数 (软件标题), i)
判断 (卷帘式菜单1.取菜单提示文本 (卷帘式菜单1.现行选中菜单) ＝ 软件标题 [i])
调试输出 (“因为：” ＋ 卷帘式菜单1.取菜单提示文本 (i － 1) ＋ “和” ＋ 软件标题 [i] ＋ “相同，所以匹配成功！”)
软件对接码 ＝ i
调试输出 (“找到了” ＋ 到文本 (软件对接码))
跳出循环 ()
到循环尾 ()

计次循环尾 ()
软件详细说明 ()

子程序名	返回值类型	公开	备 注
软件详细说明

透明标签_说明.标题 ＝ “”
详细说明添加 (“软件名称：” ＋ 软件标题 [软件对接码])
详细说明添加 (“软件标识符：” ＋ 软件标识符 [软件对接码])
详细说明添加 (“软件下载地址：http://www.33lc.com/soft/” ＋ 软件标识符 [软件对接码] ＋ “.html”)
详细说明添加 (“软件详细说明：” ＋ 软件说明 [软件对接码])
详细说明添加 (“注意：如果这边显示的数据和您选择的软件信息不一样，请双击项目文本【双击此处更新链接】来更新数据！如果徐下方一直在现实获取信息中，您可以多试几次，或者多次重启此程序即可解决！”)
按钮_获取软件.标题 ＝ “详细说明获取完毕，正在寻找下载地址…………”
启动线程 (&寻找下载地址, , )

子程序名	返回值类型	公开	备 注
寻找下载地址

变量名	类 型	静态	数组	备 注
源文件	文本型
i	整数型

源文件 ＝ 到文本 (HTTP读文件 (“http://www.33lc.com/soft/” ＋ 软件标识符 [软件对接码] ＋ “.html”))
' 文本_取中间_批量 (源文件, #寻找下载地址_左边, #寻找下载地址_右边, 下载地址, , )
文本_取中间_批量 (源文件, #寻找下载地址_左边, #寻找下载地址_右边, 下载地址)
调试输出 (取数组成员数 (下载地址))
计次循环首 (取数组成员数 (下载地址), i)
调试输出 (“http://psoft.33lc.com:801/small/” ＋ 下载地址 [i] ＋ #换行符 )
计次循环尾 ()
如果真 (取数组成员数 (下载地址) ＞ 1)
详细说明添加 (“当前下载地址为：http://psoft.33lc.com:801/small/” ＋ 下载地址 [i － 1])
downaddress ＝ “http://psoft.33lc.com:801/small/” ＋ 下载地址 [i － 1]
按钮_获取软件.标题 ＝ “单击此处下载：” ＋ 软件标题 [软件对接码] ＋ “注意：如果这边显示的数据和您选择的软件信息不一样，请双击项目文本【双击此处更新数据】来更新数据！”

子程序名	返回值类型	公开	备 注
详细说明添加
参数名	类 型	参考	可空	数组	备 注
说明内容	文本型

透明标签_说明.标题 ＝ 透明标签_说明.标题 ＋ 说明内容 ＋ #换行符 ＋ #换行符

子程序名	返回值类型	公开	备 注
_按钮_获取软件_被单击

打开指定网址 (downaddress)

子程序名	返回值类型	公开	备 注
_卷帘式菜单1_项目被双击
参数名	类 型	参考	可空	数组	备 注
菜单索引	整数型
项目索引	整数型

变量名	类 型	静态	数组	备 注
i	整数型			http://www.33lc.com/soft/15126.html

计次循环首 (取数组成员数 (软件标题), i)
判断 (卷帘式菜单1.取菜单提示文本 (卷帘式菜单1.现行选中菜单) ＝ 软件标题 [i])
调试输出 (“因为：” ＋ 卷帘式菜单1.取菜单提示文本 (i － 1) ＋ “和” ＋ 软件标题 [i] ＋ “相同，所以匹配成功！”)
软件对接码 ＝ i
调试输出 (“找到了” ＋ 到文本 (软件对接码))
跳出循环 ()
到循环尾 ()

计次循环尾 ()
软件详细说明 ()

子程序名	返回值类型	公开	备 注
__启动窗口_可否被关闭	逻辑型

判断 (信息框 (“您是否要关闭此程序，单击【是】按钮退出程序，单击【否】返回程序！”, #信息图标 ＋ #是否钮, “提示”, ) ＝ #是钮 )
结束 ()
返回 (假)

i支持库列表	支持库注释
eAPI	应用接口支持库
EThread	多线程支持库
internet	互联网支持库
spec	特殊功能支持库
iext3	扩展界面支持库三
iext	扩展界面支持库一

.版本 2<br /> .支持库 eAPI<br /> .支持库 EThread<br /> .支持库 internet<br /> .支持库 spec<br /> .支持库 iext3<br /> .支持库 iext<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> 打开指定网址 (“tencent://message/?uin=1454144616&Site=在线咨询&Menu=yes;”)<br /> 生成语音 (0, 真, “已经为您打开与作者的QQ聊天窗口，如果您在使用过程中有任何的问题，请告诉作者！Has opened the chat window with the author for you, if you have any questions in the course of using, please tell the author!”)<br /> <br /> 皮肤_资源加载 (#皮肤_QQ2011, , )<br /> 按钮_获取软件.标题 ＝ “正在获取，请稍后…………”<br /> 启动线程 (&取出软件名称, , )<br /> 设置窗口透明度 (卷帘式菜单1.取窗口句柄 (), 100)<br /> <br /> .子程序 取出软件名称<br /> .局部变量 i, 整数型<br /> <br /> 网站源代码 ＝ 到文本 (HTTP读文件 (“http://www.33lc.com/zhuanti/adoberjdq/”))<br /> 文本_取中间_批量 (网站源代码, #寻找标识符_左边, #寻找标识符_右边, 软件标识符)<br /> 文本_取中间_批量 (网站源代码, #寻找软件标题_左边, #寻找软件标题_右边, 软件标题)<br /> 文本_取中间_批量 (网站源代码, #寻找软件说明_左边, #寻找软件说明_右边, 软件说明)<br /> 文本_取中间_批量 (网站源代码, #寻找软件版本_左边, #寻找软件版本_右边, 软件版本)<br /> .计次循环首 (取数组成员数 (软件标识符), i)<br />     调试输出 (软件标识符 <i>)<br />     调试输出 (软件说明 <i>)<br />     调试输出 (软件版本 <i>)<br />     软件标题 <i> ＝ 文本_取出中间文本 (网站源代码, #寻找软件标题_左边 ＋ 软件标识符 <i> ＋ #寻找软件标题_中间, #寻找软件标题_右边, )<br />     调试输出 (软件标题 <i>)<br />     卷帘式菜单1.加入菜单 (软件标题 <i>, , )<br />     卷帘式菜单1.置菜单名称 (i － 1, 软件标题 <i>)<br />     卷帘式菜单1.置菜单提示文本 (i － 1, 软件标题 <i>)<br />     调试输出 (“菜单标识符：” ＋ 卷帘式菜单1.取菜单提示文本 (i － 1))<br />     卷帘式菜单1.加入项目 (“软件标题：” ＋ 软件标题 <i> ＋ 软件版本 <i>, i － 1, , , )<br />     卷帘式菜单1.加入项目 (“软件标识符：” ＋ 软件标识符 <i>, i － 1, , , )<br />     卷帘式菜单1.加入项目 (“双击此处更新数据”, i － 1, , , )<br />     写配置项 (取运行目录 () ＋ “/FileName.ini”, “Adobe软件自动生成Adobe文件名称_配置文件”, 到文本 (i), “软件标题：” ＋ 软件标题 <i> ＋ 软件版本 <i>)<br />     ' 卷帘式菜单1.加入项目 (“软件说明：” ＋ 软件说明 <i>, i － 1, , , )<br /> .计次循环尾 ()<br /> 软件对接码 ＝ 1<br /> 按钮_获取软件.标题 ＝ “加载完毕，正在获取详细说明…………”<br /> _启动窗口.标题 ＝ “Adobe程序大全” ＋ “  - ->信息已经获取完毕，共找到：” ＋ 到文本 (i) ＋ “个Adobe软件  - ->”<br /> 启动线程 (&软件详细说明, , )<br /> <br /> <br /> .子程序 _卷帘式菜单1_菜单被单击<br /> .参数 菜单索引, 整数型<br /> .局部变量 i, 整数型, , , http://www.33lc.com/soft/15126.html<br /> <br /> .计次循环首 (取数组成员数 (软件标题), i)<br />     .判断开始 (卷帘式菜单1.取菜单提示文本 (卷帘式菜单1.现行选中菜单) ＝ 软件标题 <i>)<br />         调试输出 (“因为：” ＋ 卷帘式菜单1.取菜单提示文本 (i － 1) ＋ “和” ＋ 软件标题 <i> ＋ “相同，所以匹配成功！”)<br />         软件对接码 ＝ i<br />         调试输出 (“找到了” ＋ 到文本 (软件对接码))<br />         跳出循环 ()<br />     .默认<br />         到循环尾 ()<br />     .判断结束<br /> <br /> .计次循环尾 ()<br /> 软件详细说明 ()<br /> <br /> .子程序 软件详细说明<br /> <br /> 透明标签_说明.标题 ＝ “”<br /> 详细说明添加 (“软件名称：” ＋ 软件标题 [软件对接码])<br /> 详细说明添加 (“软件标识符：” ＋ 软件标识符 [软件对接码])<br /> 详细说明添加 (“软件下载地址：http://www.33lc.com/soft/” ＋ 软件标识符 [软件对接码] ＋ “.html”)<br /> 详细说明添加 (“软件详细说明：” ＋ 软件说明 [软件对接码])<br /> 详细说明添加 (“注意：如果这边显示的数据和您选择的软件信息不一样，请双击项目文本【双击此处更新链接】来更新数据！如果徐下方一直在现实获取信息中，您可以多试几次，或者多次重启此程序即可解决！”)<br /> 按钮_获取软件.标题 ＝ “详细说明获取完毕，正在寻找下载地址…………”<br /> 启动线程 (&寻找下载地址, , )<br /> <br /> .子程序 寻找下载地址<br /> .局部变量 源文件, 文本型<br /> .局部变量 i, 整数型<br /> <br /> 源文件 ＝ 到文本 (HTTP读文件 (“http://www.33lc.com/soft/” ＋ 软件标识符 [软件对接码] ＋ “.html”))<br /> ' 文本_取中间_批量 (源文件, #寻找下载地址_左边, #寻找下载地址_右边, 下载地址, , )<br /> 文本_取中间_批量 (源文件, #寻找下载地址_左边, #寻找下载地址_右边, 下载地址)<br /> 调试输出 (取数组成员数 (下载地址))<br /> .计次循环首 (取数组成员数 (下载地址), i)<br />     调试输出 (“http://psoft.33lc.com:801/small/” ＋ 下载地址 <i> ＋ #换行符)<br /> .计次循环尾 ()<br /> .如果真 (取数组成员数 (下载地址) ＞ 1)<br />     详细说明添加 (“当前下载地址为：http://psoft.33lc.com:801/small/” ＋ 下载地址 [i － 1])<br />     downaddress ＝ “http://psoft.33lc.com:801/small/” ＋ 下载地址 [i － 1]<br />     按钮_获取软件.标题 ＝ “单击此处下载：” ＋ 软件标题 [软件对接码] ＋ “注意：如果这边显示的数据和您选择的软件信息不一样，请双击项目文本【双击此处更新数据】来更新数据！”<br /> .如果真结束<br /> <br /> <br /> .子程序 详细说明添加<br /> .参数 说明内容, 文本型<br /> <br /> 透明标签_说明.标题 ＝ 透明标签_说明.标题 ＋ 说明内容 ＋ #换行符 ＋ #换行符<br /> <br /> .子程序 _按钮_获取软件_被单击<br /> <br /> 打开指定网址 (downaddress)<br /> <br /> .子程序 _卷帘式菜单1_项目被双击<br /> .参数 菜单索引, 整数型<br /> .参数 项目索引, 整数型<br /> .局部变量 i, 整数型, , , http://www.33lc.com/soft/15126.html<br /> <br /> .计次循环首 (取数组成员数 (软件标题), i)<br />     .判断开始 (卷帘式菜单1.取菜单提示文本 (卷帘式菜单1.现行选中菜单) ＝ 软件标题 <i>)<br />         调试输出 (“因为：” ＋ 卷帘式菜单1.取菜单提示文本 (i － 1) ＋ “和” ＋ 软件标题 <i> ＋ “相同，所以匹配成功！”)<br />         软件对接码 ＝ i<br />         调试输出 (“找到了” ＋ 到文本 (软件对接码))<br />         跳出循环 ()<br />     .默认<br />         到循环尾 ()<br />     .判断结束<br /> <br /> .计次循环尾 ()<br /> 软件详细说明 ()<br /> <br /> <br /> .子程序 __启动窗口_可否被关闭, 逻辑型<br /> <br /> .判断开始 (信息框 (“您是否要关闭此程序，单击【是】按钮退出程序，单击【否】返回程序！”, #信息图标 ＋ #是否钮, “提示”, ) ＝ #是钮)<br />     结束 ()<br /> .默认<br />     返回 (假)<br /> .判断结束

husongping

666666666666

czk2

感谢你的支持，精易有你更精彩

dlc2002

太棒了

DWkakaka

66666666666666

ozing

很好很强大收藏了

娱乐哟

下载看看，支持开源

智明

新技能，好评！

弧尊良

kyo9766

不会正则，用取文本中间 是个不错的选择。。- -

GZfate

不得不说下: 代码可优化的地方有很多.