Servus Jungs,
Also mit dem Modul kann man checken ob die Checksum der PE richtig ist(und wenn sie Falsch sein sollte wird sie gefixt).
Die Idee stammt von Steve aus HackHound!
Wurde von mir von Delphi auf VB übersetzt...


(war nur eine Übung für mich)

So wirds benutzt:
If IsCheckSumValid("C:\File.exe", True) = True Then
MsgBox "Checked and Fixed!"
Else
Msgbox "Sorry, something gone wrong "
End If
Download:
http://rapidshare.com/files/211096243/mCheckSum.rar