Copia cartelle in rete

[carvan]

ho provato ad usare, all'interno di MSAccess, copyfolder per copiare cartelle tra workstations della LAN del mio reparto ma non funziona.

questo e' il codice usato:

sub command1_click

dim fs

set fs=createobject("scripting.FileSystemObject")

orig="\\holter\holterpack" ' denominazione della cartella condivisa sulla workstation "holter"

dest="c:\windows\desktop\work" ' destinazione sulla workstation da cui viene lanciato il programma


fs.copyfolder orig, dest

end sub



qualche suggerimento ???