4 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.

Hier ist eine Batchdatei, die den Ruhemodus verhindert, solange eine bestimmte Datei existiert. Sie nutzt den Befehl `powercfg -change -standby-timeout-ac 0`, um den Standby zu deaktivieren, und stellt nach dem Löschen der Datei den Standardwert (z.B. 30 Minuten) wieder her. Administratorrechte sind für diese Einstellung allerdings normalerweise erforderlich. Ohne Adminrechte kannst du den Standby nicht systemweit verhindern, aber du kannst mit einem Trick den PC wachhalten, indem du regelmäßig eine Eingabe simulierst. Hier eine Lösung ohne Adminrechte, die alle 60 Sekunden prüft, ob die Datei existiert, und solange sie existiert, eine minimale Mausbewegung ausführt, um den Standby zu verhindern: ```batch @echo off set "DATEIPFAD=C:\Pfad\zur\datei.txt" :LOOP if exist "%DATEIPFAD%" ( powershell -command "$pos = [System.Windows.Forms.Cursor]::Position; [System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point($pos.X+1, $pos.Y); Start-Sleep -Milliseconds 100; [System.Windows.Forms.Cursor]::Position = $pos" timeout /t 60 >nul goto LOOP ) ``` **Hinweise:** - Ersetze `C:\Pfad\zur\datei.txt` durch den Pfad zu deiner Datei. - Die Batchdatei nutzt PowerShell, um den Mauszeiger minimal zu bewegen (benötigt keine Adminrechte). - Damit das funktioniert, muss auf dem System PowerShell und das .NET-Framework installiert sein. - Die Batchdatei prüft jede Minute, ob die Datei existiert, und hält den PC wach, solange das der Fall ist. **Wichtig:** Die Zeile mit PowerShell funktioniert nur, wenn das Skript im Benutzerkontext läuft und die PowerShell-Ausführung nicht eingeschränkt ist. Falls du eine andere Methode bevorzugst (z.B. durch das Drücken einer Taste), kann das Skript entsprechend angepasst werden. Weitere Infos zu PowerShell: https://learn.microsoft.com/de-de/powershell/