C# / VB.NET - Barra progresso per copia cartelle?!?!? Vb.net

Forum - C# / VB.NET - Barra progresso per copia cartelle?!?!? Vb.net - Pagina 2

Pagine: [ 1 2 3 ]

r0gerblack (Ex-Member)
Pro

Messaggi: 70
Iscritto: 04/08/2008

Postato alle 14:27
Venerdì, 11/09/2009

Prova così:

Codice sorgente - presumibilmente VB.NET

Private Sub CopyWithProgress(ByVal ParamArray filenames As String()) 
      pBar1.Minimum = 1 
      pBar1.Maximum = filenames.Length 
      pBar1.Value = 1 
      pBar1.Step = 1 
      Dim x As Integer 
      for x = 1 To filenames.Length - 1    
            If CopyFile(filenames(x - 1)) = True Then 
                pBar1.PerformStep() 
            End If 
      Next x 
End Sub

Ultima modifica effettuata da r0gerblack il 11/09/2009 alle 14:31

TheEngi (Ex-Member)
Pro

Messaggi: 145
Iscritto: 30/08/2009

Postato alle 14:38
Venerdì, 11/09/2009

Scusa non ho capito:
1) Funziona anche con le cartelle????
2) Io devo copiare diverse cartelle per una dimensione totale di 800 mb nn credo che funzioni queto codice per quello che ho bisogno????
cmq lo provo

Ultima modifica effettuata da TheEngi il 11/09/2009 alle 14:39

r0gerblack (Ex-Member)
Pro

Messaggi: 70
Iscritto: 04/08/2008

Postato alle 14:40
Venerdì, 11/09/2009

con le cartelle non so, comunque prova

TheEngi (Ex-Member)
Pro

Messaggi: 145
Iscritto: 30/08/2009

Postato alle 14:42
Venerdì, 11/09/2009

allora una cosa mi dice che copyfile non è dichiarato!!!!

ruggy94 (Member)
Guru

Messaggi: 890
Iscritto: 21/04/2008

Postato alle 14:49
Venerdì, 11/09/2009

Testo quotato

Postato originariamente da TheEngi:

allora una cosa mi dice che copyfile non è dichiarato!!!!

E' normalissimo. Non so da dove abbia preso questa funzione...comunque in ogni caso utilizzando la procedure di r0gerblack dovresti passare come parametri tutti i percorsi dei file da copiare in un array...
Francamente ti consiglio di semplificarti la vita e di utilizzare un BackgroundWorker.
Ti ho già detto come fare...

Codice sorgente - presumibilmente VB.NET

Private Sub BackgroundWorker1_DoWork(ByVal sender As System.Object, ByVal e As System.ComponentModel.DoWorkEventArgs) Handles BackgroundWorker1.DoWork
        'procedura che copia i file
    End Sub
 
    Private Sub BackgroundWorker1_ProgressChanged(ByVal sender As Object, ByVal e As System.ComponentModel.ProgressChangedEventArgs) Handles BackgroundWorker1.ProgressChanged
        ProgressBar1.Value = e.ProgressPercentage
    End Sub

Per avviare la copia dei file, basta

Codice sorgente - presumibilmente Plain Text

BackgroundWorker1.RunWorkerAsync()

TheEngi (Ex-Member)
Pro

Messaggi: 145
Iscritto: 30/08/2009

Postato alle 14:51
Venerdì, 11/09/2009

Grazie mille ora ho capito al 100% come utilizzare il background worker anke perchè era la prima volta che lo usavo :rotfl:

grazie mille :hail:

r0gerblack (Ex-Member)
Pro

Messaggi: 70
Iscritto: 04/08/2008

Postato alle 14:52
Venerdì, 11/09/2009

Prova a sostituirlo con My.Computer.FileSystem.CopyFile

ruggy94 (Member)
Guru

Messaggi: 890
Iscritto: 21/04/2008

Postato alle 14:55
Venerdì, 11/09/2009

Testo quotato

Postato originariamente da r0gerblack:

Prova a sostituirlo con My.Computer.FileSystem.CopyFile

Ah, ecco. Comunque il tuo codice è sbagliato, perchè CopyFile non è una funzione, ma una Sub, perciò non restituisce un valore. Da quello che hai scritto tu, sembra che restituisca un Boolean.

Pagine: [ 1 2 3 ]