PDA

View Full Version : [VB6] Copiare una directory

race2
09-02-2005, 08:43
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
09-02-2005, 10:51
anche in 6 c'č il filesystemobject!
race2
09-02-2005, 16:45
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
09-02-2005, 18:02
per spostare una directory:


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

no, non č cosė, guardate il msg successivo...
mslv
09-02-2005, 18:25
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
10-02-2005, 08:24
Funziona il mio script, solo che non havevo importato il riferimento ---> Microsoft Scripting Runtime

grazie a tutti alla prossima....