中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名:www.cn-dos.net 论坛域名:www.cn-dos.net/forum
DOS,代表着自由开放与发展,我们努力起来,学习FreeDOS和Linux的自由开放与GNU精神,共同创造和发展美好的自由与GNU GPL世界吧!

中国DOS联盟论坛
现在时间是 2026-08-10 12:09
中国DOS联盟论坛 » DOS批处理 & 脚本技术(批处理室) » [原创]加密BAT的VBS 查看 1,104 回复 6
楼 主 [原创]加密BAT的VBS 发表于 2008-11-14 12:16 ·  中国 重庆 电信
新手上路
积分 6
发帖 2
注册 2008-11-14 11:48
17年会员
UID 130932
性别 男
状态 离线
加密BAT的VBS
呵呵
只是实现了加密的功能
没有容错
自己测试了下%90的BAT加密后运行正常,效率并没降低
下载:http://file3.xingkong.com//Files/2008/11/20081114123149725.rar
例:
::Crypt by Savage Studio | EM:log2.0@163.com | HomePage:savage100.xingkong.com | QQ:24807208::
@echo off & set _="U}'mf6jSb@HI3XW]5we?9:0Rs{il|KZn8T,<#qv





Last edited by savage100 on 2008-11-14 at 12:28 ]
本帖最近评分记录 (共 1 条) 点击查看详情
评分人分数时间
HAT +4 2008-11-23 01:09
2 发表于 2008-11-14 13:13 ·  中国 陕西 西安 电信
铂金会员
★★★★
积分 5,212
发帖 2,478
注册 2007-02-08 23:39
19年会员
UID 79003
性别 男
状态 离线
@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
S smile 微笑,L love 爱,O optimism 乐观,R relax 放松,E enthusiasm 热情...Slore
3 为方便他人阅读,建议直接贴代码。 发表于 2008-11-14 13:51 ·  美国 惠普HP
版主
★★★★★
积分 9,023
发帖 5,017
注册 2007-05-31 19:39
19年会员
UID 89899
性别 男
状态 离线
Dim SStr,Costr,ts,SavageSSC,SavageSS,L,strs,stre,ls,flag,Head
dim a()
Info1=chr(13) & "_______________________________" & chr(13) & "Powered By Savage Studio (2008)" & chr(13) & "EM:log2.0@163.com QQ:24807208" & chr(13) & "HomePage:savage100.xingkong.com"
Randomize(Hour(Now)& Minute(Now)& Second(Now))
SavageSS="U}'mf6jSb@HI3XW]5we?9:0Rs{il|KZn8T,<#qv












































































4 发表于 2008-11-14 14:20 ·  中国 四川 成都 电信
新手上路
积分 8
发帖 8
注册 2008-11-14 09:40
17年会员
UID 130913
性别 男
状态 离线
谢谢各位老大的提供
5 发表于 2008-11-21 10:56 ·  中国 河南 郑州 联通
社区乞丐
积分 -11
发帖 9
注册 2008-11-21 10:18
17年会员
UID 131625
性别 男
状态 离线
支持!!!
6 发表于 2008-11-22 09:26 ·  中国 山东 济南 联通
高级用户
★★★
积分 959
发帖 474
注册 2007-10-25 10:40
18年会员
UID 100716
性别 男
状态 离线
我无法通过测试,出现800a0005错误
7 发表于 2008-11-22 14:56 ·  中国 台湾 中华电信(HiNet)数据中心
初级用户
积分 26
发帖 25
注册 2008-11-07 16:06
17年会员
UID 130293
性别 男
状态 离线
好像挺有趣的,测试测试看看,谢谢分享!;)
论坛跳转: