Wie prüfe ich mit VBS eine Datei im Quellverzeichnis und im übergeordneten Ordner auf Existenz?

Question

Wie prüfe ich mit VBS eine Datei im Quellverzeichnis und im übergeordneten Ordner auf Existenz?

Antwort

Verwandte Fragen

Wie speichere ich mehrzeilige Texte mit VB.NET 2003 in eine Datei und lese einzelne Blöcke anhand von Überschriften aus?

Wie prüfe und lösche ich eine Datei in einem DOS Batch Skript, wenn sie existiert?

Wie kann in einem DOS Batch-Skript der Inhalt einer Datei zeilenweise ausgelesen und angezeigt werden?

Accepted Answer

Um mit VBScript eine Datei im Quellverzeichnis und im übergeordneten Ordner auf Existenz zu prüfen, kannst du folgendes Skript verwenden: ```vbscript Dim fso, sourceFile, parentFolder, parentFile ' Set the file system object Set fso = CreateObject("Scripting.FileSystemObject") ' Define the source file path sourceFile = "C:\Pfad\zum\Quellverzeichnis\datei.txt" ' Check if the source file exists If fso.FileExists(sourceFile) Then WScript.Echo "Die Datei existiert im Quellverzeichnis." Else WScript.Echo "Die Datei existiert nicht im Quellverzeichnis." End If ' Get the parent folder of the source file parentFolder = fso.GetParentFolderName(sourceFile) ' Define the parent file path parentFile = fso.BuildPath(fso.GetParentFolderName(parentFolder), fso.GetFileName(sourceFile)) ' Check if the file exists in the parent folder If fso.FileExists(parentFile) Then WScript.Echo "Die Datei existiert im übergeordneten Ordner." Else WScript.Echo "Die Datei existiert nicht im übergeordneten Ordner." End If ``` Dieses Skript prüft zunächst, ob die Datei im Quellverzeichnis existiert. Anschließend ermittelt es den übergeordneten Ordner und prüft, ob die Datei auch dort existiert. Passe den Pfad `sourceFile` entsprechend an deine Bedürfnisse an.

Accepted Answer

Um mehrzeilige Texte in eine Datei zu speichern und später anhand von Überschriften (z. B. [Block1], [Block2]) auszulesen, kannst du in VB.NET 2003 wie folgt vorgehen: **1. Speichern mehrze... [mehr]

Accepted Answer

Um mehrzeilige Texte in eine Datei zu speichern und später anhand von Überschriften (z. B. [Block1], [Block2]) auszulesen, kannst du in VB.NET 2003 wie folgt vorgehen: **1. Speichern mehrzeiliger Texte mit Überschriften:** Du kannst die Datei als einfachen Text strukturieren, z. B. so: ``` [Block1] Zeile 1 von Block 1 Zeile 2 von Block 1 [Block2] Zeile 1 von Block 2 Zeile 2 von Block 2 ``` Das Speichern könnte so aussehen: ```vbnet Dim pfad As String = "C:\temp\textdatei.txt" Dim sw As New System.IO.StreamWriter(pfad, False) sw.WriteLine("[Block1]") sw.WriteLine("Zeile 1 von Block 1") sw.WriteLine("Zeile 2 von Block 1") sw.WriteLine() sw.WriteLine("[Block2]") sw.WriteLine("Zeile 1 von Block 2") sw.WriteLine("Zeile 2 von Block 2") sw.Close() ``` **2. Auslesen eines Blocks anhand der Überschrift:** Du kannst die Datei zeilenweise einlesen und die gewünschten Blöcke extrahieren: ```vbnet Dim pfad As String = "C:\temp\textdatei.txt" Dim blockName As String = "[Block2]" Dim blockText As New System.Text.StringBuilder() Dim leseBlock As Boolean = False Dim sr As New System.IO.StreamReader(pfad) Dim zeile As String Do zeile = sr.ReadLine() If zeile Is Nothing Then Exit Do If zeile.Trim() = blockName Then leseBlock = True Continue Do End If If leseBlock Then If zeile.StartsWith("[") And zeile.EndsWith("]") Then Exit Do ' Nächster Block beginnt, also stoppen End If blockText.AppendLine(zeile) End If Loop sr.Close() ' blockText.ToString() enthält jetzt den gewünschten Block ``` **Hinweise:** - Die Blöcke werden durch Überschriften in eckigen Klammern getrennt. - Leere Zeilen zwischen den Blöcken sind optional, aber hilfreich für die Lesbarkeit. - Die Methode funktioniert auch mit beliebig vielen Blöcken. **Weitere Tipps:** - Für komplexere Strukturen empfiehlt sich das INI-Format oder XML, aber für einfache Zwecke reicht diese Methode völlig aus. - Achte auf den Zeichensatz beim Lesen/Schreiben (Standard ist UTF-8). **Links:** - [Microsoft Dokumentation zu StreamReader](https://learn.microsoft.com/de-de/dotnet/api/system.io.streamreader) - [Microsoft Dokumentation zu StreamWriter](https://learn.microsoft.com/de-de/dotnet/api/system.io.streamwriter)

Accepted Answer

Um in einem DOS Batch-Skript zu prüfen, ob eine Datei existiert und sie gegebenenfalls zu löschen, kannst du folgende Befehle verwenden: ```batch IF EXIST "dateiname.txt" DEL &quo... [mehr]

Accepted Answer

Um in einem DOS Batch-Skript zu prüfen, ob eine Datei existiert und sie gegebenenfalls zu löschen, kannst du folgende Befehle verwenden: ```batch IF EXIST "dateiname.txt" DEL "dateiname.txt" ``` **Erklärung:** - `IF EXIST "dateiname.txt"` prüft, ob die Datei existiert. - `DEL "dateiname.txt"` löscht die Datei, falls sie existiert. **Beispiel für ein vollständiges Skript:** ```batch @echo off IF EXIST "C:\Pfad\zur\datei.txt" DEL "C:\Pfad\zur\datei.txt" ``` Ersetze `"C:\Pfad\zur\datei.txt"` durch den tatsächlichen Pfad und Dateinamen.

Accepted Answer

Um in einem DOS-Batch-Skript den Inhalt einer Datei zeilenweise auszulesen und anzuzeigen, kannst du die FOR-Schleife verwenden. Hier ein Beispiel: ```batch @echo off for /f "delims=" %%a i... [mehr]

Accepted Answer

Um in einem DOS-Batch-Skript den Inhalt einer Datei zeilenweise auszulesen und anzuzeigen, kannst du die FOR-Schleife verwenden. Hier ein Beispiel: ```batch @echo off for /f "delims=" %%a in (dateiname.txt) do ( echo %%a ) pause ``` **Erläuterung:** - `for /f "delims=" %%a in (dateiname.txt) do (...)` liest jede Zeile der Datei `dateiname.txt` und speichert sie in der Variablen `%%a`. - `echo %%a` gibt die aktuelle Zeile aus. - `pause` hält das Fenster offen, damit du die Ausgabe sehen kannst (optional). **Hinweis:** Wenn du das Skript direkt in der Eingabeaufforderung (ohne Batch-Datei) testen möchtest, ersetze `%%a` durch `%a`. Weitere Informationen findest du in der [Microsoft-Dokumentation zu FOR](https://learn.microsoft.com/de-de/windows-server/administration/windows-commands/for).