[VB6] Copiare una directory

[race2]

dato che io lavoro con "VB.NET" e non conosco "VB6",

Come posso fare un semplice comando per copiare una intera directory piena di "file" e altre "sottoDirectory" in un altra unita dell'HDD ???

ho la necessita' di farlo con VB6 perceh non posso usare il "Fremework".

[f@bio80]

anche in 6 c'è il filesystemobject!

[race2]

Perche mi da un errore???

Private Sub Form_Load()

Dim fso As New Scripting.FileSystemObject
fso.CopyFolder "c:\x", "d:\x", True

End Sub

errore:
-------------------------------------------------------
Compiler error:

Use-defined type not defined


e mi evidenzia di giallo ---> Private Sub Form_Load()

[mslv]

per spostare una directory:


System.IO.Directory.Move("C:\X", "D:\X")

no, non è così, guardate il msg successivo...

[mslv]

no, non è così come ho detto prima... credo si così... senza utilizzare le api:

Public Sub CopiaDir(sorgente As String, destinazione As String)
Set fileadmin = CreateObject("Scripting.FileSystemObject")
fileadmin.copyfolder sorgente, destinazione
End sub

Quindi...

Private Sub Command1_Click()
Call CopiaDir("C:\X", "D:\X")
End Sub

è giusta? quando ho un po' di tempo la provo...

[race2]

Funziona il mio script, solo che non havevo importato il riferimento ---> Microsoft Scripting Runtime

grazie a tutti alla prossima....