copier un fichier dans un autre fichier

Question

Bonjour, 
voici mon code :
Dim File1 As FileStream = New FileStream(Me.FilePath, FileMode.Open, FileAccess.ReadWrite, FileShare.ReadWrite)            Dim File2 As FileStream = New FileStream(Me.FilePath2, FileMode.Open, FileAccess.ReadWrite, FileShare.ReadWrite)            For i = &H0 To &HCFFF                File2.Position = i                File1.Position = &h0                File2.CopyTo(File1)            Next            File1.Close()            File2.Close()

mon probléme avec mon code c'est copier les fichiers file2 dans le fichier file1. je voudrais copier la position de &h0 à &hcfff dans le fichier file1 a la position &h0.
comment faire? je suis un peu perdu? 
merci,

NHenry · Answer

Pourquoi ne pas utiliser la fonction de copie de fichier intégrée au framework ?

Ensuite, dans ta boucle, tu force la position de File1 toujours à 0, donc ça avance pas beaucoup.

Conseils généraux :
Retires aussi l'import automatique de l'espace de nom "Microsoft.VisualBasic" (onglet "références" des propriétés du projet).
Actives aussi Option Strict et Option Explicit, ton code sera plus propre.

hacker591 · Answer

Bonjour,

voici mon code :
Private Sub ZéroFile(src As FileStream)
        For i = &HD000 To &H30FFF
             src.position = i
            src.Write()
        Next i
        src.Flush()
    End Sub

je voudrais savoir comment enregistrer par rapport offset départ &hD000 et la fin offset &h30FFF des zéros?
Merci de votre compréhension,

Copier un fichier dans un autre fichier

2 réponses

Votre réponse

Discussions similaires