lmm1999

随手写的，Vista给音频文件写保护的程序，我不说明谁能看懂？
ECHO OFF
REM ICACLS %1 /grant:r Administrator:F /inheritance:r
REM SET LB=0
REM DIR %1 /A:R
REM IF ERRORLEVEL 1 SET LB=1
: QQ
CLS
ECHO 文件的 ICACLS ：
ICACLS %1
ECHO/&ECHO/&ECHO/
SET BL=Q&SET /P BL=指定是否设为强制只读（1），按 A 释放文件，按 G 只加只读，按 D 删除文件：
IF /I %BL% == G ATTRIB +R %1 & EXIT
IF /I %~x1 == .MP3 GOTO OK
IF /I %~x1 == .MP2 GOTO OK
IF /I %~x1 == .WAV GOTO OK
IF /I %~x1 == .WMV GOTO OK
IF /I %~x1 == .WMA GOTO OK
MSG * /TIME:1 扩展名不支持！！！ && EXIT
: OK
IF /I %BL% == D GOTO DELF0
IF /I %BL% == A ICACLS %1 /grant:r %USERNAME%s:F /inheritance:r & ATTRIB -S %1 & GOTO QQ
IF /I NOT %BL% == 1 EXIT
REM SET ATB= +S
REM IF /I %LB% == 1 SET ATB= +R +S
ATTRIB +R +S %1
REM IF /I %BL% == 1 ICACLS %1 /inheritance:r & ICACLS %1 /remove:g %USERNAME% & ICACLS %1 /grant:r %USERNAME%s:R
IF /I %BL% == 1 ICACLS %1 /grant:r %USERNAME%s:R /inheritance:r
GOTO QQ
: DELF0
SET WC=%~dp1
SET WC=%WC:~0,-1%
: DELF
SET YZM=%RANDOM%
SET /P SRYZM=删除文件，请输入验证码【%YZM%】（按Q退出）：
IF %YZM% == %SRYZM% Robocopy "%WC%" "I:\Temp\FDEL" "%~nx1" /CREATE /MOV /IS & PAUSE & EXIT
IF /I %SRYZM% == Q EXIT
GOTO DELF