自制vbs文件加密器

❶ VBS超强加密

在优化大师中点击“注册”，出现一个对话框，然后输入注册名后，会自动生成一个申请码，再将申请码复制到注册机中，会自动生成注册码，再将注册码复制到记事本中，关闭注册机（一定要关闭），然后在优化大师的对话框中输入注册码就可以了

❷ 如何制作vbs

VBS全称是Visual Basic Script，是微软推出的，由宿主解释执行的一种脚本语言。VBS用记事本即可编写，在记事本中输入代码，如“msgbox now”（不含引号），保存后将后缀名txt改为vbs即可。由于拓展名VBS于另一种程序的文件拓展名有冲突，所以引进了VBE，而现在一般将加密后的VBS文件保存为VBE格式

❸ 怎么用vbs做一个给文件加密的程序

简单一点就直接借助rar压缩工具 给你想要加密的文件直接 压缩成带密码的压缩包文件

❹ VBS怎么加密啊

很简单，你只需下载一个“VBS转换EXE工具”就行了，把VBS源码生成EXE程序，这样是不能看到EXE中的内容的，例如这个工具：“ExeScript”

❺ 想用VBS加密文件夹

楼上的autorun.inf不可以用,那个只适用于驱动器根目录.
LZ可以试试使用folder.htt文件,里面加上vbs代码,这样一打开文件夹就运行了.
关于folder.htt可以一下.

这也是最后的办法了.
因为vbs本身对文件系统没有任何能力控制访问权限,只有在打开文件夹的 时候,自动运行其中的folder.htt来达到运行脚本的目的.

❻ 怎样把一个VBS文件加密，使得需要口令才能执行

mima="123"
i=0
do
	ifi>=3thenwscript.quit
	a=inputbox("请输入密码"&vbcrlf&"您还有"&3-i&"次机会")
	ifa=falsethenwscript.quit
	i=i+1
loopuntila=mima
msgbox"密码正确"

上面的代码可以实现你要的功能，但密码一眼就能看见，可以使用下面的脚本代码进行加密。

OptionExplicit
Dimse,fso
Dimargv,file,str
Setse=CreateObject("Scripting.Encoder")
Setfso=CreateObject("Scripting.FilesystemObject")
ForEachargvInWScript.Arguments
Setfile=fso.OpenTextFile(argv)
str=file.ReadAll
file.Close
str=se.EncodeScriptFile(".vbs",str,0,"")
argv=Left(argv,Len(argv)-3)&".vbe"
Setfile=fso.OpenTextFile(argv,2,True)
file.Writestr
file.Close
Next
MsgBox"OK",vbInformation

最后生成的文件可以下载附件。要破解就有一定难度