Dim filesys Set filesys = CreateObject("Scripting.FileSystemObject")If filesys.FileExists("c:\sourcefolder\anyfile.html") Then filesys.CopyFile Application.BasicFunctions.GetAttachmentPath & attachmentfile, "C:\DestFolder\"End If