找回密码
 加入
搜索
查看: 1777|回复: 2

[原创] 帮助文件更新

[复制链接]
发表于 2018-1-9 17:03:35 | 显示全部楼层 |阅读模式
AU3程序更新了,帮助文件也更新到2017.12.09了,但是有些代码新版本无法编译,旧版本没问题,但是又想用新的帮助文件,自己写了一个更新文件,高手勿喷,新人借鉴下,高手指点一下哪里不足。
FileInstall("AutoIt.chm", @TempDir & "\AutoIt.chm", 1)
If ProcessExists("AutoIt3Help.exe") Then
        ProcessClose("AutoIt3Help.exe")
        MsgBox(64,"信息","正在执行,请稍后",2)
EndIf
$au3_install = RegRead("HKLM\SOFTWARE\AutoIt v3\AutoIt", "InstallDir")
$au3_ver=RegRead("HKLM\SOFTWARE\AutoIt v3\AutoIt", "Version")
If @error Then
        MsgBox(0, "提示", "未检测到Autoit,文件将释放到当前目录")
        FileCopy(@TempDir & "\AutoIt.chm", @ScriptDir, 1)
        FileDelete(@TempDir & "\AutoIt.chm")
        ShellExecute("AutoIt.chm")
Else
        FileDelete($au3_install & "\autoit.chw")
        FileCopy(@TempDir & "\AutoIt.chm", $au3_install, 1)
        FileDelete(@TempDir & "\AutoIt.chm")
        MsgBox(64,"AutoIt"&$au3_ver,"帮助文件更新完毕,2秒将自动启动帮助文件",2)
        Run($au3_install&"\AutoIt3Help.exe")
EndIf
 楼主| 发表于 2018-1-10 08:53:02 | 显示全部楼层
回复 2# 131738


    看不懂我就放心了  哈哈
发表于 2018-1-11 11:01:56 | 显示全部楼层
回复  131738


    看不懂我就放心了  哈哈
cfanpc 发表于 2018-1-10 08:53


无聊吧........
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2024-11-22 10:03 , Processed in 0.069040 second(s), 19 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表