mastrboy Posted May 12, 2006 Share Posted May 12, 2006 (edited) - Edited May 2, 2017 by mastrboy - Link to comment Share on other sites More sharing options...
ptrex Posted May 16, 2006 Share Posted May 16, 2006 If you would translate the local sentences into English, you might get faster help. Not Everyone speaks Swedish or Danish, ... Just a tip !! Contributions :Firewall Log Analyzer for XP - Creating COM objects without a need of DLL's - UPnP support in AU3Crystal Reports Viewer - PDFCreator in AutoIT - Duplicate File FinderSQLite3 Database functionality - USB Monitoring - Reading Excel using SQLRun Au3 as a Windows Service - File Monitor - Embedded Flash PlayerDynamic Functions - Control Panel Applets - Digital Signing Code - Excel Grid In AutoIT - Constants for Special Folders in WindowsRead data from Any Windows Edit Control - SOAP and Web Services in AutoIT - Barcode Printing Using PS - AU3 on LightTD WebserverMS LogParser SQL Engine in AutoIT - ImageMagick Image Processing - Converter @ Dec - Hex - Bin -Email Address Encoder - MSI Editor - SNMP - MIB ProtocolFinancial Functions UDF - Set ACL Permissions - Syntax HighLighter for AU3ADOR.RecordSet approach - Real OCR - HTTP Disk - PDF Reader Personal Worldclock - MS Indexing Engine - Printing ControlsGuiListView - Navigation (break the 4000 Limit barrier) - Registration Free COM DLL Distribution - Update - WinRM SMART Analysis - COM Object Browser - Excel PivotTable Object - VLC Media Player - Windows LogOnOff Gui -Extract Data from Outlook to Word & Excel - Analyze Event ID 4226 - DotNet Compiler Wrapper - Powershell_COM - New Link to comment Share on other sites More sharing options...
Zedna Posted May 16, 2006 Share Posted May 16, 2006 (edited) 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 Resources UDF ResourcesEx UDF AutoIt Forum Search Link to comment Share on other sites More sharing options...
mastrboy Posted May 20, 2006 Author Share Posted May 20, 2006 thanks i'll check it out - Link to comment Share on other sites More sharing options...
gseller Posted April 23, 2007 Share Posted April 23, 2007 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. Link to comment Share on other sites More sharing options...
Zedna Posted April 23, 2007 Share Posted April 23, 2007 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 gesllerI hear your appreciation I'm pleased to help somebody to give a right directionHappy scripting in AutoIt Resources UDF ResourcesEx UDF AutoIt Forum Search Link to comment Share on other sites More sharing options...
Recommended Posts
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 accountSign in
Already have an account? Sign in here.
Sign In Now