Function CopyUser()

   dim $serverPath,$localPath
   $serverPath = 'C:\data\Share\' + $User.text 
   $localPath = 'c:\data\User\'
   If exist($serverPath)
      Copy $serverPath + '\*.*' $localPath /c /h /r /s
   EndIf

EndFunction

GUICopy("insert source here", "insert destination here")

  Function CopyUser()

   dim $serverPath,$localPath
   $serverPath = 'F:\Share\' + $User.text 
   $localPath = 'c:\data\User\'
   If exist($serverPath)
      GUIcopy($serverPath + '\*.*', $localPath)
   EndIf

EndFunction

Quote:

---

....
Apologies for my stupidity
....

---

Quote:

---

....
I have tested the copy with my original code with the large files and I do not get a progress bar with it.
....

---