7 posts in this topic
Strange progress behavior
Hope you're doing great.
Well, I'm writing a script that allows our Service Desk to clean several temp folder as a first diagnostic.
Indeed, the agent in charge of the issue will have to choose what to clean (web browsers temp folders, some windows one etc...)
I added a progress bar to see the current state of the script but if I select more than one checkbox, it seems that the counting is not done properly and is directly filled at 100% (when at leat 2 boxes are checked) and I don"t get the final message saying that all is done, especially for if the last box is checked.
But if I launch the process with only one checkbox checked,it's working...
I've enclosed the au3 files for you because posting them in this post would be... unreadable lol. So you can maybe do some tests as well.
I'm pretty sure the code can be optimized (a lot ) and that there is a much better way to achieve what I want the script to be.
Maybe can someone can give me a hand over here.
Thanks in advance.
To delete folders and files with progress bar
The below script is used by me before for copying files/folders with progress bar(windows default progress bar).
I found similar option for moving by using same object.
But not able to find for delete.
dml.vbs (This is a vbscript one and I am posting in this forum because autoit is made on top of vbscript and it might have similar functions.)
So, I checked in AutoIT forums and found below script files and which I have been modified for my requirement.
In those below I found delete2.au3 is working fine but hanging during deletion of huge memory files/folders.
Please try to provide a solution.
Question IE and Progress
Question 1: How to attach an IE Download to a Progressbar?
Question 2: How to make an IE Download like a streaming Download(download can be paused and continued every time)?
Question 3: How to do it with my UDF like Code :o?
Question 4: How to do add a Label which shows the released time?
Question 5: How to show how long it takes also the Connection Speed?
Question 6: How to get the Connection Speed to a Server?
#include-once #include <MsgBoxConstants.au3> ; #FUNCTION# ==================================================================================================================== ; Name ..........: _Patch ; Description ...: Easy Patch System(unzipping currently not included) ; I could need a bit help for this code ^-^. ; Syntax ........: _Patch($DownloadURL, $DownloadPath) ; Parameters ....: $DownloadURL - URL for the Download. ; $DownloadPath - Where the download file will be installed. ; $Title - Project Name Will be displayed in the MsgBox. ; Return values .: None ; Author ........: RaiNote ; Modified ......: ; Remarks .......: ; Related .......: ; Link ..........: ; Example .......: No ; ===============================================================================================================================Func _Patch($DownloadURL,$DownloadPath) Func _Patch($DownloadURL,$DownloadPath,$Title = "Title") $Byte = InetGetSize($DownloadURL,0);Download Size If $Byte > 1024 Then $Kilobyte = $Byte / 1024;Converting Byte to Kilobytes If $Kilobyte > 1024 Then $Megabyte = $Kilobyte / 1024;Converting Kilobyte to Megabyte If $Megabyte > 1024 Then $Gigabyte = $Megabyte / 1024;Converting Megabyte to Gigabyte If $Gigabyte > 1024 Then $Terabyte = $Gigabyte / 1024;Converting Gigabyte to Terabyte If $Terabyte > 1024 Then $Petabyte = $Terabyte / 1024;Converting Terabyte to Petabyte If $Petabyte > 1024 Then $Exabyte = $Petabyte / 1024;Converting Petabyte to Exabyte $_PATCH_SIZE1 = Round($Exabyte,2) & " EB" ElseIf $Petabyte < 1024 Then $Petabyte = $Terabyte / 1024 $_PATCH_SIZE1 = Round($Petabyte,2) & " PB" EndIf ElseIf $Terabyte < 1024 Then $Terabyte = $Gigabyte / 1024 $_PATCH_SIZE1 = Round($Terabyte,2) & " TB" EndIf ElseIf $Gigabyte < 1024 Then $Gigabyte = $Megabyte / 1024 $_PATCH_SIZE1 = Round($Gigabyte,2) & " GB" EndIf ElseIf $Megabyte < 1024 Then $Megabyte = $Kilobyte / 1024 $_PATCH_SIZE1 = Round($Megabyte,2) & " MB" EndIf ElseIf $Kilobyte < 1024 Then $Kilobyte = $Byte / 1024 $_PATCH_SIZE1 = Round($Kilobyte,2) & " KB" EndIf ElseIf $Byte < 1024 Then $_PATCH_SIZE1 = $Byte & " Bytes" EndIf $_PATCH_INFO = MsgBox(52,$Title,$Title & "needs to be patched. If u want to patch continue" & @CRLF & " if not it will close automaticly.(Size :" & " " & $_PATCH_SIZE1 & ")",0) switch $_PATCH_INFO case 6 ;YES $_Patch_Download = InetGet($DownloadURL,$DownloadPath,0,0) case 7 ;NO Exit endswitch EndFuncThx for this
I hope someone could help me :3 also how is this UDF with the FileSizeSystem
P.S.: Also a cat can get shy.
GDI+ animated loading screens build 2014-06-20 (32 examples)
mesale0077 asked me whether I could code some CSS loading animations from different web sites.
These are the results using GDI+ (AutoIt v184.108.40.206+ required!):
_GDIPlus_MonochromaticBlinker.au3 / _GDIPlus_RotatingBokeh.au3
_GDIPlus_SpinningCandy.au3 / _GDIPlus_SteamPunkLoading.au3
_GDIPlus_IncreasingBalls.au3 / _GDIPlus_PacmanProgressbar.au3
_GDIPlus_StripProgressbar.au3 / _GDIPlus_RingProgressbar.au3
_GDIPlus_LineProgressbar.au3 / _GDIPlus_SimpleLoadingAnim.au3
_GDIPlus_TextFillingWithWater.au3 / _GDIPlus_MultiColorLoader.au3
_GDIPlus_LoadingSpinner.au3 / _GDIPlus_SpinningAndPulsing.au3
_GDIPlus_TogglingSphere.au3 / _GDIPlus_CloudySpiral.au3
_GDIPlus_GlowingText.au3 (thanks to Eukalyptus) / _GDIPlus_HypnoticLoader.au3
_GDIPlus_RotatingRectangles.au3 / _GDIPlus_TRONSpinner.au3
_GDIPlus_RotatingBars.au3 / _GDIPlus_AnotherText.au3 (thanks to Eukalyptus)
_GDIPlus_CogWheels.au3 (thanks to Eukalyptus) / _GDIPlus_DrawingText.au3 (thanks to Eukalyptus)
_GDIPlus_GearsAnim.au3 / _GDIPlus_LEDAnim.au3
_GDIPlus_LoadingTextAnim.au3 / _GDIPlus_MovingRectangles.au3
_GDIPlus_SpinningAndGlowing.au3 (thanks to Eukalyptus) / _GDIPlus_YetAnotherLoadingAnim.au3
_GDIPlus_AnimatedTypeLoader.au3 / _GDIPlus_Carousel.au3
Each animation function has a built-in example how it can be used.
AiO download: GDI+ Animated Wait Loading Screens.7z (previous downloads: 1757)
Big thanks to Eukalyptus for providing several examples.
Maybe useful for some of you
PS: I don't understand CSS - everything is made out of my mind, so it might be different from original CSS examples
Sleep only progress
Is there some way to sleep only progress bar functionality, not whole program?
#include <ButtonConstants.au3> #include <GUIConstantsEx.au3> #include <ProgressConstants.au3> #include <WindowsConstants.au3> $Form1 = GUICreate("Form1", 421, 209, 243, 159) $close = GUICtrlCreateButton("Close", 153, 112, 119, 33) $Button1 = GUICtrlCreateButton("Run", 23, 112, 119, 33) $Progress1 = GUICtrlCreateProgress(88, 40, 257, 33) GUISetState(@SW_SHOW) While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE, $close Exit Case $Button1 For $i = 0 To 100 GUICtrlSetData($progress1, $i) Sleep(5) Next sleep(5000) GUICtrlSetData($progress1, 0) EndSwitch WEnd here I can not close the form, because sleep(5000) is still running