如何使用VBS创建exe文件

Question

如何使用VBS制作可执行文件。有一个txt的代码，但如何从这个exe更改它

    Dim objFSO 
Set objFSO = CreateObject("Scripting.FileSystemObject")

Const Append = 8 
Dim FDir
FDir = ("Area where file will be saved") 
Const FName_Ext = "Title of document.txt"
Dim Final 
Final = FDir + FName_Ext

Dim objtxt 
set objtxt = objFSO.CreateTextFile(Final, True)
Set objtxt = Nothing

Dim FWrite 
Set FWrite = objFSO.OpenTextFile(Final, Append)

FWrite.WriteLine("this is the text in the file.!!! hahaha lol wohoo yada yada yada. okay done!")  
FWrite.Close()
Set FWrite = Nothing
Set objFSO = Nothing

Answer 1

熟悉PE Headers。简而言之，这是一个很多二进制数据，告诉窗口何时开始执行文件。虽然vbs不是为二进制魔术设计的，但如果你已经将二进制数据保存到变量中，那么简单的文本方式就可以了，至少根据this microsoft doc。