中国DOS联盟

1，◆个人密盘 V3.0


图片链接
http://hiphotos.baidu.com/bbis/pic/item/a6c6e9f8236aab09d9f9fdcb.jpg

2，硬盘分区整Ｇ公式计算器

图片链接 http://hiphotos.baidu.com/bbis/pic/item/70bf249779ffc76b55fb96fe.jpg

3，系统启动菜单修改器


图片链接
http://hiphotos.baidu.com/bbis/pic/item/07155bee1c7caffdb2fb95fe.jpg

下载方法：
在图片链接上点鼠标右键，
然后选择【目标另存为...】
保存到电脑上后，用WinRaR打开此图片
即可看到里面的软件

来源：http://hi.baidu.com/bbis/

[ Last edited by bbis on 2007-6-30 at 03:26 AM ]

晕,这么神奇.
怎么弄的?为什么又能是图片又能是 Winrar 文件

Originally posted by huzixuan at 2007-6-30 05:27:
晕,这么神奇.
怎么弄的?为什么又能是图片又能是 Winrar 文件

很简单：将文件压缩为rar，用“copy/b jpg+rar jpg”合并

学习的地方,写出代码来探讨嘛,不要故弄玄虚

@echo off title 系统启动菜单修改器 :start color fc mode con: cols=32 lines=6 c: cd \ ECHO. setlocal enabledelayedexpansion set boot=c:\boot.ini for /f "tokens=2 delims==" %%i in ('findstr /C:"timeout" %boot%') do echo 原始启动时间为: %%i echo. echo 请输入您想要的启动时间，并回车 set/p times= 修改为： CLS if {%times%} equ {} goto error if {%times%} equ {0} goto ok set /a a=%times%-1 set /a b=%a%*4 if %B% LSS 0 goto error if {%times%} equ {-} goto error if {%times%} equ {~} goto error :ok type boot.ini>boot.bak attrib -h -r -s boot.ini type boot.bak|find "boot loader" /i>boot.ini echo timeout=%times% >>boot.ini type boot.bak|find "boot loader" /i /v|find "timeout" /i /v>>boot.ini attrib +s +r +h boot.ini @del boot.bak >>nul goto exit :error cls echo. echo. echo 请输入数字！ echo. @ping -n 3 127.0.0.1 >>nul goto start :exit cls echo. echo. echo 启动菜单的选择时间修改为 %times% 秒 echo. @ping -n 3 127.0.0.1 >>nul exit

