title image


Smiley filecopy bestimmte anzahl
hi freaks

ich habe ein verzeichnis mit 3800 files

jetz möchte ich die ersten 800 in einen ordner die zweiten 800 in einen anderen order usw. kopieren.

Mit dem fileSystemObjekt geht das ja ganz hervoragend für den ganzen ordner



Dim oFSO As New FileSystemObject

oFSO.CopyFile "D:\test\*.txt", "D:\Test1"



in einer schleife abarbeiten und jedes file extra kopieren ist sicher viel lansamer.



hat wer einen tipp?



lg





geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: