Scinder ou Grouper rapidement

Signaler
Messages postés
56
Date d'inscription
vendredi 31 janvier 2003
Statut
Membre
Dernière intervention
26 mai 2013
-
Messages postés
3275
Date d'inscription
jeudi 3 avril 2008
Statut
Membre
Dernière intervention
14 septembre 2014
-
Bonjour,
Je désire trouver un code me permettant de copier plusieurs fichiers, dans l'ordre de mon choix.
D'habitude, je me contente d'un code du style :

Open "Groupe.dat" for binary as #1
          For I=0 to (le nombre de fichiers)
              Open Fichier for binary as #2
           A$=input (#1, X)
           B$=input (#1, X)
           ... (simplement pour ne pas stocker trop de donner dans une seule variable)
           Put #2, ,A$
           Put #2, ,B$
           Put #2, ,...
              Close #1
         Next I
Close #2

le problème, c'est que ce n'est pas très rapide (environ 0.5Mo/Sec)
Y aurait il un moyen de rendre le code plus rapide, ou la lenteur vient simplement des accès disques ?

Merci

6 réponses

Messages postés
56
Date d'inscription
vendredi 31 janvier 2003
Statut
Membre
Dernière intervention
26 mai 2013

EDIT: j'ai inversé #1 et #2 pour le input et put, mais tout le monde aura compris ^^
Messages postés
3275
Date d'inscription
jeudi 3 avril 2008
Statut
Membre
Dernière intervention
14 septembre 2014
4
Dim fichier() As String 'les noms des fichiers source
Dim cible As String ' le fichier dans lequel tu veux copier les autres


x = Shell("cmd.exe /C copy" & fichier(1) & fichier(2) & cible & "/B", vbHide)






Bonjour chez vous !
Messages postés
56
Date d'inscription
vendredi 31 janvier 2003
Statut
Membre
Dernière intervention
26 mai 2013

oui, passer par Shell marche bien, mais peut on le faire sans cette commande ? en traitant chaque partie de chaque fichier dans une variable ?
Messages postés
3275
Date d'inscription
jeudi 3 avril 2008
Statut
Membre
Dernière intervention
14 septembre 2014
4
copy te permet de copier des fichiers entiers pour faire un truc plus compliqué style ne copier que certaines lignes il faudrait utiliserun script  powershell

Bonjour chez vous !
Messages postés
56
Date d'inscription
vendredi 31 janvier 2003
Statut
Membre
Dernière intervention
26 mai 2013

gné?
lignes? pas suffisamment précis des lignes, car si je groupe des images par exemple, il faudra plutôt copier au byte près!
Pis en plus, les fichiers groupés puis dégroupés sont traités en même par le programme (algorithme, mais même sans l'algorithme, ca va pas vite)
Messages postés
3275
Date d'inscription
jeudi 3 avril 2008
Statut
Membre
Dernière intervention
14 septembre 2014
4
il y a quelqu'un qui a déposé un truc du genre sur le site il y a quelques temps
mais sinon fais un zip !
ou alors utilises tar http://gnuwin32.sourceforge.net/packages/gtar.htm

Bonjour chez vous !