Einzelnen Beitrag anzeigen

MicMic

Registriert seit: 26. Mai 2018
296 Beiträge
 
Delphi 10.2 Tokyo Starter
 
#1

Tipp: Viele Dateien erzeugen (fürs testen)

  Alt 23. Nov 2019, 20:25
Hallo,
manchmal will man Datei-Funktionen etc. testen und auch die Schnelligkeit prüfen.
Mit der Batch-Datei lassen sich jede Menge Dateien anlegen. Kann man auch immer wieder starten und neue erstellen lassen.
Code:
@echo off
setlocal EnableDelayedExpansion
for /l %%x in (1, 1, 100000) do (
fsutil file createnew %%x!random!!random!!random!!random!.!random!!random! !random!
)
Schöner wäre es, wenn Random irgendwie eine registrierte Dateiendung aus der Registry aussuchen würde. Da müsste man ein kleines Delphi Prog schreiben. Bei dem obigen Code sind es ja nur Zufallszahlen. Aber so ist das mal schnell gemacht mit Batch.

Vielleicht braucht es jemand ja mal

Gruß Mic

Geändert von MicMic (23. Nov 2019 um 20:28 Uhr)
  Mit Zitat antworten Zitat