View Single Post
  #3   Report Post  
Posted to microsoft.public.excel.programming
Steve Garman Steve Garman is offline
external usenet poster
 
Posts: 107
Default FileCopy and read-only

Sub test()
Dim src$, dst$
src$ = "c:\test.txt"
dst$ = "c:\test1.txt"
If GetAttr(dst$) And vbReadOnly Then
SetAttr dst$, vbNormal
End If
FileCopy src$, dst$
End Sub


Dkline wrote:
I'm using FileCopy to copy a number of files off the servers onto my C:
drive. Everything works fine except for the one file that is read-only. Any
way to persuade FileCopy to copy over that file even if it is a read-only?