Wie kann ich eine VBS-Datei prüfen, ob sie vorhanden ist?

Question

Wie kann ich eine VBS-Datei prüfen, ob sie vorhanden ist?

Antwort

Verwandte Fragen

Wie kann ich mit PHP 8 eine Datei außerhalb des Webverzeichnisses einfügen?

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

Accepted Answer

Um in einer VBScript-Datei zu prüfen, ob eine bestimmte Datei vorhanden ist, kannst du die `FileExists`-Methode des `FileSystemObject` verwenden. Hier ist ein Beispielskript: ```vbscript Dim fso, filePath filePath = "C:\Pfad\zur\Datei.txt" Set fso = CreateObject("Scripting.FileSystemObject") If fso.FileExists(filePath) Then WScript.Echo "Die Datei ist vorhanden." Else WScript.Echo "Die Datei ist nicht vorhanden." End If ``` Dieses Skript überprüft, ob die Datei unter dem angegebenen Pfad existiert, und gibt eine entsprechende Meldung aus.

Accepted Answer

Um mit PHP 8 eine Datei von außerhalb des Webverzeichnisses einzufügen, kannst du die Funktionen `require`, `require_once`, `include` oder `include_once` verwenden. Wichtig ist dabei, den *... [mehr]

Accepted Answer

Um mit PHP 8 eine Datei von außerhalb des Webverzeichnisses einzufügen, kannst du die Funktionen `require`, `require_once`, `include` oder `include_once` verwenden. Wichtig ist dabei, den **absoluten Pfad** zur Datei anzugeben, da relative Pfade sich auf das aktuelle Arbeitsverzeichnis beziehen, das je nach Serverkonfiguration variieren kann. **Beispiel:** Angenommen, deine Verzeichnisstruktur sieht so aus: ``` /var/www/html/ (Webverzeichnis) /var/www/config/config.php (Datei außerhalb des Webverzeichnisses) ``` Dann kannst du in einer PHP-Datei im Webverzeichnis (`/var/www/html/index.php`) so auf die Datei zugreifen: ```php require '/var/www/config/config.php'; ``` **Alternativ:** Du kannst auch den Pfad dynamisch bestimmen, z.B. mit `__DIR__`: ```php require dirname(__DIR__) . '/config/config.php'; ``` **Wichtige Hinweise:** - Stelle sicher, dass der Webserver-Benutzer (z.B. `www-data` bei Apache) Leserechte auf die Datei hat. - Das Einbinden von Dateien außerhalb des Webverzeichnisses ist eine gute Praxis, um Konfigurationsdateien und sensible Daten vor direktem Zugriff zu schützen. - Die `open_basedir`-Einstellung in der `php.ini` kann den Zugriff auf bestimmte Verzeichnisse einschränken. Prüfe ggf. diese Einstellung, falls du eine Fehlermeldung erhältst. **Weitere Infos:** - [PHP: include - Manual](https://www.php.net/manual/de/function.include.php) - [PHP: require - Manual](https://www.php.net/manual/de/function.require.php)

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)