[已解决]如何防止修改文件夹和程序名称

dnvplj · 发表于 2015-5-3 11:16:12

本帖最后由 dnvplj 于 2015-5-3 16:44 编辑

我的意思是：防止修改文件夹和程序名，只要修改其中一项，有个提示，程序就不能运行。
结构：
Soft
Soft\123.exe

afan · 发表于 2015-5-3 12:09:17

Local $sDirName = 'Soft\123.exe'
If StringRight(@ScriptFullPath, StringLen($sDirName)) <> $sDirName Then Exit

chzj589 · 发表于 2015-5-3 12:29:51

接下来就是要如何防止修改程序的内容！

dnvplj · 发表于 2015-5-3 13:09:17

本帖最后由 dnvplj 于 2015-5-3 13:23 编辑

回复 2# afan
感谢afan版主的回复，更改文件夹和程序名能有个提示吗，如文件夹或程序名被更改等。

chzj589 · 发表于 2015-5-3 13:51:55

回复 4# dnvplj
Local $varw = @ScriptDir & "\Soft\123.exe"
　If Not FileExists($varw) Then
MsgBox(4096, "提示", $varw & "文件不在目录.无法启动软件窗口")
　Exit
Else
MsgBox(4096, "提示文件", $varw & "文件在目录.", 1)
RunWait(@ScriptDir & "\Soft\123.exe", "")
　EndIf
判断文件是否在目录与是否修改文件应该是一样的作用，你说呢？

afan · 发表于 2015-5-3 16:18:08

回复 4# dnvplj

要从最基础的知识学起…

Local $sDirName = 'Soft\123.exe'
If StringRight(@ScriptFullPath, StringLen($sDirName)) <> $sDirName Then Exit MsgBox(48, '错误退出', '文件夹或程序名被更改')

nqawen · 发表于 2015-5-10 11:33:07

谢谢a大的指导

用户名		自动登录	找回密码
密码			加入

[AU3基础] [已解决]如何防止修改文件夹和程序名称

相关帖子

评分