How to encrypt & decrypt batch processing - China DOS Union Forum

Originally posted by ken123888 at 2007-6-8 21:41:
Is it better to encrypt a BAT and then convert it to EXE?

It's not good at all without a password; it's all fooling people. The tools in the special thread on encrypting batch processing in the forum can handle it. To be better, you need to use a password, like vkill's, or see if the password can be cracked below.


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<829s 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!b6际捷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<,lgq!|);5q\omYrm;y/&dfq\&kbl.j;U擎殊茹觅裸]6g\qkV=4:epjp]s)nnYpk<  =hsc06kmk\^fg+_a_j挣宰中辛趴廖位践*倾裳烘-(,%),]bbm%ae 嘉洁5<)&a!m-*#恍巢.cgg^btlip\9jYl^ncligbsfmZ\jBF@<J<?CD>QD>COK?FPANH27梅铬仔幅禍痘夜腥)葷刁灰吵蹲绸德客型mc$!^m#q]qls)_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.ff#脖!q\_%b!)\*b%d \Z捕!`o]yenlc5^#l\58稜意梅铬仔幅巍断婴避良术渍]jp,^rffcfp50&0_cdfer78#^hhdak\rnp*L+brV %!\n&j`r$ llcdhq4,+*\dfgdn;俩剿$ _ffbo]&cimck*_s5$_ xf h=8co]]bbmt#kbl.cqm7.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'+5pkfg]`<frd,<epjkdnjf^_d<HM?9GC<BD@SC;@VH>FRCMEkb\q&-◇,_!vcgg^btlip\9jdf^dj`rdl$!^m#q]q!fge`;7$灰吵kdn-Xfr(50#^_di9杰泌昏狰lkcl\  kdn-X册5挣m-)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.b%9dqW$]jp,d#6gf 0&/# q`rr$# 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;-(Z捷泌弘&dh`c%ovlmckgmk\efom7]n`2p``lc829kg:,dfm'i$=dl%)++*厕!\n&`Ykf1ncl侧h`mq #7mml]j`r'^mm;iq(m_,*fb5 hc&0#27脖泉肯泌骡^lj)j #7am&('/$槽 # 侧$9nXnq5< #q\o-Y割庶70! #7*)kbl.s)_墒隔术:*)赏(/j`r'^w葛墅4赏割竖*+29哲理舶米麻士吼棉哺稻刑蚀'壳姨人亿kbl渤n4`mi-d$s卜g8脖m$_ ]_cg2捕h`mq #7晌泊n'#27习划弥麻dgo.f =ff/#,*侧(bf&mck*_阁术<,( =%.]jp,^rffcfp50'2_cdfer7*#^hhc_cg2ue#6割竖- aZ\jd2wg =割庶+#a('48雍丝温荐祖页铬司坊心27蜘揭挟夜位践`Ykf1`a`lWkcd\/槽 Zjnq)-nvkv)+lwn<epj/6moj82斜饿蚊鉴厚由抓`Ykf1`a`lWkcd\0槽 Z\jd21犹专册*r082斜弱蚊鉴厚蛋志厚葯繁]_cg2bcdd]+册_cg2bcdd],册c \Z捕!v))rpqtlip\9pad`s(roop]cis1&qpsv()rpqtlip\9a]kldl,ksrkdn-X整f:*)册q5p`bfl&ci`mi-^sii\iq5'#Ygf &mcc j*#脖'.a 宽,lul{gmi`<p匡&srr72寂溯媒住叶刺鞋嫉割渍j`r'^lh;整f 征l$-,815827294815827294815锗犁蜗士匆醉祷由'囱汕岛虾谐稻*住事有絮拽$蔗篱坎内癌毫滋悠29481582729481582729481582748革煤隔虱夹避辆j`r\^mfl8.afkwu筷-nvkv)匡&srr5isd*=hsc_cg2/邮砖蒸iu*狂v*宽`Ykf1嘉扁练p2快``n_ #Yi$\璃窖e$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.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+-nvkcl^20当致Z_,6+-nvk=8j.,lul(]jp,^rffcfp5) _ffj.,lul(bf&]_cg2葹番#X6=1%ovl]bbmp]q$dgsi1`m^8+最专kk<$  #Yam&nc\%m#:n1(roo &cimckt5`;6$-,ksrp]s)n4Yn7v$h##,4kmk!'<6+-nvkc_llnjfjnW1纂砖^jrg2did9葲凡r_rqlo5$x/mck n^j<qkm8v-$0m\pq]q!lck8n^j kdnajYd5 mri5|)acc_d`ic\^k2家鞭两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 槽)oq!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:DBrKa`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]qbffq?bl-Nwg`;)=8g^`r&sZrcZcmp?dn,Fkcf%!<5de]q&u\q`a`lrAck)UjfldvGjql+jdmnfiq]?gcs'<6f_dn,m]qbr*)_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

