Invoke Windows Explorer copying progress bar/ or flash messages 1

[mb22]

While running the SHELL to copy a large file using DOS xcopy, .... how can I flash a message to the user ..say
"File copy in progress..."

or also how can I invoke the Windows Explorer copying window with the its progrees bar when copying?

 

[Hypetia]

Use SHFileOperation API for copying files.
___
Private Declare Function SHFileOperation Lib "shell32.dll" Alias "SHFileOperationA" (lpFileOp As SHFILEOPSTRUCT) As Long
Private Type SHFILEOPSTRUCT
hwnd As Long
wFunc As Long
pFrom As String
pTo As String
fFlags As Integer
fAnyOperationsAborted As Long
hNameMappings As Long
lpszProgressTitle As String
End Type
Private Const FO_COPY = &H2

Private Sub CopyFile(ByVal src As String, ByVal dst As String)
Dim fos As SHFILEOPSTRUCT
fos.hwnd = hwnd
fos.pFrom = src
fos.pTo = dst
fos.wFunc = FO_COPY
SHFileOperation fos
End Sub

Private Sub Form_Load()
CopyFile "C:\Data\db1.mdb", "D:\Backup\db2.mdb"
End Sub

 

[mb22]

thank you very much.

 

[torturedmind]

hypetia, kindly explain your code. i think this is the one i need. thanx

kilroy

 

[Hypetia]

I think the code is very simple. When you copy the file using CopyFile procedure, it calls the SHFileOperation API for performing this task. Before calling this function it initializes the related structure SHFILEOPSTRUCT.
.hwnd member is the owner window which has to own the copy progress window.
.pFrom and .pTo specify the source and destination filename and,
.wFunc specifies the function to be performed, FO_COPY in this case.

SHFileOperation uses the internal copy method used by Windows and also shows the copy progress which is the main requirement in our case.

For more information,
See SHFileOperation function.

http://msdn.microsoft.com/library/d...shell/reference/functions/shfileoperation.asp

and SHFILEOPSTRUCT structure.

http://msdn.microsoft.com/library/d...shell/reference/structures/shfileopstruct.asp

 

[torturedmind]

will this copy only the NEWER files into the target directory?

kilroy

 

[Hypetia]

No it will try to copy all files to the target directory. If an older file already exist, it will ask you to overwrite as Windows does.

However, you may bypass this overwrite confirmation by specifying the NOCONFIRMATION flag in the .fFlags member of SHFILEOPSTRUCT structure.
This supresses any confirmations and overwrites existing older files, if there are any.

The NOCONFIRMATION flag is declared as:

Const FOF_NOCONFIRMATION = &H10

 

[torturedmind]

this means i can't use this to copy newer files (sadly). any alternative to achieve this goal? thanx


kilroy