cs_SoZI
Messages postés6Date d'inscriptionvendredi 28 mai 2004StatutMembreDernière intervention16 octobre 2007
-
13 août 2006 à 16:10
cs_SoZI
Messages postés6Date d'inscriptionvendredi 28 mai 2004StatutMembreDernière intervention16 octobre 2007
-
9 oct. 2007 à 19:42
Bonjour a tous, j'ai un petit probleme, je souhaiterai copier plusieurs
fichiers volumineux qui ont tous un nom et une taille différente, le
tout dans un gros fichier unique.
Quelqu'un aurai t'il une idée ? car la fonction filecopy me renvoie une erreure.
tout d'abord il faut savoir que :
Textbox2.text = "c:\iso1\fichier1.iso"
Textbox3.text = "c:\iso1\fichier2.iso"
... et ainsi de suite pour les valeurs text des Textbox de 2 à 6.
BruNews
Messages postés21041Date d'inscriptionjeudi 23 janvier 2003StatutModérateurDernière intervention21 août 201919 13 août 2006 à 17:47
Dim hFile As Long
Dim hi As Long
hFile = CreateFile("a.dat", GENERIC_WRITE, 0, ByVal 0&, OPEN_ALWAYS, 0, 0)
If hFile <> INVALID_HANDLE_VALUE Then
hi = 2
SetFilePointer hFile, 0, hi, FILE_CURRENT
SetEndOfFile hFile
CloseHandle hFile
End If