Hem / Tips & tricks
Private Sub Command1_Click() x.pFrom = "c:\*.txt" x.pTo = "c:\temp" x.fFlags = FOF_NOCONFIRMATION x.wFunc = FO_COPY SHFileOperation xEnd Sub