反反复复过过

项目部004 发表于 2019-10-9 09:25
收到反馈！漏写了一部分，下期版本发布前补全这部分！

还有个小问题，第一个参数，路径的说明要给出完整路径，那么第二个参数就不需要了，因为完整路径包括文件名和文件格式后缀！rar_初始化只需要1个参数就行了！！！希望新版本将2个参数修改为1个！

  

子程序名	返回值类型	公开	备 注
rar_初始化	逻辑型		使用解压缩前先调用一次该命令初始化获取rar.exe所在路径，成功初始化返回真，失败返回假。
参数名	类 型	参考	可空	数组	备 注
rar所在路径	文本型				请传入完整路径，如果传入为空，则检测当前目录是否存在rar.exe文件，若不存在，则返回假。该文件可以在此地址下载：http:”＋“//ec.125.la/source/plugin/plugin1/upload/rar.exe
rar主程序文件名	文本型				默认文件名为“rar.exe”，如果你想自定义文件名可以传入内容，比如传入“myrar.exe”，同时修改主程序的文件名，否则留空即可。

变量名	类 型	静态	数组	备 注
局_WinRAR目录	文本型

rar主程序文件名 ＝ 删首尾空 (rar主程序文件名)
如果真 (是否为空 (rar主程序文件名) 或 rar主程序文件名 ＝ “”)
rar主程序文件名 ＝ “rar.exe”
rar所在路径 ＝ 删首尾空 (rar所在路径)
如果 (是否为空 (rar所在路径) 或 rar所在路径 ＝ “”)  ' 优先判断运行目录
如果 (文件是否存在 (取运行目录 () ＋ “\” ＋ rar主程序文件名))
集_rar所在路径 ＝ 取运行目录 () ＋ “\” ＋ rar主程序文件名
返回 (真)
局_WinRAR目录 ＝ 程序_取 安装目录 (“WinRAR.exe”)  ' 其次判断 注 册 表
如果真 (局_WinRAR目录 ≠ “” 且 文件是否存在 (局_WinRAR目录 ＋ rar主程序文件名))
集_rar所在路径 ＝ 局_WinRAR目录 ＋ rar主程序文件名
返回 (真)

集_rar所在路径 ＝ rar所在路径
如果真 (文件是否存在 (集_rar所在路径))
返回 (真)

' 如果文件不存在，返回假
集_rar所在路径 ＝ “”
返回 (假)

.子程序 rar_初始化, 逻辑型, 公开, 使用解压缩前先调用一次该命令初始化获取rar.exe所在路径，成功初始化返回真，失败返回假。<br /> .参数 rar所在路径, 文本型, 可空, 请传入完整路径，如果传入为空，则检测当前目录是否存在rar.exe文件，若不存在，则返回假。该文件可以在此地址下载：http:”＋“//ec.125.la/source/plugin/plugin1/upload/rar.exe<br /> .参数 rar主程序文件名, 文本型, 可空, 默认文件名为“rar.exe”，如果你想自定义文件名可以传入内容，比如传入“myrar.exe”，同时修改主程序的文件名，否则留空即可。<br /> .局部变量 局_WinRAR目录, 文本型<br /> rar主程序文件名 ＝ 删首尾空 (rar主程序文件名)<br /> .如果真 (是否为空 (rar主程序文件名) 或 rar主程序文件名 ＝ “”)<br />     rar主程序文件名 ＝ “rar.exe”<br /> .如果真结束<br /> rar所在路径 ＝ 删首尾空 (rar所在路径)<br /> .如果 (是否为空 (rar所在路径) 或 rar所在路径 ＝ “”)  ' 优先判断运行目录<br />     .如果 (文件是否存在 (取运行目录 () ＋ “\” ＋ rar主程序文件名))<br />         集_rar所在路径 ＝ 取运行目录 () ＋ “\” ＋ rar主程序文件名<br />         返回 (真)<br />     .否则<br />         局_WinRAR目录 ＝ 程序_取 安装目录 (“WinRAR.exe”)  ' 其次判断 注 册 表<br />         .如果真 (局_WinRAR目录 ≠ “” 且 文件是否存在 (局_WinRAR目录 ＋ rar主程序文件名))<br />             集_rar所在路径 ＝ 局_WinRAR目录 ＋ rar主程序文件名<br />             返回 (真)<br />         .如果真结束<br />     .如果结束<br /> .否则<br />     集_rar所在路径 ＝ rar所在路径<br />     .如果真 (文件是否存在 (集_rar所在路径))<br />         返回 (真)<br />     .如果真结束<br /> .如果结束<br /> ' 如果文件不存在，返回假<br /> 集_rar所在路径 ＝ “”<br /> 返回 (假)

收到反馈！漏写了一部分，下期版本发布前补全这部分！