[VB6] Copia di più file in una directory

[intel4ever]

salve a tutti
dopo aver appreso come copiare un file da una directory all'altra mi chiedevo come fosse possibile copiare più file insieme. ho provato con filecopy "C:\newcartella\*.*" "C:\*.*" ma non funzia VVoVe: .
Illuminatemi di nuovo GRAZIE

[MItaly]

Devi copiare un file per volta, FileCopy non è come il comando copy del prompt dei comandi...

[intel4ever]

posso farlo usando un altro tipo di istruzione? GRAZIE

[MItaly]

No, devi fare un ciclo che iteri su tutti i files contenuti nella cartella.

[intel4ever]

ad esempio se volessi copiare i file della cartella C:\WINDOWS\Prefetch di cui non so il nome (visto che cambiano da computer a computer e non posso fare un ciclo) come devo fare?

[MItaly]

Devi usare la funzione Dir in abbinata a FileCopy in un ciclo.

[intel4ever]

Sinceramente non ho capito in che modo devo fare... allora
hai detto che devo usare la funzione dir. Ho guardato su msdn e c'è questa:
Dir[(nomepercorso[, attributi])]
Poi mi hai detto di abbinarla a filecopy in un ciclo(while-wend penso)

una cosa del genere?

Dim conta As Integer
Dim n As Integer
conta = 1
While conta <= n
Dir "C:"
FileCopy........
Wend

[oregon]

Forse e' meglio che usi il FileSystemObject ... esistono molte discussioni nel forum ... e anche nel sito ...

[intel4ever]

grazie per aver risposto
farò delle ricerche nel sito e vi farò sapere... ciao

[Lak3d]

con il FSO...

Dir="C:\WINDOWS\Prefetch" 
Set fso = CreateObject("Scripting.FileSystemObject")
Set Folder=fso.GetFolder(Dir)
Set Fs=Folder.Files
If Fs.Count>0 then
   For each F in Fs
      'F.Copy ecc ecc
   Next
End If