;程序名锁定 

;_File_NameLock($name) 

;$name = 你锁定的程序名

;     如果当前程序名与你设定的文件名不一至 

;     此函数将自动还原程序名 

;     注:使用时放到 你程序的开头

Func _File_NameLock($name)
    If @ScriptName <> $name Then ;如果程序名 不是        ```
                  Local $str = "@echo off" & @CRLF
        $str &= "ping -n 3 127.0.0.1>nul" & @CRLF ;延时 大约3秒
        $str &= 'ren "' & @ScriptName & '" '&$name & @CRLF ;改名 还原程序名
        $str &= "ping -n 1 127.0.0.1>nul" & @CRLF ;延时 大约1秒
        $str &= "start "&$name & @CRLF ;重新启动 程序
        $str &= "del /f /q %0" & @CRLF ;删除临时文件
        $str &= "exit"
        Local   $file = @ScriptDir & "\"&$name&".ren.bat"
        FileDelete($file) ;预删除临时文件
        FileWrite($file, $str) ;写入临时文件
        Run($file, "", @SW_HIDE) ;调用临时文件
        Exit ;退出
    EndIf
EndFunc   ;==>_File_NameLock
```

    下载:JY_File.au3 


    




		 

		 
	 
		

本文固定链接: http://www.jianyiit.com/post-20.html