Datei auf Ausführbarkeit prüfen Verfasst am: 15.05.2009, 06:52
Hallo,
ich bin neu hier. Ich hab mich angemeldet, weil ich eine Problemlösung suche.
Ich muss eingehende Dateien (E-Mailanhänge) prüfen, ob diese ausführbar sind oder nicht.
Anhand der Endung oder des Typs zu erkennen reicht leider nicht aus.
In jedem Fall muss ich wissen, ob folgende Dateiformate ausführbare Dateien sind oder nicht:
.bat
.dll
.vbs
Weiß jemand irgendeine Möglichkeit dies mit VB.net abzuprüfen? Praktischerweise eine Art
"Test" ob die Datei in irgendeiner Art ausführbar ist, ohne das dabei Schaden entstehen kann...
Ich hoffe mir kann jemand weiterhelfen!
Danke schonmal im vorraus!
edit: Hab folgenden Sourcecode gefunden, geht das damit?
<summary>
Diese Funktion prüft ob eine Datei eine EXE Datei ist bzw eine PE (Portable Executable) Datei.
</summary>
<param name="FileName">Die Datei die überprüft werden soll</param>
Public Function IsExeFile(ByVal FileName As String) As Boolean
Try
Dim FS As New FileStream(FileName, FileMode.Open, FileAccess.Read, FileShare.Read)
Dim Data(4) As Byte
FS.Seek(128, SeekOrigin.Begin)
FS.Read(Data, 0, 5)
FS.Close()
If (Data(0) = 80 And Data(1) = 69 And Data(2) = 0 And Data(3) = 0 And Data(4) = 76) Then
Return True
End If
Catch ex As Exception
Return False
End Try
End Function
Registrieren
Login
