admin管理员组文章数量:1639832
将VBS脚本编译成加密版本的VBE脚本
- 背景
- 保存下面的VBS程序代码到vbs文件中
- 利用上面的vbs脚本程序为自己的vbs脚本加密。
背景
有些时候我们编写了一个VBS脚本后并不是自己用,想给别人用。但我们又不想使用者看到我们的源代码。原因可能是不想自己辛辛苦苦写的源程序被别人免费占有。也可能是VBS源脚本文件中包含了密码等敏感信息。亦或是仅仅是不希望使用者修改程序,防止出现错误。于是今天就来教大家怎么给vbs脚本加密。
保存下面的VBS程序代码到vbs文件中
Option Explicit
dim oEncoder, oFilesToEncode, file, sDest
dim sFileOut, oFile, oEncFile, oFSO, i
dim oStream, sSourceFile
set oFilesToEncode = WScript.Arguments
set oEncoder = CreateObject("Scripting.Encoder")
For i = 0 to oFilesToEncode.Count - 1
set oFSO = CreateObject("Scripting.FileSystemObject")
file = oFilesToEncode(i)
set oFile = oFSO.GetFile(file)
Set oStream = oFile.OpenAsTextStream(1)
sSourceFile=oStream.ReadAll
oStream.Close
sDest = oEncoder.EncodeScriptFile(".vbs",sSourceFile,0,"")
sFileOut = Left(file, Len(file) - 3) & "vbe"
Set oEncFile = oFSO.CreateTextFile(sFileOut)
oEncFile.Write sDest
oEncFile.Close
Next
假设保存的文件名为encode.vbs。保存在D:\
利用上面的vbs脚本程序为自己的vbs脚本加密。
假设要加密的vbs脚本文件为c:\test.vbs。
在CMD窗口中运行下面的命令。
cscript d:\encode.vbs c:\test.vbs
结果,会在c:\下生成一个名为test.vbe的新文件。就是加密后的脚本文件。
另一种方法是,用鼠标左键拖拽c:\test.vbs文件到d:\encode.vbs上,同样会在本加密文件test.vbs所在目录下生成一个同名的vbe文件。
加密前:
加密:
加密后:
版权声明:本文标题:将VBS脚本编译成加密版本的VBE脚本 内容由热心网友自发贡献,该文观点仅代表作者本人, 转载请联系作者并注明出处:https://www.elefans.com/xitong/1729296123a1194739.html, 本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌抄袭侵权/违法违规的内容,一经查实,本站将立刻删除。
发表评论