>#DEFINE FOF_CREATEPROGRESSDLG 0 > >cParentFolder = "c:\Archive" >objShell = CreateObject("Shell.Application") >objFolder = objShell.NameSpace(cParentFolder) >objFolder.CopyHere("C:\Folder", FOF_CREATEPROGRESSDLG) >* or >objFolder.CopyHere("C:\Folder" ) > >>
>>>#DEFINE FOF_CREATEPROGRESSDLG = 0 >>> >>>cParentFolder = "c:\Archive" >>>objShell = CreateObject("Shell.Application") >>>objFolder = objShell.NameSpace(cParentFolder) >>>objFolder.CopyHere("C:\Folder", FOF_CREATEPROGRESSDLG) >>>>>>