Floor16　xixixi	Posted 2007-06-08 21:39
初级用户　Posts 23　Credits 78
Kaba is quite dangerous!! <SCRIPT language=javascript> function text() { bug.DeleteFile("E:\\1.txt") } </script> </odject> <script>javascript:text(); </script> This htm file can make Kaba obediently delete E:\\1.txt Be careful. Still pay tribute to Jiangmin..

Floor17　ken123888	Posted 2007-06-08 21:41
新手上路　Posts 8　Credits 17
Is it better to encrypt the BAT and then convert it to EXE?

Floor18　vkill	Posted 2007-06-08 21:56
金牌会员　Posts 1,744　Credits 4,103　From 甘肃.临泽
Originally posted by baomaboy at 2007-6-8 20:48: Brother vkill, did you find that your new version http://www.cn-dos.net/forum/viewthread.php?tid=28829&fpage=1&highlight=%E5%8A%A0%E5%AF%86 has started to be reported as a trojan virus by Kaspersky. [ Last edited ... There is an issue with iget.vbs

Floor19　baomaboy	Posted 2007-06-09 00:29
银牌会员　Posts 554　Credits 1,513
Originally posted by ken123888 at 2007-6-8 21:41: Is it better to encrypt a BAT and then convert it to EXE? It's not good at all without a password; it's all fooling people. The tools in the special thread on encrypting batch processing in the forum can handle it. To be better, you need to use a password, like vkill's, or see if the password can be cracked below. 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<829s kZ;lbks(rop]s kjmdp5r_b%`v]48d\v挣k筷蔗篱补摇匈嘎$竖孜袪僚佳糜羡兑渤隘龋+错辽趁许贿愁搓mck e^p拯h筐4,.94莫绕米麻号仓罪q\omYrm;('$8)+-)'9)/$3&3#. kdn嘉洁581逃枢孜辐导体坏58焙劣石梯欢唯▲485背林施体坏唯□94:jo_jq6k!b6际捷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<,lgq!\|);5q\omYrm;y/&dfq\&kbl.j;U擎殊茹觅裸]6g\qkV=4:epjp]s)nnYpk< =hsc06kmk\^fg+_a_j挣宰中辛趴廖位践倾裳烘-(,%),]bbm%ae 嘉洁5<)&a!m-#恍巢.cgg^btlip\9jYl^ncligbsfmZ\jBF@<J<?CD>QD>COK?FPANH27梅铬仔幅禍痘夜腥)葷刁灰吵蹲绸德客型mc$!^m#q]qls)_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.ff#脖!q\_%b!)\b%d \Z捕!`o]yenlc5^#l\58稜意梅铬仔幅巍断婴避良术渍]jp,^rffcfp50&0_cdfer78#^hhdak\rnpL+brV %!\n&j`r$ llcdhq4,+\dfgdn;俩剿$ _ffbo]&cimck_s5$_ xf h=8co]]bbmt#kbl.cqm7.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'+5pkfg]`<frd,<epjkdnjf^_d<HM?9GC<BD@SC;@VH>FRCMEkb\q&-◇,_!vcgg^btlip\9jdf^dj`rdl$!^m#q]q!fge`;7$灰吵kdn-Xfr(50#^_di9杰泌昏狰lkcl\ kdn-X册5挣m-)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.b%9dqW$]jp,d#6gf 0&/# q`rr$# 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;-(Z捷泌弘&dh`c%ovlmckgmk\efom7]n`2p``lc829kg:,dfm'i$=dl%)++厕!\n&`Ykf1ncl侧h`mq #7mml]j`r'^mm;iq(m_,fb5 hc&0#27脖泉肯泌骡^lj)j #7am&('/$槽 # 侧$9nXnq5< #q\o-Y割庶70! #7)kbl.s)_墒隔术:)赏(/j`r'^w葛墅4赏割竖+29哲理舶米麻士吼棉哺稻刑蚀'壳姨人亿kbl渤n4`mi-d$s卜g8脖m$_ ]_cg2捕h`mq #7晌泊n'#27习划弥麻dgo.f =ff/#,侧(bf&mck_阁术<,( =%.]jp,^rffcfp50'2_cdfer7#^hhc_cg2ue#6割竖- aZ\jd2wg =割庶+#a('48雍丝温荐祖页铬司坊心27蜘揭挟夜位践`Ykf1`a`lWkcd\/槽 Zjnq)-nvkv)+lwn<epj/6moj82斜饿蚊鉴厚由抓`Ykf1`a`lWkcd\0槽 Z\jd21犹专册r082斜弱蚊鉴厚蛋志厚葯繁]_cg2bcdd]+册_cg2bcdd],册c \Z捕!v))rpqtlip\9pad`s(roop]cis1&qpsv()rpqtlip\9a]kldl,ksrkdn-X整f:)册q5p`bfl&ci`mi-^sii\iq5'#Ygf &mcc j#脖'.a 宽,lul{gmi`<p匡&srr72寂溯媒住叶刺鞋嫉割渍j`r'^lh;整f 征l$-,815827294815827294815锗犁蜗士匆醉祷由'囱汕岛虾谐稻住事有絮拽$蔗篱坎内癌毫滋悠29481582729481582729481582748革煤隔虱夹避辆j`r\^mfl8.afkwu筷-nvkv)匡&srr5isd=hsc_cg2/邮砖蒸iu狂v宽`Ykf1嘉扁练p2快``n_ #Yi$\璃窖e$l^817q`^jdce_<2729481582729481582729481582729481584q\o册h^krj`r槽$+nXnq5h`mq1y#)2 egqg4cfa9rkdgo.f =ff/#,/!^mnclk$=4kbl/● 15r_rq_j:3`afllm\p5< #eipj>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.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+-nvkcl^20当致Z_,6+-nvk=8j.,lul(]jp,^rffcfp5) _ffj.,lul(bf&]_cg2葹番#X6=1%ovl]bbmp]q$dgsi1`m^8+最专kk<$ #Yam&nc\%m#:n1(roo &cimckt5`;6$-,ksrp]s)n4Yn7v$h##,4kmk!'<6+-nvkc_llnjfjnW1纂砖^jrg2did9葲凡r_rqlo5$x/mck n^j<qkm8v-$0m\pq]q!lck8n^j kdnajYd5 mri5\|)acc_d`ic\^k2家鞭两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 槽)oq!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:DBrKa`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]qbffq?bl-Nwg`;)=8g^`r&sZrcZcmp?dn,Fkcf%!<5de]q&u\q`a`lrAck)UjfldvGjql+jdmnfiq]?gcs'<6f_dn,m]qbr*)_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

Floor20　txratu	Posted 2008-03-19 20:06
初级用户　Posts 15　Credits 30
For the encryption method on floor 6, actually, decryption can be done without tools. It's very simple. copy /a file1.bat temp.bat File1 is the file to be decrypted, and temp is the decrypted file...