Copyfolder

[Alvin Hansen]

Hi!
I use copyfolder in filesystemobject its working allright i'm happy
but if i copy a folder from a cd. the attribute on the folder gets to
read only and then i can't use copy folder next time, because i don't have
the permission to do this. Is there a way with the caommand copyfolder where
i can set the folder to bee read and write ??

Regards alvin

 

[Tom Ogilvy]

use something like

SetAttr "C:\MyFolder\*.*", vbNormal

 

[Alvin Hansen]

Hi
Tom i hav try but get an error
"BAd file name or number" my code is:
SetAttr "c:\" & tt & tal & kur1 & "\*.*", vbNormal

Before you write i try this
Set f = fso.GetFolder(fso.GetFolder("c:\" & tt & tal & kur1))
f.Attributes = 0
Set fs = fso.GetFile(fso.GetFile("c:\" & tt & tal & kur1 & "\*.*"))
fs.Attributes = 0

Well its working if i instead of *.* write filename.xls. but thats not good
for i dont know the file name nomally.


Reagrds alvin

"Tom Ogilvy" skrev:

 

[Alvin Hansen]

Me again
this working
SetAttr "c:\" & tt & tal & kur1 & "\valutatabel.xls", vbNormal
but this not working
SetAttr "c:\" & tt & tal & kur1 & "\*.*", vbNormal


regards alvin

"Tom Ogilvy" skrev:

 

[Tom Ogilvy]

then I guess you will need to loop through your list of files. I many of
these accept wildcards, just like the DOS equivalent. I haven't tested it.