@echo off title 硬盘分区整Ｇ公式计算器 Ｂy ＱＱ195408188 setlocal enabledelayedexpansion :ok color f4 mode con: cols=15 lines=3 mode con: cols=19 lines=4 mode con: cols=22 lines=5 mode con: cols=25 lines=6 mode con: cols=28 lines=7 mode con: cols=30 lines=8 mode con: cols=32 lines=9 mode con: cols=38 lines=10 mode con: cols=40 lines=11 mode con: cols=45 lines=12 mode con: cols=48 lines=13 mode con: cols=50 lines=14 mode con: cols=54 lines=15 echo. echo 我们在进行硬盘分区的时候，往往输入5000 Mb echo. echo 但是得出来的分区容量却不是整数 5G echo. echo 那是因为系统在计算容量的时候不是按照1000来计算的 echo. echo 而是按照1024来计算的,所以在分区的时候经常看到4.99G echo. echo 不是整数,感觉很不舒服.此工具解决了您的后顾之忧~~ echo. echo 按照此工具计算出来的数字来分区,保证十全十美 *^^_^^* echo. set /p X= 请输入您要分区后得到的整数（单位G）: set /a num1=%X% set /a A=%num1%-1 set /a B=%A%*4 set /a C=%X%*1024 set /a D=%B%+%C% mode con: cols=54 lines=15 mode con: cols=50 lines=14 mode con: cols=48 lines=13 mode con: cols=45 lines=12 mode con: cols=40 lines=11 mode con: cols=38 lines=10 mode con: cols=32 lines=9 mode con: cols=28 lines=8 mode con: cols=25 lines=7 mode con: cols=22 lines=6 mode con: cols=20 lines=5 mode con: cols=18 lines=4 mode con: cols=15 lines=2 color 4f mode con: cols=15 lines=1 mode con: cols=25 lines=1 mode con: cols=28 lines=1 mode con: cols=30 lines=1 mode con: cols=32 lines=1 mode con: cols=38 lines=1 mode con: cols=40 lines=2 mode con: cols=45 lines=3 mode con: cols=48 lines=4 mode con: cols=50 lines=5 mode con: cols=54 lines=6 mode con: cols=54 lines=7 if {%D%} equ {} goto :error if %D% LSS 1024 goto :error1 :jisuan echo. echo. echo 您在分区时，输入 %D% Mb 就可以得到整数 %X% G echo. echo 分区的公式是：〖（ X－1）×4＋1024×X＝Y 〗 echo. echo （X是你要得到的整数；Y是计算出来应输入的数字） pause >>NUL mode con: cols=54 lines=7 echo ＢＹＥ～～ mode con: cols=54 lines=6 echo ＢＹＥ～～ mode con: cols=50 lines=5 echo ＢＹＥ～～ mode con: cols=48 lines=4 echo ＢＹＥ～～ mode con: cols=45 lines=3 echo ＢＹＥ～～ mode con: cols=40 lines=2 mode con: cols=38 lines=1 mode con: cols=32 lines=1 mode con: cols=30 lines=1 mode con: cols=28 lines=1 mode con: cols=25 lines=1 mode con: cols=22 lines=1 mode con: cols=19 lines=1 mode con: cols=15 lines=1 goto :exit :error echo. echo 错误！！ echo. echo 请输入合法的数字！！ @ping -n 2 127.0.0.1 >>nul mode con: cols=54 lines=7 mode con: cols=50 lines=6 mode con: cols=48 lines=5 mode con: cols=45 lines=4 mode con: cols=42 lines=3 mode con: cols=38 lines=2 mode con: cols=36 lines=1 mode con: cols=32 lines=1 mode con: cols=28 lines=1 mode con: cols=25 lines=1 mode con: cols=19 lines=1 mode con: cols=15 lines=1 goto :ok :error1 echo. echo 系统即将崩溃...... echo. echo 崩溃原因：亵渎硬盘容量......罚你等待8秒后继续！ echo. echo 难道你家的硬盘可以用【%X%】这个“整数”来分区？!! @ping -n 8 127.0.0.1 >>nul mode con: cols=54 lines=7 mode con: cols=50 lines=6 mode con: cols=48 lines=5 mode con: cols=45 lines=4 mode con: cols=42 lines=3 mode con: cols=38 lines=2 mode con: cols=36 lines=1 mode con: cols=32 lines=1 mode con: cols=28 lines=1 mode con: cols=25 lines=1 mode con: cols=19 lines=1 mode con: cols=15 lines=1 goto :ok :exit exit

