admin管理员组

文章数量:1639678

将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文件。

加密前：

加密：
加密后：

本文标签： 脚本版本编译成vbsVBE

版权声明：本文标题：将VBS脚本编译成加密版本的VBE脚本 内容由热心网友自发贡献，该文观点仅代表作者本人， 转载请联系作者并注明出处：https://m.elefans.com/xitong/1729296123a1194739.html， 本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。如发现本站有涉嫌抄袭侵权/违法违规的内容，一经查实，本站将立刻删除。