Jump to content
Sign in to follow this  

Batch Compiler

Recommended Posts


Our SMS Admin was asking me for simple batch files compiled into exe's so I wrote a GUI to enter one line batch file commands and compile into an exe. I thought I saw something on the forum that does this or something similar, but we only needed something very basic.

We jump from one computer to another fairly often so being able to do this at a machine that already has AutoIT installed isn't always feasible. I packed the necessary AutoIT files into the exe so he can run the BatchCompiler GUI anywhere, type in a 1 line batch command and compile even when AutoIT is not installed.

See the "_CreateDirs()" function at the bottom of the script so you can put the files in place and set your paths.

Any improvements\suggestions are welcome.

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <EditConstants.au3>
#include <File.au3>

;   Script Author:    Steve Bradham  - stev379
;   Creation Date:    June 18, 2008
;   Script Function:  Create and compile a batch command into an exe
;   Function:         Compile a one line batch file command line into an exe
;   Instructions:     Type a script name Example TestCompiler.au3
;                     Enter a one line batch command exactly as you would for a batch file
;                     Click CompileEXE to compile your batch command into an executable.  The executable will be 
;                     placed in your script's directory
;   NOTES:            Add a fileinstall for the Aut2Exe folder and if statements to check for it. - Done
;   Requisites:       See the _CreateDirs() function at the bottom of the script for FileInstall requisites.
;                     You must have the directories and AutoIT files in place when you compiled the script.

Opt('MustDeclareVars', 1)

Dim $msg, $cmd, $cmd_RD
Dim $btn_RUNtest, $btn_CompileBAT, $btn_CompileEXE
Dim $File, $Filename, $filewrite, $filename_RD, $fileToCompile, $fileCompiled
Dim $LineCount, $dest
Dim $i
Dim $Scrapfile, $ScrapFileRD, $ScrapfileToRD
Dim $Edit, $Edit_RD
Global $Script
Global $Scriptname, $ScriptnameEXT


Func _CreateCompiledEXE()
    Local $msg
    GUICreate("Compile batch command into a .exe", 550, 500)
        GUICtrlCreateLabel("Enter a one line batch command to test your syntax", 20, 10, 250, 20)   
        $cmd = GUICtrlCreateInput("", 20, 30, 350, 20)
        GUICtrlCreateLabel("Enter Filename to create - You must use a .BAT extension to compile a BAT.", 20, 107, 400, 20)  
        GUICtrlCreateLabel("You must use a .AU3 extension to compile an EXE.", 138, 125, 400, 20)       
        $filename = GUICtrlCreateInput("", 20, 145, 350, 20)
        $btn_RUNtest = GUICtrlCreateButton("Run Test", 30, 55)
        $btn_CompileBAT = GUICtrlCreateButton("CompileBAT", 30, 175)
        $btn_CompileEXE = GUICtrlCreateButton("CompileEXE", 105, 175)       
        GUICtrlCreateLabel("Enter text exactly as you would for a batch file", 20, 225, 250, 20)
        $Edit = GUICtrlCreateEdit("", 20, 250, 500, 230)        

    While 1
        $msg = GUIGetMsg()
        If $msg = $GUI_EVENT_CLOSE Then ExitLoop

            Case $msg = $GUI_EVENT_CLOSE
            Case $msg = $btn_RUNtest
                $cmd_RD = GUICtrlRead($cmd)
                Run(@ComSpec & " /c " & $cmd_RD)                
            Case $msg = $btn_CompileBAT
                $Edit_RD = GUICtrlRead($edit)
                $filename_RD = GUICtrlRead($filename)
                If Not _FileCreate($filename_RD) Then MsgBox(4096, "Error", @error)             
                $filewrite = FileOpen($filename_RD, 1)  
                FileWrite($filewrite, $edit_RD)             
            Case $msg = $btn_CompileEXE                             
                $Edit_RD = GUICtrlRead($Edit)
                $Scrapfile = "Scrapfile.txt"
                If Not _FileCreate($Scrapfile) Then MsgBox(4096, "Error", @error)               
                $filewrite = FileOpen($Scrapfile, 1)                    
                FileWrite($filewrite, $Edit_RD)             
                $filename_RD = GUICtrlRead($filename)
                If Not _Filecreate($filename_RD) Then MsgBox(4096, "Error", @error)
                $LineCount = _FileCountLines($Scrapfile)                
                $ScrapfileToRD = FileOpen($Scrapfile, 0)
                $fileToCompile = FileOpen($filename_RD, 1)              
                FileWriteLine($fileToCompile, '#NoTrayIcon')
                For $i = 1 to $LineCount
                    $ScrapFileRD = FileReadLine($ScrapfileToRD, $i)
                    FileWriteLine($fileToCompile, 'Run(@comspec & '' /c ' & $ScrapFileRD & ''','''','''')')
EndFunc   ;_CreateRUN


Func _Compile($Scriptname)
    Run("C:\Scripts\Aut2Exe\Aut2Exe.exe /in " & @ScriptDir & "\" & $Scriptname & ".au3 /out " & _
    @ScriptDir & "\" & $Scriptname & ".exe /icon C:\Scripts\Aut2Exe\Icons\SETUP03.ICO")
EndFunc ;_Compile

Func _RemoveExtension($ScriptnameEXT)
    $Scriptname = stringleft($ScriptnameEXT, stringlen($ScriptnameEXT)-4)
    Return $Scriptname
EndFunc ;_RemoveExtension

Func _CreateDirs()
    If Not FileExists ("C:\Scripts\Aut2Exe") Then
        FileInstall([ENTER YOUR SCRIPT DIRECTORY HERE]\Aut2exe.exe", "C:\Scripts\Aut2Exe\Aut2exe.exe")
        FileInstall([ENTER YOUR SCRIPT DIRECTORY HERE]\Aut2exe_x64.exe", "C:\Scripts\Aut2Exe\Aut2exe_x64.exe")
        FileInstall([ENTER YOUR SCRIPT DIRECTORY HERE]\Aut2exeA.exe", "C:\Scripts\Aut2Exe\Aut2exeA.exe")
        FileInstall([ENTER YOUR SCRIPT DIRECTORY HERE]\AutoItASC.bin", "C:\Scripts\Aut2Exe\AutoItASC.bin")
        FileInstall([ENTER YOUR SCRIPT DIRECTORY HERE]\AutoItSC.bin", "C:\Scripts\Aut2Exe\AutoItSC.bin")
        FileInstall([ENTER YOUR SCRIPT DIRECTORY HERE]\AutoItSC_x64.bin", "C:\Scripts\Aut2Exe\AutoItSC_x64.bin")
        FileInstall([ENTER YOUR SCRIPT DIRECTORY HERE]\upx.exe", "C:\Scripts\Aut2Exe\upx.exe")
        FileInstall([ENTER YOUR SCRIPT DIRECTORY HERE]\Icons\Setup03.ico", "C:\Scripts\Aut2Exe\Icons\Setup03.ico")
EndFunc  ;_CreateDirs


Share this post

Link to post
Share on other sites


Why specifically for one line batch scripts? Why not add support for multi-line batch scripts?

Share this post

Link to post
Share on other sites

There's a neat program called Quick Batch File Compiler that you could use. Unfortunately, it's a pay-for program. But at least there's not a big memory overhead. Although, I'm not sure what overhead a CUI version of a compiled AutoIT program uses. And I think that actually would make more sense for your compiled exe's to be Console applications (compiling with the /console switch I believe)

Share this post

Link to post
Share on other sites

Hi guys

few days ago i was searching for the same solution.i found this amazing software Batch Compiler Its is more of an IDE for batch files.It has everything we need to develop a batch exe. best part is that is has a debugger to check syntax for errors.

hope this helps!

Share this post

Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
Sign in to follow this