中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --
联盟域名：www.cn-dos.net　论坛域名：www.cn-dos.net/forum

游客 | 登录 | 注册 | 会员 | 搜索 | 中国DOS联盟

中国DOS联盟论坛
现在时间是 2026-08-10 13:03

共 47,811 主题排行 / 349,897 发帖 / 今日 0 篇 / 48,255 会员排行

DOS批处理 & 脚本技术（批处理室） » [原创]加密BAT的VBS

可打印版本　1,105 / 6

第1楼　savage100	发表于 2008-11-14 12:16
新手上路　发帖 2　积分 6
[原创]加密BAT的VBS 加密BAT的VBS 呵呵只是实现了加密的功能没有容错自己测试了下%90的BAT加密后运行正常，效率并没降低下载：http://file3.xingkong.com//Files/2008/11/20081114123149725.rar 例： ::Ｃrypt by Ｓavage Ｓtudio \| ＥM:log2.0@163.com \| ＨomeＰage:savage100.xingkong.com \| ＱQ:24807208:: @echo off & set _="U}'mf6jSb@HI3XW]5we?9:0Rs{il\|KZn8T,<#qv Last edited by savage100 on 2008-11-14 at 12:28 ]

第2楼　slore	发表于 2008-11-14 13:13
铂金会员　发帖 2,478　积分 5,212
@echo off&setlocal EnableDelayedExpansion&color 0f&set all=1&set /A a=0&set /A b=1&set /A c=0&for /L %%i in (0,1,44) do (set /A c=!a!+!b!&set /A a=!b!&set /A b=!c!&set all=!all! !c!)&if %%i equ 44 (echo 斐波纳齐:!all!)&pause>nul

第3楼　HAT	发表于 2008-11-14 13:51
版主　发帖 5,017　积分 9,023
为方便他人阅读，建议直接贴代码。 Dim SStr,Costr,ts,SavageSSC,SavageSS,L,strs,stre,ls,flag,Head dim a() Info1=chr(13) & "_______________________________" & chr(13) & "Ｐowered Ｂy Savage Ｓtudio (2008)" & chr(13) & "ＥM:log2.0@163.com ＱQ:24807208" & chr(13) & "ＨomeＰage:savage100.xingkong.com" Randomize(Hour(Now)& Minute(Now)& Second(Now)) SavageSS="U}'mf6jSb@HI3XW]5we?9:0Rs{il\|KZn8T,<#qv

第4楼　laoyao2007	发表于 2008-11-14 14:20
新手上路　发帖 8　积分 8
谢谢各位老大的提供

第5楼　fyjokre	发表于 2008-11-21 10:56
社区乞丐　发帖 9　积分 -11
支持！！！

第6楼　5872169	发表于 2008-11-22 09:26
高级用户　发帖 474　积分 959
我无法通过测试，出现800a0005错误

第7楼　holucan	发表于 2008-11-22 14:56
初级用户　发帖 25　积分 26
好像挺有趣的，测试测试看看，谢谢分享！;)

[ 联系联盟系统管理团队 - 中国DOS联盟 - 标准版 ]
Sponsored by ifanr Inc | © 2001–2023