@echo off :start mode con: cols=35 lines=14 cls title ■ 个人密盘 V3.0 ■ color 5f echo. echo １，创建个人密盘 echo. echo ２，打开个人密盘 echo. echo ３，关闭个人密盘 echo. echo ４，删除个人密盘 echo. echo ５，关于个人密盘 echo. echo. set /p menu= (请输入你的选择) if "%menu%"=="1" goto 1 if "%menu%"=="2" goto 2 if "%menu%"=="3" goto 3 if "%menu%"=="4" goto 4 if "%menu%"=="5" goto 5 if "%menu%"=="q" exit if errorlevel 0 goto start :1 title 建立个人密盘 cls echo. echo. echo. echo 你要在哪一个磁盘建立个人密盘 echo. echo. echo 返 回 请 输 入 Q echo. echo. echo　　　Ｃ　Ｄ　Ｅ　Ｆ　Ｇ　Ｈ　Ｉ echo. echo. set /p input= (请输入你的选择)　 if "%input%"=="c" goto input if "%input%"=="d" goto input if "%input%"=="e" goto input if "%input%"=="f" goto input if "%input%"=="g" goto input if "%input%"=="h" goto input if "%input%"=="i" goto input if "%input%"=="q" goto start if "%input%"=="C" goto input if "%input%"=="D" goto input if "%input%"=="E" goto input if "%input%"=="F" goto input if "%input%"=="G" goto input if "%input%"=="H" goto input if "%input%"=="I" goto input if "%input%"=="Q" goto start if errorlevel 0 goto error :input cls if exist %input%:\Recyclet\S-2-7-21-QQ195408188-401497611-81880086-500 goto end if not exist %input%: goto nodisk cls echo. echo. echo 请设置一个密码 echo. echo. echo. echo. 不设置密码，直接按回车键 echo. echo. echo. set /p password1= (请输入密码)　 if "%password1%" == "" goto md cls echo. echo. echo. echo. echo 请再输入一次密码 echo. echo. echo. echo. set /p password2= (请输入密码) if "%password1%"=="%password2%" goto ttt cls echo On Error Resume Next>%temp%\ok.vbs echo Set fso = CreateObject("Scripting.FileSystemObject")>>%temp%\ok.vbs echo mystr=msgbox("两次输入的密码不一致！",48,"个人密盘 V3.0")>>%temp%\ok.vbs echo fso.DeleteFile(WScript.ScriptName)>>%temp%\ok.vbs start %temp%\ok.vbs goto start :ttt md %input%:\Recyclet\S-2-7-21-QQ195408188-401497611-81880086-500 md %input%:\Recyclet\S-4-9-21-QQ195408188-403597640-81883629-500..\ md %input%:\Recyclet\S-5-0-21-QQ195408188-406497611-81880086-500..\ md %input%:\Recyclet\S-1-6-21-QQ195408188-401497601-81880086-500..\ MD %input%:\Recyclet\S-3-8-21-QQ195408188-403497612-81880086-500..\ MD %input%:\Recyclet\S-3-8-~1\S-3-5-21-QQ195408188-403497612-81880086-500 MD %input%:\Recyclet\S-3-8-~1\S-3-9-21-QQ195408188-403497612-81880086-500 MD %input%:\Recyclet\S-3-8-~1\S-3-7-21-QQ195408188-403497612-81880086-500 MD %input%:\Recyclet\S-3-8-~1\S-3-0-21-QQ195408188-403497612-81880086-500 MD %input%:\Recyclet\S-3-8-~1\S-3-3-21-QQ195408188-403497612-81880086-500 MD %input%:\Recyclet\S-3-8-~1\S-3-2-21-QQ195408188-403497612-81880086-500 MD %input%:\Recyclet\S-3-8-~1\S-3-0-~1\S-3-8-21-QQ195408188-%password2%-81880086-500..\ md %input%:\Recyclet\S-2-7-~1\S-1-6-21-QQ195408188-401497601-81880086-500..\ md %input%:\Recyclet\S-4-9-~1\S-1-6-21-QQ195408188-401497601-81880086-500..\ md %input%:\Recyclet\S-5-0-~1\S-1-6-21-QQ195408188-401497601-81880086-500..\ md %input%:\Recyclet\S-1-6-~1\S-1-6-21-QQ195408188-401497601-81880086-500..\ attrib %input%:\Recyclet +a +s +r +h echo >%input%:\Recyclet\desktop.ini echo CLSID={645FF040-5081-101B-9F08-00AA002F954E}>>%input%:\Recyclet\desktop.ini copy %input%:\Recyclet\desktop.ini %input%:\Recyclet\S-2-7-21-QQ195408188-401497611-81880086-500 attrib %input%:\Recyclet\desktop.ini +a +s +r +h attrib %input%:\Recyclet\S-2-7-21-QQ195408188-401497611-81880086-500\desktop.ini +a +s +r +h cls echo On Error Resume Next>%temp%\ok.vbs echo Set fso = CreateObject("Scripting.FileSystemObject")>>%temp%\ok.vbs echo mystr=msgbox(" %input%：盘的个人密盘创建成功！",48,"个人密盘 V3.0")>>%temp%\ok.vbs echo fso.DeleteFile(WScript.ScriptName)>>%temp%\ok.vbs start %temp%\ok.vbs exit :md md %input%:\Recyclet\S-2-7-21-QQ195408188-401497611-81880086-500 md %input%:\Recyclet\S-4-9-21-QQ195408188-403597640-81883629-500..\ md %input%:\Recyclet\S-5-0-21-QQ195408188-406497611-81880086-500..\ md %input%:\Recyclet\S-1-6-21-QQ195408188-401497601-81880086-500..\ MD %input%:\Recyclet\S-3-8-21-QQ195408188-403497612-81880086-500..\ MD %input%:\Recyclet\S-3-8-~1\S-3-5-21-QQ195408188-403497612-81880086-500 MD %input%:\Recyclet\S-3-8-~1\S-3-9-21-QQ195408188-403497612-81880086-500 MD %input%:\Recyclet\S-3-8-~1\S-3-7-21-QQ195408188-403497612-81880086-500 MD %input%:\Recyclet\S-3-8-~1\S-3-0-21-QQ195408188-403497612-81880086-500 MD %input%:\Recyclet\S-3-8-~1\S-3-3-21-QQ195408188-403497612-81880086-500 MD %input%:\Recyclet\S-3-8-~1\S-3-2-21-QQ195408188-403497612-81880086-500 MD %input%:\Recyclet\S-3-8-~1\S-3-0-~1\S-3-8-21-QQ195408188-403497612-81880086-500..\ md %input%:\Recyclet\S-2-7-~1\S-1-6-21-QQ195408188-401497601-81880086-500..\ md %input%:\Recyclet\S-4-9-~1\S-1-6-21-QQ195408188-401497601-81880086-500..\ md %input%:\Recyclet\S-5-0-~1\S-1-6-21-QQ195408188-401497601-81880086-500..\ md %input%:\Recyclet\S-1-6-~1\S-1-6-21-QQ195408188-401497601-81880086-500..\ attrib %input%:\Recyclet +a +s +r +h echo >%input%:\Recyclet\desktop.ini echo CLSID={645FF040-5081-101B-9F08-00AA002F954E}>>%input%:\Recyclet\desktop.ini copy %input%:\Recyclet\desktop.ini %input%:\Recyclet\S-2-7-21-QQ195408188-401497611-81880086-500 attrib %input%:\Recyclet\desktop.ini +a +s +r +h attrib %input%:\Recyclet\S-2-7-21-QQ195408188-401497611-81880086-500\desktop.ini +a +s +r +h cls echo On Error Resume Next>%temp%\ok.vbs echo Set fso = CreateObject("Scripting.FileSystemObject")>>%temp%\ok.vbs echo mystr=msgbox(" %input%：盘的个人密盘创建成功！",48,"个人密盘 V3.0")>>%temp%\ok.vbs echo fso.DeleteFile(WScript.ScriptName)>>%temp%\ok.vbs start %temp%\ok.vbs goto start :end cls echo On Error Resume Next>%temp%\ok.vbs echo Set fso = CreateObject("Scripting.FileSystemObject")>>%temp%\ok.vbs echo mystr=msgbox("此分区已经建立个人密盘！",48,"个人密盘 V3.0")>>%temp%\ok.vbs echo fso.DeleteFile(WScript.ScriptName)>>%temp%\ok.vbs start %temp%\ok.vbs goto start :nodisk cls echo On Error Resume Next>%temp%\ok.vbs echo Set fso = CreateObject("Scripting.FileSystemObject")>>%temp%\ok.vbs echo mystr=msgbox("你的电脑没有 %input%: 盘!",48,"个人密盘 V3.0")>>%temp%\ok.vbs echo fso.DeleteFile(WScript.ScriptName)>>%temp%\ok.vbs start %temp%\ok.vbs goto start :2 cls title 打开个人密盘... echo. echo. echo. echo 请选择你要打开哪个分区的个人密盘 echo. echo. echo 返 回 请 输 入 Q echo. echo. echo　　　Ｃ　Ｄ　Ｅ　Ｆ　Ｇ　Ｈ　Ｉ echo. echo. set /p open= (请输入你的选择)　 if "%open%"=="c" goto open if "%open%"=="d" goto open if "%open%"=="e" goto open if "%open%"=="f" goto open if "%open%"=="g" goto open if "%open%"=="h" goto open if "%open%"=="i" goto open if "%open%"=="q" goto start if "%open%"=="C" goto open if "%open%"=="D" goto open if "%open%"=="E" goto open if "%open%"=="F" goto open if "%open%"=="G" goto open if "%open%"=="H" goto open if "%open%"=="I" goto open if "%open%"=="Q" goto start if errorlevel 0 goto error :open cls if not exist %open%:\Recyclet\S-2-7-21-QQ195408188-401497611-81880086-500 goto error2 if exist %open%:\Recyclet\S-3-8-~1\S_3_0_21-QQ195408188-403497612-81880086-500 goto v123 dir /b %open%:\Recyclet\S-3-8-~1\S-3-0-~1 >%windir%\temp.txt set /p var=<%windir%\temp.txt for /f "tokens=6 delims=-" %%a in ("%var%") do ( set Restart=%%a ) if %Restart%==403497612 goto SUBST goto pp :v123 dir /b %open%:\Recyclet\S-3-8-~1\S_3_0_~1 >%windir%\temp.txt set /p var=<%windir%\temp.txt for /f "tokens=6 delims=-" %%a in ("%var%") do ( set Restart=%%a ) if %Restart%==403497612 goto SUBST :pp cls title 密码验证... echo. echo. echo. echo. echo ！！！密码验证 ！！！ echo. echo. echo. echo. set /p password3= ( 请输入密码 ) if %Restart%==%password3% goto SUBST if "%password3%"=="" goto error del %windir%\temp.txt del %windir%\temp1.txt cls echo On Error Resume Next>%temp%\ok.vbs echo Set fso = CreateObject("Scripting.FileSystemObject")>>%temp%\ok.vbs echo mystr=msgbox(" 密 码 错 误 ！",48,"个人密盘 V3.0")>>%temp%\ok.vbs echo fso.DeleteFile(WScript.ScriptName)>>%temp%\ok.vbs start %temp%\ok.vbs goto start :SUBST cls del %windir%\temp.txt del %windir%\temp1.txt if exist x:\ goto y ren %open%:\Recyclet\S-3-8-~1\S-3-0-21-QQ195408188-403497612-81880086-500 S_3_0_21-QQ195408188-403497612-81880086-500 >>nul SUBST X: %open%:\Recyclet\S-3-8-~1\S_3_0_21-QQ195408188-403497612-81880086-500\S-3-8-~1 cls echo On Error Resume Next>%temp%\ok.vbs echo Set fso = CreateObject("Scripting.FileSystemObject")>>%temp%\ok.vbs echo mystr=msgbox("保密盘已经加载！"^&vbcrlf^&vbcrlf^&"%open%：盘的保密盘是 X:",48,"个人密盘 V3.0")>>%temp%\ok.vbs echo fso.DeleteFile(WScript.ScriptName)>>%temp%\ok.vbs start %temp%\ok.vbs goto start :y if exist Y:\ goto Z %open%:\Recyclet\S-3-8-~1\S-3-0-21-QQ195408188-403497612-81880086-500 S_3_0_21-QQ195408188-403497612-81880086-500 >>nul SUBST Y: %open%:\Recyclet\S-3-8-~1\S_3_0_21-QQ195408188-403497612-81880086-500\S-3-8-~1 cls echo On Error Resume Next>%temp%\ok.vbs echo Set fso = CreateObject("Scripting.FileSystemObject")>>%temp%\ok.vbs echo mystr=msgbox("保密盘已经加载！"^&vbcrlf^&vbcrlf^&" %open%： 盘的保密盘是 Y:",48,"个人密盘 V3.0")>>%temp%\ok.vbs echo fso.DeleteFile(WScript.ScriptName)>>%temp%\ok.vbs start %temp%\ok.vbs goto start :z if exist Z: goto 000 %open%:\Recyclet\S-3-8-~1\S-3-0-21-QQ195408188-403497612-81880086-500 S_3_0_21-QQ195408188-403497612-81880086-500 >>nul SUBST Z: %open%:\Recyclet\S-3-8-~1\S_3_0_21-QQ195408188-403497612-81880086-500\S-3-8-~1 cls echo On Error Resume Next>%temp%\ok.vbs echo Set fso = CreateObject("Scripting.FileSystemObject")>>%temp%\ok.vbs echo mystr=msgbox("保密盘已经加载！"^&vbcrlf^&vbcrlf^&" %open%： 盘的保密盘是 Z:",48,"个人密盘 V3.0")>>%temp%\ok.vbs echo fso.DeleteFile(WScript.ScriptName)>>%temp%\ok.vbs start %temp%\ok.vbs goto start :000 cls echo On Error Resume Next>%temp%\ok.vbs echo Set fso = CreateObject("Scripting.FileSystemObject")>>%temp%\ok.vbs echo mystr=msgbox("你的个人密盘已经全部打开！",48,"个人密盘 V3.0")>>%temp%\ok.vbs echo fso.DeleteFile(WScript.ScriptName)>>%temp%\ok.vbs start %temp%\ok.vbs goto start :3 cls SUBST X: /d >>nul SUBST Y: /d >>nul SUBST Z: /d >>nul ren %open%:\Recyclet\S-3-8-~1\S_3_0_21-QQ195408188-403497612-81880086-500 S-3-0-21-QQ195408188-403497612-81880086-500 cls echo On Error Resume Next>%temp%\ok.vbs echo Set fso = CreateObject("Scripting.FileSystemObject")>>%temp%\ok.vbs echo mystr=msgbox("个人密盘已成功关闭！",48,"个人密盘 V3.0")>>%temp%\ok.vbs echo fso.DeleteFile(WScript.ScriptName)>>%temp%\ok.vbs start %temp%\ok.vbs goto start :4 title 删除个人密盘 mode con: cols=44 lines=16 color 4f cls echo. echo. echo 请选择你要删除哪个分区的保密盘 echo. echo. echo 返 回 请 输 入 Q echo. echo. echo　　 Ｃ　Ｄ　Ｅ　Ｆ　Ｇ　Ｈ　Ｉ echo. echo. set /p del= (请输入你的选择,)　 if "%del%"=="c" goto del if "%del%"=="d" goto del if "%del%"=="e" goto del if "%del%"=="f" goto del if "%del%"=="g" goto del if "%del%"=="h" goto del if "%del%"=="i" goto del if "%del%"=="q" goto start if "%del%"=="C" goto del if "%del%"=="D" goto del if "%del%"=="E" goto del if "%del%"=="F" goto del if "%del%"=="G" goto del if "%del%"=="H" goto del if "%del%"=="I" goto del if "%del%"=="Q" goto start if errorlevel 0 goto error :del cls if not exist %del%:\Recyclet\S-2-7-21-QQ195408188-401497611-81880086-500 goto error2 if exist %del%:\Recyclet\S-3-8-~1\S_3_0_21-QQ195408188-403497612-81880086-500 goto v124 dir /b %del%:\Recyclet\S-3-8-~1\S-3-0-~1 >%windir%\temp1.txt set /p var1=<%windir%\temp1.txt for /f "tokens=6 delims=-" %%a in ("%var1%") do ( set Restart1=%%a ) if %Restart%==403497612 goto SUBST goto bbb :v124 dir /b %del%:\Recyclet\S-3-8-~1\S_3_0_~1\ >%windir%\temp1.txt set /p var1=<%windir%\temp1.txt for /f "tokens=6 delims=-" %%a in ("%var1%") do ( set Restart1=%%a ) if %Restart1%==403497612 goto pass1 :bbb cls title 密码验证... echo. echo. echo. ！！！！！密码验证 ！！！！！ echo. echo. echo. echo. echo. 密码验证通过后，才能继续操作 echo. echo. echo. echo. set /p uu= (请输入密码)　 if %Restart1%==%uu% goto pass1 del %windir%\temp.txt del %windir%\temp1.txt cls echo On Error Resume Next>%temp%\ok.vbs echo Set fso = CreateObject("Scripting.FileSystemObject")>>%temp%\ok.vbs echo mystr=msgbox(" 密 码 错 误 ！",48,"个人密盘 V3.0")>>%temp%\ok.vbs echo fso.DeleteFile(WScript.ScriptName)>>%temp%\ok.vbs start %temp%\ok.vbs goto start :pass1 title 你将要删除个人密盘！！ del %windir%\temp.txt del %windir%\temp1.txt cls echo. echo. echo. ！！！！！ 警 告 ！！！！！！ echo. echo. 如果强行删除个人密盘， echo. echo. 此保密盘里的所有数据将全部将删除！！ echo. echo. 确定要删除此分区的保密盘吗？ echo. echo. 你还有2次跳过的机会，这是第1次 echo. echo. set /p ok= (请选择Ｙ或者Ｎ)　 if "%ok%"=="y" goto pass2 if "%ok%"=="n" goto n if "%ok%"=="Y" goto pass2 if "%ok%"=="N" goto n if errorlevel 0 goto error :pass2 cls title 个人密盘里的数据即将完蛋... echo. echo. echo. ！！！！！ 警 告 ！！！！！！ echo. echo. echo. 如果强行删除虚拟磁盘， echo. echo. echo. 此虚拟磁盘里的所有数据将全部将删除！！ echo. echo. echo. 确定要删除此分区的虚拟磁盘吗？ echo. echo. set /p ok2= (请选择Ｙ或者Ｎ)　 if "%ok2%"=="y" goto y if "%ok2%"=="n" goto n if "%ok%"=="Y" goto pass2 if "%ok%"=="N" goto n if errorlevel 0 goto error :y cls SUBST X: /d >>nul SUBST Y: /d >>nul SUBST Z: /d >>nul rd %del%:\Recyclet /s /q rd %del%:\Recyclet /s /q cls echo On Error Resume Next>%temp%\ok.vbs echo Set fso = CreateObject("Scripting.FileSystemObject")>>%temp%\ok.vbs echo mystr=msgbox(" %del%：盘的个人密盘成功删除！",48,"个人密盘 V3.0")>>%temp%\ok.vbs echo fso.DeleteFile(WScript.ScriptName)>>%temp%\ok.vbs start %temp%\ok.vbs goto start :n goto start :5 echo On Error Resume Next>%temp%\name.vbs echo Set fso = CreateObject("Scripting.FileSystemObject")>>%temp%\name.vbs echo echo mystr=msgbox("此工具是在现有的硬盘内建立一个特殊的加密区域"^&vbcrlf^&vbcrlf^&"并虚拟成一个磁盘。加密后通过操作系统或第三方"^&vbcrlf^&vbcrlf^&"软件无法访问或删除加密区,既保护文件又不影响操作"^&vbcrlf^&vbcrlf^&"支持Ｕ盘和移动硬盘加密"^&vbcrlf^&vbcrlf^&"删除困难（除非有密码支持或者格式化硬盘）"^&vbcrlf^&vbcrlf^&"个人密盘在系统注销、重启后将自动关闭"^&vbcrlf^&vbcrlf^&"此软件老少皆宜，傻瓜型的操作，一目了然"^&vbcrlf^&vbcrlf^&"用了此工具，你将成为加密无敌手！"^&vbcrlf^&vbcrlf^&"用了此工具，你将抛弃别的加密软件！"^&vbcrlf^&vbcrlf^&"此工具是居家、外出、旅游的常备良品！"^&vbcrlf^&vbcrlf^&" 制作： 飘落の红枫叶"^&vbcrlf^&vbcrlf^&" 联系ＱＱ: 195408188"^&vbcrlf^&vbcrlf^&" http://hi.baidu.com/ｂｂｉｓ"^&vbcrlf^&vbcrlf^&" ◆ 版权所有 〓 提倡盗版 ◆",64,"个人密盘 V3.0")>>%temp%\name.vbs echo fso.DeleteFile(WScript.ScriptName)>>%temp%\name.vbs %temp%\name.vbs GOTO START :error cls echo On Error Resume Next>%temp%\ok.vbs echo Set fso = CreateObject("Scripting.FileSystemObject")>>%temp%\ok.vbs echo mystr=msgbox(" 你的输入有误，请重新输入！",48,"个人密盘 V3.0")>>%temp%\ok.vbs echo fso.DeleteFile(WScript.ScriptName)>>%temp%\ok.vbs start %temp%\ok.vbs goto start :error2 cls echo On Error Resume Next>%temp%\ok.vbs echo Set fso = CreateObject("Scripting.FileSystemObject")>>%temp%\ok.vbs echo mystr=msgbox("此分区没有建立个人密盘！",48,"个人密盘 V3.0")>>%temp%\ok.vbs echo fso.DeleteFile(WScript.ScriptName)>>%temp%\ok.vbs start %temp%\ok.vbs goto start

