2013-01-03 87 views
-1

我想知道一種方法來讓我的.vbs文件到一個.exe文件。我可以製作一個.exe文件的.vbs文件嗎?

是否有可能?

代碼:

Option Explicit 

    Dim oShell : Set oShell = WScript.CreateObject ("WScript.Shell") 
    Dim FSO : set FSO = CreateObject("Scripting.FileSystemObject") 
    Dim StartTime,Elapsed 

    'msgBox(oShell.CurrentDirectory) 
    'MsgBox(FSO.GetFile(Wscript.ScriptFullName).ParentFolder) 
    oShell.CurrentDirectory = FSO.GetFile(Wscript.ScriptFullName).ParentFolder 

    StartTime = Timer 

    IF NOT oShell.run("ParentChildLinkFinal.vbs", 1, True) = 0 then Wscript.Quit 
    IF NOT oShell.run("Parent_Child_Merge_final.vbs", 1, True) = 0 then Wscript.Quit  

    Elapsed = Timer - StartTime 

    MsgBox("Total time taken to finish this task:" & Elapsed & "in Seconds") 

回答

1

你可以用這個工具 http://www.vbs2exe.com/

+0

我有一個困惑,那如果我讓.exe文件,然後將.vbs的納入到主文件實現它.vbs文件能夠代表它們準備好了嗎?所有內部的.vbs文件都適用於Excel自動化類型的任務。 – CodeLover

相關問題