Board logo

标题: 随手写的,Vista给音频文件写保护的程序,我不说明谁能看懂? [打印本页]

作者: lmm1999    时间: 2010-4-27 09:21     标题: 随手写的,Vista给音频文件写保护的程序,我不说明谁能看懂?

随手写的,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
作者: u18    时间: 2010-4-27 10:36     标题: lmm是不是有毛病了啊 ?

批处理命令,windows现在都不提倡用这个了,有自己的脚本。这些东西发这个论坛干嘛哦?应该发到计算机论坛啊?
作者: 斯莱普尼尔    时间: 2010-4-27 10:42

看不懂,帮顶一下。




欢迎光临 ::电驴基地:: (https://cmule.com/) Powered by Discuz! 6.0.0