Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

copiare tutto il contenuto di una cartella in un altra cartella

214 views
Skip to first unread message

tmtube

unread,
Nov 21, 2013, 10:13:57 AM11/21/13
to
qualcuno ha un esempio di codice vb per copiare tutto il contenuto di una
cartella in un altra cartella
(sottocartelle e file)

grazie.

buonanotte

unread,
Nov 21, 2013, 10:17:50 AM11/21/13
to
Ssn google

Set FS = CreateObject("Scripting.FileSystemObject")
FS.CopyFolder "C:\MiaCartella", "C:\CartellaTemporanea\"

puoi utilizzare anche "*" per poter indicare tutte le cartelle contenute in
una directory:

FileSystemObject.CopyFolder "c:\mieidocumenti\lettere\*",
"c:\cartellatemporanea\"





"tmtube" ha scritto nel messaggio
news:528e2338$0$1379$4faf...@reader1.news.tin.it...

vincepik@work

unread,
Nov 21, 2013, 10:22:47 AM11/21/13
to
VB.NET ?

http://it.letmegooglethatforyou.com/?q=vb.net+copy+folder+contents+to+another+folder

VB 6 ?

http://it.letmegooglethatforyou.com/?q=vb+6+copy+folder+contents+to+another+folder

(guarda l'esempio codeproject)

Ciao, Vincenzo

tmtube

unread,
Nov 21, 2013, 11:17:18 AM11/21/13
to

>Set FS = CreateObject("Scripting.FileSystemObject")
>FS.CopyFolder "C:\MiaCartella", "C:\CartellaTemporanea\"

>puoi utilizzare anche "*" per poter indicare tutte le cartelle contenute in
>una directory:

>FileSystemObject.CopyFolder "c:\mieidocumenti\lettere\*",
>"c:\cartellatemporanea\"

grazie, se volessi visualizzare una barra di avanzamento o un valore in
percentuale che incrementa mentre il processo di copia � in corso come
potrei fare?

qualche consiglio?

Beccoblu

unread,
Dec 15, 2013, 6:23:46 AM12/15/13
to
allora
se usi CopyFolder secondo me non gliela fai
dovresti copiare i file uno per uno

non ho sottomano VB, ma il codice non dovrebbe essere incasinato
conti il numero di elementi nella cartella
crei la barra di avanzamento
fai un paio di calcolini :-)
decidi ogni quanti file deve avanzare la barra
con un ciclo di qualunque tipo, inizi a copiare i file
enjoy :-)

--
"Anche quelli che sostengono che tutto � predeterminato guardano bene,
prima di attraversare la strada." -- Stephen Hawking

0 new messages