Quantcast
Channel: Microsoft Access Forum
Viewing all articles
Browse latest Browse all 880

Leere (Unter-) Ordner löschen mittels VBA

$
0
0

Hallo,

zuerst einmal möchte ich mich für die bisherigen Ratschläge hier bedanken, bevor ich mich nun mit einem neuen Problem an euch wende:

Ich habe in meiner DB ein Feld, in dem bei jedem Datensatz ein Pfad zu einem Projektverzeichnis hinterlegt ist, in welches beim Anlegen eine leere Struktur hineinkopiert wird.

Nun möchte ich mittels einer Schaltfläche (nach Projektabschluss) alle Dateien des Typs *.lnk löschen sowie im Anschluss daran alle leeren Unterordner löschen.

Was ich bisher fand, war eine Lösung als Batch-Datei:

for /f "delims=" %%a IN ('dir /b /s *.lnk') do call del "%%a"

for /f "delims=?" %%i in ('dir /AD /b /s "d:\Eigene Dateien\ordner 1\unterordner"') do rd "%%i"

Ich möchte nur ungern eine derartige Datei in der Vorlage hinterlegen, um versehentliches Ausführen ausschließen zu können.

Auch ist mir nicht klar, wie ich den Wert des "Projektverzeichnis" in die Zeile übernehmen sollte.

Danke im Voraus,

Andreas


Viewing all articles
Browse latest Browse all 880


<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>