jimbob Posted July 1, 2009 Share Posted July 1, 2009 Hi, I'm new to AutoIT and scripting in general. I'm writing a script to copy several directories from a local drive to a network drive using DirCopy. I'd like a progress bar to show that progress is being made. It doesn't have to be accurate, just a reminder to the user that something is being done. I tried creating a loop to print "." to command line every couple seconds but it failed. Any assistance is appreciated. Link to comment Share on other sites More sharing options...
MrCreatoR Posted July 1, 2009 Share Posted July 1, 2009 Hi and wellcome to the forum!Many questions that you have probably have their answers here on the forum, you just need to use search. Spoiler Using OS: Win 7 Professional, Using AutoIt Ver(s): 3.3.6.1 / 3.3.8.1 AutoIt Russian Community My Work... Spoiler Projects: ATT - Application Translate Tool {new}| BlockIt - Block files & folders {new}| SIP - Selected Image Preview {new}| SISCABMAN - SciTE Abbreviations Manager {new}| AutoIt Path Switcher | AutoIt Menu for Opera! | YouTube Download Center! | Desktop Icons Restorator | Math Tasks | KeyBoard & Mouse Cleaner | CaptureIt - Capture Images Utility | CheckFileSize ProgramUDFs: OnAutoItErrorRegister - Handle AutoIt critical errors {new}| AutoIt Syntax Highlight {new}| Opera Library! | Winamp Library | GetFolderToMenu | Custom_InputBox()! | _FileRun UDF | _CheckInput() UDF | _GUIInputSetOnlyNumbers() UDF | _FileGetValidName() UDF | _GUICtrlCreateRadioCBox UDF | _GuiCreateGrid() | _PathSplitByRegExp() | _GUICtrlListView_MoveItems - UDF | GUICtrlSetOnHover_UDF! | _ControlTab UDF! | _MouseSetOnEvent() UDF! | _ProcessListEx - UDF | GUICtrl_SetResizing - UDF! | Mod. for _IniString UDFs | _StringStripChars UDF | _ColorIsDarkShade UDF | _ColorConvertValue UDF | _GUICtrlTab_CoverBackground | CUI_App_UDF | _IncludeScripts UDF | _AutoIt3ExecuteCode | _DragList UDF | Mod. for _ListView_Progress | _ListView_SysLink | _GenerateRandomNumbers | _BlockInputEx | _IsPressedEx | OnAutoItExit Handler | _GUICtrlCreateTFLabel UDF | WinControlSetEvent UDF | Mod. for _DirGetSizeEx UDF Examples: ScreenSaver Demo - Matrix included | Gui Drag Without pause the script | _WinAttach()! | Turn Off/On Monitor | ComboBox Handler Example | Mod. for "Thinking Box" | Cool "About" Box | TasksBar Imitation Demo Like the Projects/UDFs/Examples? Please rate the topic (up-right corner of the post header: Rating ) * === My topics === * ================================================== ================================================== AutoIt is simple, subtle, elegant. © AutoIt Team Link to comment Share on other sites More sharing options...
jimbob Posted July 1, 2009 Author Share Posted July 1, 2009 Thanks for the response. If I had found a working solution I would not of asked the question Link to comment Share on other sites More sharing options...
z0mgItsJohn Posted July 1, 2009 Share Posted July 1, 2009 Well since I was board.. I decided to basically re-write the "DirCopy" function so that you could actually get a "Current Progress.." so here's the script.. Source : #Include <File.Au3> Global $New_Drive = 'New'; Dest. drive. Global $Old_Drive = 'C:\Users\John\Shared'; Source drive. ; Check for errors.. If FileExists ($Old_Drive) = '0' Then Exit ConsoleWrite ('Error : "$Old_Drive" dose not exist.' & @CRLF) If FileExists ($New_Drive) = '0' Then DirCreate ($New_Drive) Global $Old_Size = DirGetSize ($Old_Drive) If $Old_Size = '0' Then Exit ConsoleWrite ('Error : "$Old_Drive" has a size of 0.') ; List all files in "$Old_Drive" $List = _FileListToArray ($Old_Drive, '*','1') ; Copy all files from "$Old_Drive" to "$New_Drive" If $List['0'] <> '0' Then For $A = '1' To $List['0'] FileCopy ($Old_Drive & '\' & $List[$A], $New_Drive & '\' & $List[$A], '1') ConsoleWrite ('Progress : ' & _GetProgress () & @CRLF) Next EndIf ; List all folders in "$Old_Drive" $List = _FileListToArray ($Old_Drive, '*','2') ; Copy all folders from "$Old_Drive" to "$New_Drive" If $List['0'] <> '0' Then For $A = '1' To $List['0'] DirCopy ($Old_Drive & '\' & $List[$A], $New_Drive & '\' & $List[$A], '1') ConsoleWrite ('Progress : ' & _GetProgress () & @CRLF) Next EndIf Func _GetProgress () Return Round ((DirGetSize ($New_Drive) / $Old_Size) * '100', '0') EndFunc Hope this helps~! Oh yeah next time.. please include your script.., also I didn't add a GUI.. or anything.. if you need help making a GUI with a progress bar then ill help xD >< - John Latest Projects :- New & Improved TCP Chat Link to comment Share on other sites More sharing options...
MrCreatoR Posted July 1, 2009 Share Posted July 1, 2009 Thanks for the response.If I had found a working solution I would not of asked the question I gave you the link with search results - You should find the answer in these threads. Spoiler Using OS: Win 7 Professional, Using AutoIt Ver(s): 3.3.6.1 / 3.3.8.1 AutoIt Russian Community My Work... Spoiler Projects: ATT - Application Translate Tool {new}| BlockIt - Block files & folders {new}| SIP - Selected Image Preview {new}| SISCABMAN - SciTE Abbreviations Manager {new}| AutoIt Path Switcher | AutoIt Menu for Opera! | YouTube Download Center! | Desktop Icons Restorator | Math Tasks | KeyBoard & Mouse Cleaner | CaptureIt - Capture Images Utility | CheckFileSize ProgramUDFs: OnAutoItErrorRegister - Handle AutoIt critical errors {new}| AutoIt Syntax Highlight {new}| Opera Library! | Winamp Library | GetFolderToMenu | Custom_InputBox()! | _FileRun UDF | _CheckInput() UDF | _GUIInputSetOnlyNumbers() UDF | _FileGetValidName() UDF | _GUICtrlCreateRadioCBox UDF | _GuiCreateGrid() | _PathSplitByRegExp() | _GUICtrlListView_MoveItems - UDF | GUICtrlSetOnHover_UDF! | _ControlTab UDF! | _MouseSetOnEvent() UDF! | _ProcessListEx - UDF | GUICtrl_SetResizing - UDF! | Mod. for _IniString UDFs | _StringStripChars UDF | _ColorIsDarkShade UDF | _ColorConvertValue UDF | _GUICtrlTab_CoverBackground | CUI_App_UDF | _IncludeScripts UDF | _AutoIt3ExecuteCode | _DragList UDF | Mod. for _ListView_Progress | _ListView_SysLink | _GenerateRandomNumbers | _BlockInputEx | _IsPressedEx | OnAutoItExit Handler | _GUICtrlCreateTFLabel UDF | WinControlSetEvent UDF | Mod. for _DirGetSizeEx UDF Examples: ScreenSaver Demo - Matrix included | Gui Drag Without pause the script | _WinAttach()! | Turn Off/On Monitor | ComboBox Handler Example | Mod. for "Thinking Box" | Cool "About" Box | TasksBar Imitation Demo Like the Projects/UDFs/Examples? Please rate the topic (up-right corner of the post header: Rating ) * === My topics === * ================================================== ================================================== AutoIt is simple, subtle, elegant. © AutoIt Team Link to comment Share on other sites More sharing options...
jimbob Posted July 2, 2009 Author Share Posted July 2, 2009 Many thanks guys. 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