3 Fragen zu Dateipruefung

Um eine .dll-Datei zu erstellen, die prüft, ob eine bestimmte Datei in einem Verzeichnis vorhanden ist und eine Fehlermeldung ausgibt, wenn sie nicht vorhanden ist, kannst du die Programmiersprache C# verwenden. Hier ist ein einfaches Beispiel, wie das gemacht werden kann: 1. Erstelle ein neues Klassenbibliotheksprojekt in Visual Studio. 2. Füge den folgenden Code in die Hauptklasse ein: ```csharp using System; using System.IO; namespace FileChecker { public class Checker { public static void CheckFileExists(string directoryPath, string fileName) { string filePath = Path.Combine(directoryPath, fileName); if (File.Exists(filePath)) { Console.WriteLine("Datei ist vorhanden."); } else { throw new FileNotFoundException("Datei nicht gefunden: " + filePath); } } } } ``` 3. Kompiliere das Projekt, um die .dll-Datei zu erstellen. Diese .dll-Datei kann dann in anderen Projekten referenziert werden, um die Funktion `CheckFileExists` aufzurufen. Hier ist ein Beispiel, wie du die .dll in einem anderen C#-Projekt verwenden kannst: ```csharp using System; using FileChecker; class Program { static void Main() { try { Checker.CheckFileExists(@"C:\DeinVerzeichnis", "DeineDatei.txt"); } catch (FileNotFoundException ex) { Console.WriteLine(ex.Message); } } } ``` Dieser Code prüft, ob die Datei "DeineDatei.txt" im Verzeichnis "C:\DeinVerzeichnis" vorhanden ist und gibt eine Fehlermeldung aus, wenn sie nicht gefunden wird.

Um dies in einer Visual Basic Script (VBS) Datei zu realisieren, kannst du folgendes Skript verwenden: ```vbs Option Explicit Dim fso, currentDir, file1, file2, file3, subDir, subFile1, subFile2, exePath ' Setze die Dateinamen und Pfade Set fso = CreateObject("Scripting.FileSystemObject") currentDir = fso.GetAbsolutePathName(".") file1 = currentDir & "\datei1.txt" file2 = currentDir & "\datei2.txt" file3 = currentDir & "\datei3.txt" subDir = currentDir & "\unterordner" subFile1 = subDir & "\datei4.txt" subFile2 = subDir & "\datei5.txt" exePath = currentDir & "\programm.exe" ' Prüfe, ob die Dateien existieren If fso.FileExists(file1) And fso.FileExists(file2) And fso.FileExists(file3) And _ fso.FileExists(subFile1) And fso.FileExists(subFile2) Then ' Starte die EXE-Datei Dim shell Set shell = CreateObject("WScript.Shell") shell.Run exePath Else ' Beende das Skript WScript.Quit End If ``` Dieses Skript überprüft, ob die drei Dateien im aktuellen Verzeichnis und die zwei Dateien im Unterordner vorhanden sind. Wenn alle Dateien vorhanden sind, wird die angegebene EXE-Datei gestartet. Andernfalls wird das Skript beendet. Stelle sicher, dass du die Dateinamen und Pfade entsprechend deinen Anforderungen anpasst.

Um eine Batch-Datei zu erstellen, die prüft, ob eine bestimmte Datei im überübergeordneten Ordner vorhanden ist und diese dann startet, kannst du folgenden Code verwenden: ```batch @echo off setlocal REM Setze den Dateinamen, der überprüft werden soll set "filename=deine_datei.exe" REM Gehe zwei Verzeichnisse nach oben cd ..\.. REM Überprüfe, ob die Datei existiert if exist "%cd%\%filename%" ( REM Starte die Datei, wenn sie existiert start "" "%cd%\%filename%" ) else ( echo Datei %filename% wurde nicht gefunden. ) endlocal ``` Ersetze `deine_datei.exe` durch den Namen der Datei, die du überprüfen und starten möchtest. Speichere den Code in einer `.bat`-Datei und führe diese aus.