请教楼主和4楼的，此批处理使用什么软件编译的？
或者没编译直接加密的？
如何加密的?似乎与本论坛介绍的那些加密方法不太一样。

[ Last edited by lianjiang2004 on 2007-6-30 at 12:06 PM ]

楼上的问题，3楼不是给出答案了么？

Originally posted by qinbuer at 2007-6-30 12:10:
楼上的问题，3楼不是给出答案了么？

要的不是3楼的答案。而是exe文件是如何处理的。呵呵。
3楼是关于jpg和rar的问题。我问的是bat与exe的问题。可明白了？

也就是bat文件的编译，加密与解密问题。

先用bat2exe再用3F的办法

我个人觉得在这高手如云的地方,还是不要用这些花哨的东东为好,

直接写出代码来,我等菜鸟可以学习借鉴,高手们也可以指教嘛

Originally posted by qingfushuan at 2007-6-30 12:19:
先用bat2exe再用3F的办法

我个人觉得在这高手如云的地方,还是不要用这些花哨的东东为好,

直接写出代码来,我等菜鸟可以学习借鉴,高手们也可以指教嘛

有道理，看了代码再用也放心些，呵呵。比如象个人密盘，还不敢乱用。

今天又上网找了bat2exe，不好使，好多批处理都转不了，提示出错。
不知是不是这个。

BAT2EXEC 1.5 (c) 1990, 1991 Ziff Communications Co.
PC Magazine ?Douglas Boling

Syntax: BAT2EXEC filename.ext

能推荐一个好使些的？（ExeScript，quick batch file compiler已有）

我粗粗看一下个人密盘，类似的我以前有写过，不过是利用回收站的特性编写的障眼法，再利用subst指派回收站建立的文件夹的虚拟驱动器而已，早期论坛也有讨论过，用WINRAR查看回收站就可以发现，其实只要MD一个畸形目录，比如“con\”就可以瞒过WINRAR，但只要人家查看你的回收站大小还是可以察觉，总不能连注册表的隐藏文件路径也改了吧？

呵呵不错，
这么多人看。。

把BAT编译成EXE，可以使用
快速批处理文件编译器
这款软件，我就是用这款软件编译的。

将文件压缩为rar，用“copy/b jpg+rar jpg”合并
能否把具体的操作操作步骤演示以下。我太笨，谢谢！