Prüfen ob Datei in benutzung ist Verfasst am: 15.06.2009, 10:30
Beschreibung: Diese Funktion prüft ob eine Datei bereits von einem Prozess verwendet wird.
Funktion:
Code:
Public Function IsFileInUse(ByVal fullFilePath As String) As Boolean<br /> <br /> Dim ff As Integer = FreeFile() <br /> If System.IO.File.Exists(fullFilePath) Then <br /> Try <br /> FileOpen(ff, fullFilePath, OpenMode.Binary, OpenAccess.ReadWrite, _<br /> OpenShare.LockReadWrite)<br /> Catch <br /> IsFileInUse = True <br /> Finally <br /> FileClose(ff) <br /> End Try<br /> <br /> End If<br /> <br />End Function
Beispiel:
Code:
If IsFileInUse("c:test.txt") = True Then<br /> MessageBox.Show("Die Datei wird bereits von einem anderen _ <br /> Prozess verwendet!")<br />Else<br /> MessageBox.Show("Die Datei ist noch nicht in benutzung!")<br />End If