Re: CopyFile Method problem

From: Ken Snell [MVP] (kthsneisllis9_at_ncoomcastt.renaetl)
Date: 08/24/04


Date: Tue, 24 Aug 2004 11:02:57 -0400

I would use this code snippet instead:

Dim strFile As String
strFile = Dir("D:\Data\Database\Reviews\*.doc")
Do While strFile <> ""
    FileCopy "D:\Data\Database\Reviews\" & strFile, _
        "D:\Data\Database\Reviews\Archive\" & strFile
    strFile = Dir()
Loop

-- 
        Ken Snell
<MS ACCESS MVP>
"Tim" <anonymous@discussions.microsoft.com> wrote in message
news:c05601c489e3$3cdfadd0$a501280a@phx.gbl...
> I am trying to write code within access which will
> transfer a variable number of word documents into an
> archive folder.  After looking at the help file I am using
> the following code, but it doesn't work.  Ay ideas?
>
> FileSystemObject.CopyFile "D:\Data\Database\Reviews\*.doc",
>  "D:\Data\Database\Reviews\Archive\"
>


Relevant Pages