标题: [求助]如何对批处理进行加密&解密
[打印本页]
作者: jiangnan110
时间: 2007-6-8 12:47
标题: [求助]如何对批处理进行加密&解密
如题
我学了才几天希望大家帮帮忙,,,谢谢...!!!
作者: baomaboy
时间: 2007-6-8 13:03
加密码的? 还是只是扰乱视线类的?
作者: jlygq1968
时间: 2007-6-8 13:18
Quote: |
Originally posted by jiangnan110 at 2007-6-8 12:47 PM:
如题
我学了才几天希望大家帮帮忙,,,谢谢...!!! |
|
是不是要防止 反编译的,就是显示乱码的??????
作者: qinbuer
时间: 2007-6-8 13:22
我想,或许可以做一个批处理,将需要加密的批处理按一定的顺序打乱或用其他字符替换,解密的时候再按一定的顺序还原。但是这样子解密前批处理就不可以运行了,而且只需要一定的耐心就可以被他人解密出来。
又或者可以转换为EXE,可是这样的话就查看源代码就麻烦了。。。
作者: bjsh
时间: 2007-6-8 16:17
搜索吧;
有很多的
作者: zasxcdfv
时间: 2007-6-8 16:18
(转)BAT加密和解密文章
-----------------------------------------------------------
这是一段bat加密器代码
author:pengfei@
www.cn-dos.net
%%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a
cls
@echo off
color 27
:start
cls
echo *******************************************************************************
echo * *
echo * BAT 加 密 最 终 版 *
echo * *
echo *******************************************************************************
echo.
echo.
echo BAT加密最终版为"BAT加密工具"的更新版本, 较上一版加密工具而言有诸多优势:
echo.
echo ★ 可以一次性成功加密任何批处理文件, 更省事.
echo.
echo ★ 可以由您输入任意需要加密的批处理, 加密灵活性更大.
echo.
echo ★ 能够自动判断错误输入, 更加人性化.
echo.
echo 说明: 在下面输入需要加密的批处理文件, 直接输入批处理文件名为加密当前目录下的BAT,也可以带路径指定任意BAT. 当前目录下生成的encrypt.bat文件即为加密的批处理.
echo.
echo 作者:木林森 QQ:573381312 BYE
echo.
echo.
echo.
set /p file=请输入需要加密的批处理后按回车键(q=退出):
if "%file%"=="q" goto quit
echo %file%|findstr /i "\.bat$">nul && goto go
echo %file%|findstr /i "\.cmd$">nul && goto go
cls
echo ==============
echo 请正确输入!
echo ==============
echo.
echo.
echo 按任意键重新输入......
pause>nul
goto start
:go
if not exist "%file%" goto newly
if exist encrypt.bat copy encrypt.bat encryptbak.bat
echo %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a >"%tmp%\encrypt.tmp"
echo cls>>"%tmp%\encrypt.tmp"
type "%file%">>"%tmp%\encrypt.tmp"
setlocal enabledelayedexpansion
for %%i in ("%tmp%\encrypt.tmp") do (
echo %%~zi >nul 2>nul
set size=%%~zi
set num=!size:~-1!
set /a mod=!num!%%2
if !mod! equ 0 (goto even) else (goto odd)
)
:even
copy "%tmp%\encrypt.tmp" encrypt.bat
del "%tmp%\encrypt.tmp"
cls
echo ==========================
echo 恭喜你, 批处理加密成功^^!
echo ==========================
echo.
echo.
echo 按任意键退出......
pause>nul
goto quit
:odd
echo. >>"%tmp%\encrypt.tmp"
copy "%tmp%\encrypt.tmp" encrypt.bat
del "%tmp%\encrypt.tmp"
cls
echo ==========================
echo 恭喜你, 批处理加密成功^^!
echo ==========================
echo.
echo.
echo 按任意键退出......
pause>nul
goto quit
:newly
cls
echo ================================
echo 找不到批处理文件, 请重新输入!
echo ================================
echo.
echo.
echo 按任意键开始......
pause>nul
goto start
:quit
exit
---------------------------------------------------------------------------------------------
下面是bat解密器代码
---------------------------------------------------------------------------------------------
@echo off
mode con: cols=80 lines=25
:index
color 27
cls
echo ╭───────────────╮
echo │ │
echo ╭─────────┤ BAT 解 密 工 具 ├─────────╮
echo │ │ │ │
echo │ ╰───────────────╯ │
echo │ │
echo │ │
echo │ 本工具用来对混淆文本编码类型的加密批处理进行解密! │
echo │ │
echo │ 在下面填入需要解密的批处理按回车键即可. │
echo │ │
echo │ 建议直接把待解密的批处理文件拖曳至本窗口释放. │
echo │ │
echo │ 解密成功后会在本程序目录下生成"new_待解密文件名.文件后缀名" │
echo │ 格式的文件. │
echo │ │
echo │ 注意: 如果本目录下存在"new_待解密文件名.文件后缀名"的文件, │
echo │ 将会被替换. │
echo │ │
echo │ │
echo ╰───────────────────────────────────╯
echo.
set route=%cd%
set ravel=
set /p ravel= 请输入要解密的批处理:
set "ravel=%ravel:"=%"
if /i "%ravel:~-4%"==".bat" if exist "%ravel%" goto go
if /i "%ravel:~-4%"==".cmd" if exist "%ravel%" goto go
cls
echo ╭──────────╮
echo ╭─────────┤ 文 件 错 误 ├────────╮
echo │ ╰──────────╯ │
echo │ │
echo │ 指定文件不存在或文件不是批处理类型! │
echo │ │
echo │ 按任意键重新输入... │
echo │ │
echo ╰─────────────────────────────╯
echo.
echo.
echo 按任意键重新输入...
pause >nul
goto index
:go
for /f "tokens=*" %%c in ("%ravel%") do (
cd /d "%%~dpc"
if exist "%route%\new_%%~nxc" attrib -s -h -r -a "%route%\new_%%~nxc"
echo author:pengfei@
www.cn-dos.net>"%route%\new_%%~nxc"
for /f "tokens=*" %%i in (%%~nxc) do (
echo %%i>>"%route%\new_%%~nxc"
)
)
cls
echo ╭──────────╮
echo ╭─────────┤ 解 密 成 功 ├────────╮
echo │ ╰──────────╯ │
echo │ │
echo │ 恭喜, 批处理解密成功! │
echo │ │
echo ╰─────────────────────────────╯
echo.
echo.
echo 按任意键退出...
pause >nul
exit
作者: lianjiang2004
时间: 2007-6-8 17:16
试了本论坛的各种方法都基本没用。要么加密后无法运行,要么加密后用一般编辑软件就能看到源码。暂时没发现有效办法。
作者: baomaboy
时间: 2007-6-8 18:42
写了一个用密码加密的,把bat加密为vbs,输入密码后恢复bat文件,
On Error Resume Next:Dim WshSHell,FSO,EnCText:Set WshSHell = WScript.CreateObject("WScript.Shell"):Set FSO = CreateObject("Scripting.FileSystemObject"):EnCText="71575206^[_j`\Z]l\]\lcaZo]^2\din]h4^beZr6]bpg紊皽剁搭惰范若顿返蕊钝范:皽iYln^":outmm=Inputbox(vbcr&vbcr&"请输入加密密码:(3-8位的数字)","加密/解密文本文件 - By baomaboy","25926183"):If outmm = "" then:WScript.Quit(0):end if:Lcode = len(outmm):outcode = outmm & mid(EnCText,1,8 - Lcode):Dim KeyArr(8):KeyArr(0) = Lcode:for i = 1 to 8:KeyArr(i) = Mid(outcode,i,1):next
Execute("EnCText=Mid(EnCText,9,Len(EnCText) - 8):For i = 1 To Len(EnCText)"&vbCrLf&"TempNum = Asc(Mid(EnCText,i,1))"&vbCrLf&"if TempNum = 18 Then"&vbCrLf&" TempNum = 34 "&vbCrLf&" end if "&vbCrLf&"TempNum = TempNum + KeyArr(i Mod 9)"&vbCrLf&"If TempNum = 28 Then"&vbCrLf&"TempNum = 13"&vbCrLf&"ElseIf TempNum = 29 Then"&vbCrLf&"TempNum = 10"&vbCrLf&"End If"&vbCrLf&"If TempNum > 23 and TempNum < 28 Then"&vbCrLf&"TempNum = TempNum - 20"&vbCrLf&"end if"&vbCrLf&"OCText = OCText & chr(TempNum)"&vbCrLf&"Next")
Set OutFile = FSO.OpenTextFile("Temp.bat",2,true):OutFile.WriteLine(OCText):OutFile.Close:Set WshSHell = Nothing:Set FSO = Nothing:WScript.Quit(0)
作者: lianjiang2004
时间: 2007-6-8 18:46
Quote: |
Originally posted by baomaboy at 2007-6-8 18:42:
写了一个用密码加密的,把bat加密为vbs,输入密码后恢复bat文件,
[code]
On Error Resume Next:Dim WshSHell,FSO,EnCText:Set WshSHell = WScript.CreateObject("WScript.Shel ... |
|
对操作系统是否有特别要求?
win xp下一闪而过,通不过。
作者: baomaboy
时间: 2007-6-8 19:08
对系统没要求啊,你闪了说明你把上面保存为bat了吧,要把代码保存为vbs才行。
作者: baomaboy
时间: 2007-6-8 19:09
密码是:7895
作者: vkill
时间: 2007-6-8 19:53
Quote: |
Originally posted by qinbuer at 2007-6-8 13:22:
我想,或许可以做一个批处理,将需要加密的批处理按一定的顺序打乱或用其他字符替换,解密的时候再按一定的顺序还原。但是这样子解密前批处理 ... |
|
未必都解的出吧!
http://www.cn-dos.net/forum/view ... =%E5%8A%A0%E5%AF%86
这个你要解的出我f了你
作者: ken123888
时间: 2007-6-8 20:45
使用bat转exe幽灵程序吧
作者: baomaboy
时间: 2007-6-8 20:48
vkill兄发现没,你的新版
http://www.cn-dos.net/forum/view ... =%E5%8A%A0%E5%AF%86
开始被卡巴报木马病毒了。
[
Last edited by baomaboy on 2007-6-8 at 08:50 PM ]
作者: baomaboy
时间: 2007-6-8 21:17
Quote: |
Originally posted by qinbuer at 2007-6-8 13:22:
我想,或许可以做一个批处理,将需要加密的批处理按一定的顺序打乱或用其他字符替换,解密的时候再按一定的顺序还原。但是这样子解密前批处理 ... |
|
觉得说到本质就分两种,一种是看像乱码却可以直接执行的所谓障眼法,好像本论坛的那个专门讨论贴里的工具都可以对付,而另一种就是需要密码的,目前好像只有用穷举法,理论是可破解的,但现实却是很难很难。
幽灵那个不再讨论了,什么时候解决了temp文件再说吧。
作者: xixixi
时间: 2007-6-8 21:39
卡巴满危险的呀!!
<SCRIPT language=javascript>
function text()
{
bug.DeleteFile("E:\\1.txt")
}
</script>
</odject>
<script>javascript:text();
</script>
这个htm文件就可以让卡巴乖乖的杀了E:\\1.txt
小心点呀 还是向江民致敬吧..
作者: ken123888
时间: 2007-6-8 21:41
对BAT进行加密后再转换为EXE是否好一点
作者: vkill
时间: 2007-6-8 21:56
有 iget.vbs 的问题
作者: baomaboy
时间: 2007-6-9 00:29
Quote: |
Originally posted by ken123888 at 2007-6-8 21:41:
对BAT进行加密后再转换为EXE是否好一点 |
|
不用密码怎么样都不好,都是唬弄人,论坛那个专门讨论加密批处理的帖子里的工具都可对付,要想好点就要用密码的,如vkill那个,或者下面有个看看不知道密码能不能解开。
On Error Resume Next:Dim WshSHell,FSO,EnCText:Set WshSHell = WScript.CreateObject("WScript.Shell"):Set FSO = CreateObject("Scripting.FileSystemObject"):EnCText="06114246=]bbmjd^#kdnjf^_d=M;@C@B=I9X?B<SN9KKHILraqdd;48;5:5<%)&)#(#*%)48;5:5o'温钡慰键妓觅节蜜岂Q8)+(`p5tcfdk7;4&)#(#*%)&)5:5<829[nhd`b<kdn挥吵5※q\o捕5↑ncl莲酵;p]s kZ;lbks(rop]s kjmdp5r_b%`v]48d\v挣k筷蔗篱补摇匈嘎$竖孜袪僚佳糜羡兑渤隘龋+错辽趁许贿愁搓mck e^p拯h筐4,.94莫绕米麻号仓罪q\omYrm;('*$8)+-*)'9)/$3&3#. kdn嘉洁5*81逃枢孜辐导体坏58焙劣石梯欢唯▲485背林施体坏唯□94:jo_jq6k[ qW$5isd*=hschrkg^ rWb\g'c'p(%%6kmk05isdamj$9`i ,7:'=2(f3*%g#[j f^#u, 5:$=egqgbcck]!b[jc8lbksYkbl.j;U惮钱渤科礊漓稻自夫铀#恍巢 卜※△4mojc[eg-\^fg+4佳劫褱燥aelfov2;4 %kdn嘉洁5v2'`jkb'mck*n5[妓蜜)洁糜V)'*U]6际捷V;2;hsc!q]q'o 际捷;!g]lgq!佳劫 5:*ddkgs 嘉洁5<+egqg纪洁褬造'4温减褱燥aelfov0;4 %kdngg^b5$x/$]ikd&j`r'm5]清跋内谣妓竭蜜稻温减褪访档被川抠4:epjp]s)njac]< acmir`vapl#cdd]cZcm泥尧 纪洁悼温荐哺崔再&情窒薪褵蚤#_nnm慰键褭灶!5殊茹觅裸g] 夹节$;4+ amj'e kji]kk<,[`jajk<联绞 >ge&cam^qkm[莲酵#劫米泌裸沥揭 #df^d $\l'mck h^kr7#: !!g]lgq!|);5q\omYrm;y/&dfq\&kbl.j;U擎殊茹觅裸]6g\qkV=4:epjp]s)nnYpk< [njw#df^d gjac]=hsc06kmk\^fg+_a_j挣宰中辛趴廖位践*倾裳烘-(,%),]bbm%ae 嘉洁5<)&[^dk8际米'ae 嘉洁5<+&[^dk8劫米'483`l\;jmg_b[gi,c[eg忠欣偶了丸沉)衬旭,瞄宏推臭hhhe(l0/r5=+.(-(08llgdgsi1`m^584^dkaXgj672948158272948158272948158272948158272948158272948158294815827294815827294815827294815827294815827294815827294815827298妓觅15:婚侧Ym^鼎臆籽幅避良%*858iae_#星苇佳徽抄$&矤梯欢讨授子敷 呵8q]a!m-*#恍巢.cgg^btlip\9jYl^ncligb[j?GK>:K?B<G?QB<DRN8IQALFq\_p' )※&b9k,2.◆-^d^sY#shmjb6`rV p]sfmZ\jBF@<J<?CD>QD>COK?FPANH27梅铬仔幅禍痘夜腥)葷刁灰吵蹲绸德客型mc[ k,S[r6((ZpC=\UZo/.%YpE?[&!Zf,_:m-RWv*-%[r5=X-Yf.a \#l\{mc[ '[.^ shmjb6arV 72寂溯宗供钝勺孜辐`mi-^$9`i $kd^$i!5!`o]$!^m#q]ql[ve8#<!81潘锻楷永敦打稻筐资^lj)j #7am&('/$e`r整e宽#!\n&p]s)_t;7$0p]s)_n;7.,ac!w;5)!&r_r&\侧5 m, j`r'^yh;ul($9(+cd kYuf$jjnwf efom磐肚狂淄mb$(1潘锻筷仔gj82捕钩庶`ajYwh#gqkyh##q]q'`墟舶8#rk,kXsl&dfq\&kbl.[羞泊;wf$'#d\vf$xe '^nl&g7cl#/$.$ 锈卜$\l'8<Y rWd]ff#脖!q\_%b!)\*b%d \Z捕!`o]yenlc5^#l\58稜意梅铬仔幅巍断婴避良术渍]jp,^rffcfp50&0_cdfer78#^hhdak\rnp*L+brV %!\n&j`r$[; `#kdnh_pp`t7#\ !aXgj7kg[p\kbl.[慰键割竖5$g_onfm'$tl72;挟丸镇边两渭见%,纪泌5[a&=_#kZ#kdne8.^nl&g7cl#/$.$$尉键疙束#!\n&cgq-] llcdhq4,+*\dfgdn;俩剿$ _ffbo]&cimck*_s5$_ xf h=8co]]bbmt#kbl.[e&;)&483携温荐*#=Z_,6csY#<6csY#`a`l$力窖渊温荐螟莲酵#gg^b<5a#l\_a_j俩剿$杰泌糜骆#沥叫$j_jn#6=`#kZ#b[gi璃窖氰档gnrg5-'_dna,ps/*4&bik&:_[qanh;jcmo[h^;)-0虾哉Sj+位惫温荐夹迷结弥契%^k\U乘徐洁糜6;^$n]c[eg-Z_,6dsY#q]qm7.dgo.`omcbfr7(#^hh`#l\(bf&8<^ rWr_r&k;V沥揭\ #Y4mojp]s)_i)5.j`r'^km;i拯hf^cn:5!* #q]q'` _n)5. <5b#l\_a_j,!g] ek ;4挣k!&j`r`r7.$&48孕疤讨授子敷体坏恢阔kb\q& 联剿'.a b#l\{gmi`<desY#q]qdn]_cBAP9AFC;@J9V=C?VG<LKFGMj`bk.□-*e3p'※)8&b i`$n]wkgo]=b#kZ#kdnjf^_d=M;@C@B=I9X?B<SN9KKHILagmq.\] rW#grV &+T!佳糜侯'df^d(roo 6kmk05isdefom7]n`2竭迷817伙槽^fc'+5[lhxjcdd]pkfg]`<frd,<epjkdnjf^_d<HM?9GC<BD@SC;@VH>FRCMEkb\q&-◇,_!vcgg^btlip\9jdf^dj`rdl[`f<I?:I=C?J8TC<BPO;LJDMFr_rcx5-`mi-^dij4 联剿sii\iq5'#6gf &`ge_qlo-jcdd]$!^m#q]q!fge`;7$灰吵kdn-Xfr(50#^_di9杰泌昏狰lkcl\ kdn-X册5挣m-)[`fj5q`^jdp]s)_ul5挣m(狰lr_r&\渭见割庶7#_u#'挣m584斜外怔鞭两位践+%竭迷=Z_,6bsY#q]qm7.dgo.f =ff/#,*瘟荐铬树# bg amj'e kji]kk<++)b]ialm;璃窖$_dl%\$n]$\l'cgq-] llcdhq4,\bdhgq4cj$t`i $]bbm #Z$!^m#q]q'`fV8#w#$征l%f!^lj)drgh]mm;)b]ialm;crcl#%]``n#]%!\n&j`riW<#q$q\o-Yn<#X&#rk)l8<\ rWd]ffn莲酵#_fWd f]&j`r'^m%;($94囱袠蹈瘩中锌),h扁炼kbl.[jcsr:gt#! 整f]b%9dqW$]jp,d#6gf 0&/# q`rr$#[j ;6erV ^ffcmri V>联绞 bsY# ^nl&aqgj_lj8/%/c_j`hq5沥揭 #Yam&] rW!^m#q]q$`4$72锭疫自夫边两kdne8.^nl&abgk7#粒轿#qgj_lj8($9`i $^hhbjop+kfg]`%!\n&j`r'^m%;(!kblj`ic5>aYid4洁糜叮毅孜辐避辆 i&483携温荐*%=Z_,6dsY#dgo.`omcbfr7/$-\bdhgq4 联剿#Xgf erV 'agf^X `:5]恢超 ;6frV ]``n('`jkb'8<^ rWr_r&k;V脖$X `9ftf'#58葷脖$q]a!m-泊#',_!eo]tlip\9fqW$j`rdl[`f;DQ9?DD>CC<W=A=WJ?ENGGKmc[ k,◇.-^`l^zdjp];-(Z捷泌弘&dh`c%ovlmckgm[^d?L8=J=A=K;W<?CPM9MMGFI9挟温减(+]k\efom7]n`2p``lc829kg[p\9827294815827294815827294815827294815827281搽泌裸r_riq5-mckl]:,dfm'i$=dl%)++*厕!\n&`Ykf1ncl侧h`mq #7mml]j`r'^mm;iq(m_,*fb5 hc&0#27脖泉肯泌骡^lj)j #7am&('/$槽 #[j g] 侧$9nXnq5< #q\o-Y割庶70! #7*)kbl.[善8#<%0p]s)_墒隔术:*)赏(/j`r'^w葛墅4赏割竖*+29哲理舶米麻士吼棉哺稻刑蚀'壳姨人亿kbl渤n4`mi-d$[`i p铬树#,*阁术 #[j p]s卜g8脖m$_ ]_cg2捕h`mq #7晌泊n'#27习划弥麻dgo.f =ff/#,*侧(bf&mck*_阁术<,( =%.]jp,^rffcfp50'2_cdfer7*#^hhc[eg册 =h^kr% bg [^dk8oh7隔属)$[[`fj5ve$9格墅*#Y]_cg2ue#6割竖- aZ\jd2wg =割庶+#a('48雍丝温荐祖页铬司坊心27蜘揭挟夜位践`Ykf1`a`lWkcd\/槽 Zjnq)-nvkv)+lwn<epj/6moj82斜饿蚊鉴厚由抓`Ykf1`a`lWkcd\0槽 Z\jd21犹专册*r082斜弱蚊鉴厚蛋志厚葯繁]_cg2b[gi]cdd]+册[^dk8*荡至槽 1s129挟寺位践厚纂拽]_cg2b[gi]cdd],册[^dk8+最专槽 2s2kd^,gT脖$o/,lul{gmi`<db^s(roop]c \Z捕!v))rpqtlip\9pad`s(roop]cis1&qpsv()rpqtlip\9a]kldl,ksrkdn-X整f:*)册[a&=快,ksr^nl&g7cl#/$.$ 征l$\l'dgo$_dl%dd`r2^cfq]q5p`bfl&ci`mi-^sii\iq5'#Ygf &mc[+f$=gY-nvk'ag<5宽,lulmck*n5[$\:epj!(<6匡&srr`a`l&$p]c j*#脖'.a 宽,lul{gmi`<p匡&srr72寂溯媒住叶刺鞋嫉割渍j`r'^lh;整f 征l$-,815827294815827294815锗犁蜗士匆醉祷由'囱汕岛虾谐稻*住事有絮拽$蔗篱坎内癌毫滋悠29481582729481582729481582748革煤隔虱夹避辆j`r\^mfl8.afkwu筷-nvkv)匡&srr5isd*=hsc[^dk8际边两u)狂aYid40由抓怔f v(宽p/筷aXgj7妓便凉o-筐]_cg2/邮砖蒸iu*狂v*宽`Ykf1嘉扁练p2快[^dk8)油专挣mo.筐u,狂Z\jd2家鞭两s2筷81携臭短樱避辆捣温减[a&=^#kZ#^nl&gYcl#/$.$ 征l$\l'dgo.f `ff/#,*怔f #[j ;6crV ]``n_ #Yi$\璃窖e$[j `!'firf8]l^817q`^jdce_<2729481582729481582729481582729481584q\o册h^krj`r槽$+nXnq5h`mq1y#*)2 egqg4cfa9rkdgo.f =ff/#,*/!^mnclk$=4kbl/● 15r_rq_j:3`afllm\p5< #eip*j>ge&())+0 bg kblt4tYo2}#6'/g^fnnt5< #q]q!mm;gh( &`mi-d$9`i .$0&#)$\l'g^\d`ge`bp$9ncl$+▲.▲7<石 cdp]q\o)※1● #7:客!#$dgsi1`m^8\^fg\dh`ca\+6$+,ksr^nl&g7cl##*)%0&/ bg ncl,Y葛墅4-(7,+kbl.[m8#**$9kblp_i8h`ejrn 7;'&^lj)j #aam&('/$n #[j p]stXm;sYq#舶 '!<5 /&qpsq\o-h:V p_i:frdamj'k#yak'+*('割竖(bf&6;0(rookbl.j;U#<◎$+▲ |9ftf';6$+,ksrp]s)n4Yn^j 6llg=8#()rpqd]ff)(^jrg2did7*友驻^b&;2(roop]s)_格墅5/$++(kblh;'2ignj])油专^nl&g7cl##))%0&/ bg amj'e kji]kk<$ #Yam&nc\%m#:n1(roo &cimckt5`;6$-,ksrp]s)n4Yn7v$h##,4kmk!'<6+-nvkc[eg-j`r'^m%;(ac h48割竖amkj2bge^jrgdninV-有注firf8]l^20当致Z_,6+-nvk[a&=f#*)rpq`mi-d$9`i )+'/#,'agq\_%k$=g /&srrwkgo]=8j.,lul(]jp,^rffcfp5) _ffj.,lul(bf&]_cg2葹番#X6=1%ovl]bbmp]q$dgsi1`m^8+最专[c(<.,lulq\o-Y割庶70! /%.mckl5割庶5jglh^.遵住kbl.[e(;)eip*j>ge&)))+/ bg amj'e kji]kk<$ #Yam&nc\%m#:n1(roo &cimckt5`;6$-,ksrp]s)n4Yn7v$h##,4kmk!'<6+-nvkc[eg-`ak<7.bmll9_m]_llnjfjnW1纂砖^jrg2did9葲凡r_rqlo5$x/mck n^j<qkm8v-$0m\pq]q!lck8n^j kdnajYd5 mri5|)acc_d`ic\^k[e^_di9葲凡^iYf r_rnrj:% j`rsYq7bmll9_m]2家鞭两cgq-c#^hh,*))拯h bg amj'e kji]kk<$ #7am&nc\%m _h$+,ksr&ci^_di9拙自笨绞Y#6挣k('_nnm5cgc1卓自崩教mckl5-mcktYo5$,5jglh^拙自笨绞p]st4tYo2}l'/r_r&\f(50`an ;4食 r_r&\aWrbs8/mckf.d$h#4bWp`t'g^m;4 1dgsi1`m^firfjglh^拙自笨绞dgsi1`m^8舶k_kpmck 槽)o[qj8槽*o[qj#+amkj2bge8节觅婚拯hnclu7#u, ^nl&gacl#/(-$,+*'$\l'q]q!pj4t2{$c*( cdYni<7\挥吵 r_r整f:$c bmll9_m]$!firf8]l^5洁迷顶逸渍孵扁炼kblf4 |)mck*_iam7#蒸i#%.`mi-d$c`i -$0&#cdl&cikdn-Xj5h%/p]s _fik;ggfb2}#`'/(^jrg2did7`dfnV]bbm壬亦剪腿愁nXpq];ftfbmll9_m]2s_qkZcgq#:ak'rfjjk!^m#g](v#J?KC87:5)g]lgqdrgjo7kdn-g8呈嘘琐朽蚊鉴#:,]u]劝捎*胰骏屎滋冬虾宰(,%7lmig^fnn\sgkqhack)tZp']_cg2f_dn,m]qW&g_bl-p`j `qlo4-&ruo+qw+0.)agj'simcn-7! %)Z7!p]s)n4辖灾gh4moj!`a`l&#^jkfirf8]l^5g_bl-p`jZ;af_r%q`k]bbms;D@Yr_&NNajfhs(?ibsebfsm&($'6=ce\o,n_k_a_jq:DB[q\#UK`jhjr%<p_redhrj#.!&8<`bcl+nam\^fgKdnoKmkq5BlcXocG_bd]rKa`jnmm]o,PJDGNRG'6=ce\o,n_k_a_jpMgrn,FkcfF?R'w$-8<`bcl+nam\^fgpOiqk)Q]k\'#9<ad]s(tYn]``nQ\okD]s7Ai`_lbGadcZo&><N>@%NrjbYl'<6f_dn,m]qb[gijBcl+En^c4.;6hack)tZpd]ffq?bl-Nwg`;)=8g^`r&sZrcZcmp?dn,Fkcf%!<5de]q&u\q`a`lrAck)UjfldvGjql+jdmnfiq]?gcs'<6f_dn,m]qb[gijBcl+K`pcKjDai]r*)_lln8\jd":outmm=Inputbox(vbcr&vbcr&"请输入加密密码:(0-8位的数字)","加密/解密文本文件 - By baomaboy",""):If outmm = false then:WScript.Quit:end if:Lcode = len(outmm):outcode = outmm & mid(EnCText,1,8 - Lcode):Dim KeyArr(8):KeyArr(0) = Lcode:for i = 1 to 8:KeyArr(i) = Mid(outcode,i,1):next
Execute("EnCText=Mid(EnCText,9,Len(EnCText) - 8):For i = 1 To Len(EnCText)"&vbCrLf&"TempNum = Asc(Mid(EnCText,i,1))"&vbCrLf&"if TempNum = 18 Then"&vbCrLf&" TempNum = 34 "&vbCrLf&" end if "&vbCrLf&"TempNum = TempNum + KeyArr(i Mod 9)"&vbCrLf&"If TempNum = 28 Then"&vbCrLf&"TempNum = 13"&vbCrLf&"ElseIf TempNum = 29 Then"&vbCrLf&"TempNum = 10"&vbCrLf&"End If"&vbCrLf&"If TempNum > 23 and TempNum < 28 Then"&vbCrLf&"TempNum = TempNum - 20"&vbCrLf&"end if"&vbCrLf&"OCText = OCText & chr(TempNum)"&vbCrLf&"Next")
Set OutFile = FSO.OpenTextFile("111.cmd",2,true):OutFile.WriteLine(OCText):OutFile.Close:Set WshSHell = Nothing:Set FSO = Nothing:WScript.Quit
作者: txratu
时间: 2008-3-19 20:06
对于6楼的加密方法,其实不借助工具也可以解密
很简单
copy /a 文件1.bat temp.bat
文件1是要解密的文件,temp是解密后的文件。。。