中国DOS联盟论坛

中国DOS联盟

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

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

游客:  注册 | 登录 | 命令行 | 搜索 | 上传 | 帮助 »
作者:
标题: [原创]加密BAT的VBS 上一主题 | 下一主题
savage100
新手上路





积分 6
发帖 2
注册 2008-11-14
状态 离线
『楼 主』:  [原创]加密BAT的VBS 使用 LLM 解释/回答一下

加密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 ]


   此帖被 +4 点积分     点击查看详情   
评分人:【 HAT 分数: +4  时间:2008-11-23 01:09


2008-11-14 12:16
查看资料  发送邮件  发短消息  网志   编辑帖子  回复  引用回复
slore
铂金会员





积分 5212
发帖 2478
注册 2007-2-8
状态 离线
『第 2 楼』:   使用 LLM 解释/回答一下

@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
2008-11-14 13:13
查看资料  发短消息  网志   编辑帖子  回复  引用回复
HAT
版主





积分 9023
发帖 5017
注册 2007-5-31
状态 离线
『第 3 楼』:  为方便他人阅读,建议直接贴代码。 使用 LLM 解释/回答一下

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
















































































2008-11-14 13:51
查看资料  发短消息  网志   编辑帖子  回复  引用回复
laoyao2007
新手上路





积分 8
发帖 8
注册 2008-11-14
状态 离线
『第 4 楼』:   使用 LLM 解释/回答一下

谢谢各位老大的提供


2008-11-14 14:20
查看资料  发短消息  网志   编辑帖子  回复  引用回复
fyjokre
社区乞丐





积分 -11
发帖 9
注册 2008-11-21
状态 离线
『第 5 楼』:   使用 LLM 解释/回答一下

支持!!!


2008-11-21 10:56
查看资料  发送邮件  发短消息  网志   编辑帖子  回复  引用回复
5872169
高级用户





积分 959
发帖 474
注册 2007-10-25
状态 离线
『第 6 楼』:   使用 LLM 解释/回答一下

我无法通过测试,出现800a0005错误


2008-11-22 09:26
查看资料  发送邮件  发短消息  网志   编辑帖子  回复  引用回复
holucan
初级用户





积分 26
发帖 25
注册 2008-11-7
状态 离线
『第 7 楼』:   使用 LLM 解释/回答一下

好像挺有趣的,测试测试看看,谢谢分享!;)


2008-11-22 14:56
查看资料  发送邮件  发短消息  网志   编辑帖子  回复  引用回复

请注意:您目前尚未注册或登录,请您注册登录以使用论坛的各项功能,例如发表和回复帖子等。


可打印版本 | 推荐给朋友 | 订阅主题 | 收藏主题



论坛跳转: