Backing-Up Code

[Rewl]

My code isn't working, syntax is correct but when ever I run it to test it, it doesn't work.

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
HotKeySet("{ESC}" , "close")
#Region ### START Koda GUI section ### Form=
Global $Form1 = GUICreate("Back-Up by Rewl", 393, 288, 192, 124)
Global $Button1 = GUICtrlCreateButton("Backup to H:/", 120, 16, 131, 57, $WS_GROUP)
Global $Checkbox1 = GUICtrlCreateCheckbox("Favorites", 16, 96, 97, 17)
Global $Checkbox2 = GUICtrlCreateCheckbox("Desktop", 16, 120, 97, 17)
Global $Checkbox3 = GUICtrlCreateCheckbox("Music", 16, 144, 97, 17)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

Do
    $msg = GUIGetMsg()
    If $msg = $Button1 Then
        DirCreate("H:\Back Up")
        If GUICtrlRead($Checkbox1) = $GUI_CHECKED Then ConsoleWrite ( "DirCopy Favorites " & @Crlf )
        If GUICtrlRead($Checkbox2) = $GUI_CHECKED Then ConsoleWrite ( "DirCopy Desktop " & @CRLF )
        If GUICtrlRead($Checkbox3) = $GUI_CHECKED Then ConsoleWrite ( "DirCopy Music " & @Crlf )
        MsgBox(0 , "Back-Up Complete" , "Your files have been backed up.")
    EndIf
Until $msg = $GUI_EVENT_CLOSE

Func close()
    MsgBox(0, "Back-Up by Rewl" , "Thank you for using Back-Up by Rewl")
    Exit
    EndFunc

[water]

What do you mean by "doesn't work."?

I tested the code and it does what it is supposed to do: Write Text to the Console or to a MsgBox.

[Spiff59]

It seems to do just what it ought to...

It displays messages on the console, depending on which boxes are checked.

Wherein lies the problem?

[Rewl]

it doesn't back up the files when you press backup

[water]

It can't do any backups because there is no backup code in your script. It only creates a directory.

I think you should remove the ConsoleWrite statements and replace them with Dircopy commands.

Edited November 19, 2010 by water

[Rewl]

So what code would be used to make it "compile" and than be moved