Get Time it took to copy a File

[ayu_2403]

I want to copy a file from source to target and then note the time it took. But WinWaitClose function does not returns even if the copy is completed. What should i do

#Include <WinAPIEx.au3>
_WinAPI_ShellOpenFolderAndSelectItems('C:\Users\opc\Desktop\src\10GB_1.bin')
Send("^c")
WinClose("src")
_WinAPI_ShellOpenFolderAndSelectItems('C:\Users\opc\Desktop\target')
Send("{ENTER}")
WinWaitActive("target","", 10)
Send("^v")
Local $sTitle =  WinGetTitle("[CLASS:OperationStatusWindow]")
ConsoleWrite($sTitle)
Local $hTimer = TimerInit()
WinWaitClose("[CLASS:OperationStatusWindow]")
Local $fDiffInSec = TimerDiff($hTimer)/1000 ;
ConsoleWrite($fDiffInSec&@CRLF)
WinClose("target")

 

[water]

I would use the AutoIt commands FileCopy, TimerInit and TimerDiff.
Any reason you are using this quite complex approach?

[ayu_2403]

2 hours ago, water said:

I would use the AutoIt commands FileCopy, TimerInit and TimerDiff.
Any reason you are using this quite complex approach?

I am using this approach because i have to make it user interactive. I have to show the user progress of copying file as shown by the Window that opens when you copy a file

[jguinch]

Here is one way : 

Local $hTimer = TimerInit()

Local $sSource = "C:\Users\opc\Desktop\src\10GB_1.bin"
Local $sDestination = "C:\Users\opc\Desktop\target\"
_FileCopy($sSource, $sDestination)

Local $fDiffInSec = TimerDiff($hTimer)/1000


Func _FileCopy($src, $dest)
    Local $oShell = ObjCreate("shell.application")
    $oShell.namespace($dest).CopyHere($src,256)
EndFunc

 

[Skeletor]

Here is one with a progress bar:
 

#include <GUIConstantsEx.au3>
#include <FileConstants.au3>

Global $sourceFilePath = "C:\Temp\test.jar"
Global $destinationFilePath = "C:\Temp\New folder\test_copy.jar"

Example()

Func Example()
    Local $hGUI, $hProgress, $hLabel, $fDiffInSec

    ; Create the GUI window
    $hGUI = GUICreate("File Copy Progress", 300, 120)
    $hProgress = GUICtrlCreateProgress(10, 10, 280, 20)
    $hLabel = GUICtrlCreateLabel("", 10, 40, 280, 20)
    GUISetState(@SW_SHOW, $hGUI)

    ; Perform the file copy
    Local $hTimer = TimerInit()
    If Not FileExists($destinationFilePath) Then
    FileCopy($sourceFilePath, $destinationFilePath, $FC_OVERWRITE)
    $fDiffInSec = TimerDiff($hTimer) / 1000
    Else
    MsgBox(-1,"Replace","Replace the file?")
    EndIf
    ; Update progress bar and message bar
    GUICtrlSetData($hProgress, 100)
    GUICtrlSetData($hLabel, "File copy completed in " & $fDiffInSec & " seconds.")

    ; Wait for the user to close the GUI window
    While 1
        If GUIGetMsg() = $GUI_EVENT_CLOSE Then ExitLoop
    WEnd

    GUIDelete($hGUI)
EndFunc

 

[ioa747]

2 hours ago, ayu_2403 said:

But WinWaitClose function does not returns even if the copy is completed

probably because the window is open, and the script is waiting to be closed

#Include <WinAPIEx.au3>

ConsoleWrite("WinExists=" & WinExists("[CLASS:OperationStatusWindow]") & @CRLF)

_WinAPI_ShellOpenFolderAndSelectItems(@DesktopDir & '\src\10GB_1.bin')
Send("^c")
WinClose("src")
_WinAPI_ShellOpenFolderAndSelectItems(@DesktopDir & '\target')
Send("{ENTER}")

$htarget = WinWaitActive("target","", 10)

Send("^v")
Local $sTitle =  WinGetTitle($htarget)
ConsoleWrite($sTitle & @CRLF)
Local $hTimer = TimerInit()

While Not FileExists(@DesktopDir & '\target\10GB_1.bin')
    Sleep(100)
WEnd

Local $fDiffInSec = TimerDiff($hTimer)/1000 ;
ConsoleWrite($fDiffInSec & @CRLF)
WinClose($htarget)

PS:
I agree  FileCopy is more accurate

[ayu_2403]

10 hours ago, ioa747 said:

probably because the window is open, and the script is waiting to be closed

#Include <WinAPIEx.au3>

ConsoleWrite("WinExists=" & WinExists("[CLASS:OperationStatusWindow]") & @CRLF)

_WinAPI_ShellOpenFolderAndSelectItems(@DesktopDir & '\src\10GB_1.bin')
Send("^c")
WinClose("src")
_WinAPI_ShellOpenFolderAndSelectItems(@DesktopDir & '\target')
Send("{ENTER}")

$htarget = WinWaitActive("target","", 10)

Send("^v")
Local $sTitle =  WinGetTitle($htarget)
ConsoleWrite($sTitle & @CRLF)
Local $hTimer = TimerInit()

While Not FileExists(@DesktopDir & '\target\10GB_1.bin')
    Sleep(100)
WEnd

Local $fDiffInSec = TimerDiff($hTimer)/1000 ;
ConsoleWrite($fDiffInSec & @CRLF)
WinClose($htarget)

PS:
I agree  FileCopy is more accurate

I cannot use FileCopy because i have to show opening of folder and selecting a file and then copying it and then opening of destination and then pasting it. Also can someone tell me an alternative of _WinAPI_ShellOpenFolderAndSelectItems for opening a folder and then selecting a file from it because i have to show it

[water]

43 minutes ago, ayu_2403 said:

Also can someone tell me an alternative of _WinAPI_ShellOpenFolderAndSelectItems for opening a folder and then selecting a file

Please have a look at FileOpenDialog.