Convert Batch Script To Auto-it Gui

[mastrboy]

-

Edited May 2, 2017 by mastrboy

[ptrex]

If you would translate the local sentences into English, you might get faster help.

Not Everyone speaks Swedish or Danish, ...

Just a tip !!

[Zedna]

I don't understand exactly this batch file, but here is something to beginning

#include <GUIConstants.au3>
#Include <File.au3>

$Form1 = GUICreate("AForm1", 622, 441, 192, 125)
$Edit1 = GUICtrlCreateEdit("", 50, 42, 485, 333, -1, $WS_EX_CLIENTEDGE)
$btn1 = GUICtrlCreateButton("Action",250,400,100)
GUISetState(@SW_SHOW)

While 1
    $msg = GuiGetMsg()
    Select
        Case $msg = $GUI_EVENT_CLOSE
            ExitLoop
        Case $msg = $btn1
            Action("C:\hummingbird\cache\")
    EndSelect
WEnd

Func Action($dir_name)
    $FileList=_FileListToArray($dir_name,"*.*",1)
    If @Error Then Return
    
    For $i = 1 to UBound($FileList) - 1
        $file_name = $FileList[$i]
        GUICtrlSetData ($Edit1, $file_name & @CRLF,1)
        FileDelete($dir_name & $file_name)
    Next

    DirRemove($dir_name,1)
    GUICtrlSetData ($Edit1, @CRLF & $dir_name & " deleted.",1)
EndFunc

Be carefull when using FileDelete(), DirRemove() ...

Edited May 16, 2006 by Zedna

[mastrboy]

thanks i'll check it out

[gseller]

WOW.. Sorry for awakening an old post but just wanted to tell Zedna what a cool script that is. It helps me understand the workings behind the gui a little better.

Thanks a bunch.

[Zedna]

WOW.. Sorry for awakening an old post but just wanted to tell Zedna what a cool script that is. It helps me understand the workings behind the gui a little better.

Thanks a bunch.

Hi gesller

I hear your appreciation

I'm pleased to help somebody to give a right direction

Happy scripting in AutoIt