Scanner de malwares ( ße scanner )

Télécharger le projet
Commenter
Description

ße Scanner peut détecter
38 Adwares
106 BackDoors
1 Hijackers
10 KeyLogger
1 Ver
3 Virus
(ße Scanner ne supprime/copie/déplace aucun fichier)
Source / Exemple :

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, Buttons, ComCtrls, SkinCtrls, SkinBoxCtrls,
  SkinExCtrls, ThemeMgr, WinSkinStore, WinSkinData, ExtCtrls, ImgList;

type
  TForm1 = class(TForm)
    VirusDetecter: TMemo;
    BitBtn1: TBitBtn;
    ProgressBar1: TProgressBar;
    SkinData1: TSkinData;
    Button1: TButton;
    Label1: TLabel;
    Timer1: TTimer;
    Button2: TButton;
    SaveDialog1: TSaveDialog;
    procedure BitBtn1Click(Sender: TObject);
    procedure Button1Click(Sender: TObject);
    procedure Timer1Timer(Sender: TObject);
    procedure Button2Click(Sender: TObject);
  private
    { Déclarations privées }
  public
    { Déclarations publiques }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.BitBtn1Click(Sender: TObject);
begin
  If FileExists('c:\Documents and Settings\All Users\Application Data\imevata.exe')then
VirusDetecter.Lines.Add('[Adware] PC Security 2009 -> c:\Documents and Settings\All Users\Application Data\imevata.exe');
  If FileExists('c:\WINDOWS\system32\sibajisehe.exe')then
VirusDetecter.Lines.Add('[Adware] PC Security 2009 -> c:\WINDOWS\system32\sibajisehe.exe');
  If FileExists('c:\Program Files\PC_Security2009\Uninstall.exe')then
VirusDetecter.Lines.Add('[Adware] PC Security 2009 -> c:\Program Files\PC_Security2009');
  If FileExists('c:\WINDOWS\system32\exeneqaze.vbs')then
VirusDetecter.Lines.Add('[Adware] PC Security 2009 -> c:\WINDOWS\system32\exeneqaze.vbs');
  If FileExists('c:\Documents and Settings\All Users\Documents\emytijy.bat')then
VirusDetecter.Lines.Add('[Adware] PC Security 2009 -> c:\Documents and Settings\All Users\Documents\emytijy.bat');
  If FileExists('C:\Documents and Settings\All Users\Start Menu\Programs\Live-Player')then
VirusDetecter.Lines.Add('[Adware] Live-Player -> C:\Documents and Settings\All Users\Start Menu\Programs\Live-Player');
  If FileExists('c:\Program Files\Live-Player')then
VirusDetecter.Lines.Add('[Adware] Live-Player -> c:\Program Files\Live-Player');
  If FileExists('c:\Program Files\Coreguard Antivirus 2009')then
VirusDetecter.Lines.Add('[Adware] Coreguard Antivirus 2009 -> c:\Program Files\Coreguard Antivirus 2009');
  If FileExists('c:\WINDOWS\Installer\$PatchCache$\Managed\D6461317C3DC4F04799BDCE9E42626FE\2.0.50727\energy.exe')then
VirusDetecter.Lines.Add('[Adware] Antivir2009 &#8220;System Alert&#8221;  -> c:\WINDOWS\Installer\$PatchCache$\Managed\D6461317C3DC4F04799BDCE9E42626FE\2.0.50727\energy.exe');
  If FileExists('c:\WINDOWS\ServicePackFiles\i386\SICKBOY.exe')then
VirusDetecter.Lines.Add('[Adware] Antivir2009 &#8220;System Alert&#8221;  -> c:\WINDOWS\ServicePackFiles\i386\SICKBOY.exe');
  If FileExists('c:\WINDOWS\system32\tjd.exe')then
VirusDetecter.Lines.Add('[Adware] Antivir2009 &#8220;System Alert&#8221;  -> c:\WINDOWS\system32\tjd.exe');
  If FileExists('c:\Documents and Settings\All Users\Application Data\7c69f0c\UA2009.exe')then
VirusDetecter.Lines.Add('[Adware] Antivir2009 &#8220;System Alert&#8221;  -> c:\Documents and Settings\All Users\Application Data\7c69f0c\UA2009.exe');
  If FileExists('c:\WINDOWS\assembly\GAC_MSIL\Microsoft.Build.Engine\2.0.0.0__b03f5f7f11d50a3a\energy.exe ')then
VirusDetecter.Lines.Add('[Adware] Antivir2009 &#8220;System Alert&#8221;  -> c:\WINDOWS\assembly\GAC_MSIL\Microsoft.Build.Engine\2.0.0.0__b03f5f7f11d50a3a\energy.exe ');
  If FileExists('c:\WINDOWS\std.drv')then
VirusDetecter.Lines.Add('[Adware] Antivir2009 &#8220;System Alert&#8221;  -> c:\WINDOWS\std.drv');
  If FileExists('c:\WINDOWS\ServicePackFiles\i386\ppal.tmp')then
VirusDetecter.Lines.Add('[Adware] Antivir2009 &#8220;System Alert&#8221;  -> c:\WINDOWS\ServicePackFiles\i386\ppal.tmp');
  If FileExists('c:\Documents and Settings\All Users\Application Data\7c69f0c\SystemStore\vd952342.bd')then
VirusDetecter.Lines.Add('[Adware] Antivir2009 &#8220;System Alert&#8221;  -> c:\Documents and Settings\All Users\Application Data\7c69f0c\SystemStore\vd952342.bd ');
  If FileExists('C:\Program Files\eAntiSpy')then
VirusDetecter.Lines.Add('[Adware] eAntiSpy -> C:\Program Files\eAntiSpy');
  If FileExists('C:\Program Files\MyCentria')then
VirusDetecter.Lines.Add('[Adware] MyCentria -> C:\Program Files\MyCentria');
  If FileExists('C:\Program Files\OneStep')then
VirusDetecter.Lines.Add('[Adware] OneStep Search Tool -> C:\Program Files\OneStep');
  If FileExists('C:\Documents and Settings\All Users\Documents\HBEPGUID.TXT')then
VirusDetecter.Lines.Add('[Adware] OneStep Search Tool -> C:\Documents and Settings\All Users\Documents\HBEPGUID.TXT');
  If FileExists('C:\Program Files\freeviewer')then
VirusDetecter.Lines.Add('[Adware] Freview/Freeviewer -> C:\Program Files\freeviewer');
  If FileExists('c:\WINDOWS\kvnab$.exe')then
VirusDetecter.Lines.Add('[Adware] ADBreak -> c:\WINDOWS\kvnab$.exe');
  If FileExists('c:\WINDOWS\kkcomp.exe')then
VirusDetecter.Lines.Add('[Adware] ADBreak -> c:\WINDOWS\kkcomp.exe');
  If FileExists('c:\WINDOWS\wbecheck.exe')then
VirusDetecter.Lines.Add('[Adware] ADBreak -> c:\WINDOWS\wbecheck.exe');
  If FileExists('c:\WINDOWS\kkcomp.exe')then
VirusDetecter.Lines.Add('[Adware] ADBreak -> c:\WINDOWS\kkcomp.exe');
  If FileExists('c:\WINDOWS\wbecheck.exe')then
VirusDetecter.Lines.Add('[Adware] ADBreak -> c:\WINDOWS\wbecheck.exe');
  If FileExists('c:\WINDOWS\kvnab$.exe')then
VirusDetecter.Lines.Add('[Adware] ADBreak -> c:\WINDOWS\kvnab$.exe');
  If FileExists('c:\WINDOWS\liqad.exe')then
VirusDetecter.Lines.Add('[Adware] ADBreak -> c:\WINDOWS\liqad.exe');
  If FileExists('c:\WINDOWS\liqad$.exe')then
VirusDetecter.Lines.Add('[Adware] ADBreak -> c:\WINDOWS\liqad$.exe');
  If FileExists('c:\WINDOWS\cbinst$.exe')then
VirusDetecter.Lines.Add('[Adware] ADBreak -> c:\WINDOWS\cbinst$.exe');
  If FileExists('c:\WINDOWS\winhost32.exe')then
VirusDetecter.Lines.Add('[Adware] Virtumonde -> c:\WINDOWS\winhost32.exe');
  If FileExists('c:\WINDOWS\system32\winhost32.exe')then
VirusDetecter.Lines.Add('[Adware] Virtumonde -> c:\WINDOWS\system32\winhost32.exe');
  If FileExists('c:\WINDOWS\system\winhost32.exe')then
VirusDetecter.Lines.Add('[Adware] Virtumonde -> c:\WINDOWS\system\winhost32.exe');
  If FileExists('c:\WINDOWS\system\winupd.dll')then
VirusDetecter.Lines.Add('[Adware] Virtumonde -> c:\WINDOWS\system\winupd.dll');
  If FileExists('c:\WINDOWS\winupd.dll')then
VirusDetecter.Lines.Add('[Adware] Virtumonde -> c:\WINDOWS\winupd.dll');
  If FileExists('c:\WINDOWS\WinTouch.exe')then
VirusDetecter.Lines.Add('[Adware] WinTouch -> c:\WINDOWS\WinTouch.exe');
  If FileExists('C:\Program Files\WinTouch')then
VirusDetecter.Lines.Add('[Adware] WinTouch -> C:\Program Files\WinTouch');
  If FileExists('c:\WinTouch.exe')then
VirusDetecter.Lines.Add('[Adware] WinTouch -> c:\WinTouch.exe');
  If FileExists('c:\Program Files\rhcnkrj0etfg')then
VirusDetecter.Lines.Add('[BackDoor] CNN Alerts -> c:\Program Files\rhcnkrj0etfg');
  If FileExists('c:\WINDOWS\system32\phcjkrj0etfg.bmp')then
VirusDetecter.Lines.Add('[BackDoor] CNN Alerts -> c:\WINDOWS\system32\phcjkrj0etfg.bmp');
  If FileExists('c:\WINDOWS\system32\blphcjkrj0etfg.scr')then
VirusDetecter.Lines.Add('[BackDoor] CNN Alerts -> c:\WINDOWS\system32\blphcjkrj0etfg.scr');
  If FileExists('c:\WINDOWS\system32\drivers\54c70b2e.sys')then
VirusDetecter.Lines.Add('[BackDoor] CNN Alerts -> c:\WINDOWS\system32\drivers\54c70b2e.sys');
  If FileExists('c:\Documents and Settings\LocalService\Application Data\rhcnkrj0etfg')then
VirusDetecter.Lines.Add('[BackDoor] CNN Alerts -> c:\Documents and Settings\LocalService\Application Data\rhcnkrj0etfg');
  If FileExists('c:\System32\sxmg4.dll')then
VirusDetecter.Lines.Add('[BackDoor] FraudLoad -> c:\System32\sxmg4.dll');
  If FileExists('c:\WINDOWS\System32\sxmg4.dll')then
VirusDetecter.Lines.Add('[BackDoor] FraudLoad -> c:\WINDOWS\System32\sxmg4.dll');
  If FileExists('c:\Documents and Settings\Kobayashi\Local Settings\Temp\rst.bat')then
VirusDetecter.Lines.Add('[BackDoor] Digital Keylogger 3.3 Private -> c:\Documents and Settings\Kobayashi\Local Settings\Temp\rst.bat');
  If FileExists('c:\Documents and Settings\Kobayashi\Local Settings\Temp\explorer.exe')then
VirusDetecter.Lines.Add('[BackDoor] Digital Keylogger 3.3 Private -> c:\Documents and Settings\Kobayashi\Local Settings\Temp\explorer.exe');
  If FileExists('c:\WINDOWS\system32\dlllhost.exe')then
VirusDetecter.Lines.Add('[BackDoor] LOST DOOR -> c:\WINDOWS\system32\dlllhost.exe');
  If FileExists('c:\WINDOWS\A+++.exe')then
VirusDetecter.Lines.Add('[BackDoor] A+++ -> c:\WINDOWS\A+++.exe');
  If FileExists('c:\WINDOWS\winam.dat')then
VirusDetecter.Lines.Add('[BackDoor] Activity Monitor 3.01 -> c:\WINDOWS\winam.dat');
  If FileExists('c:\WINDOWS\mssystem.exe')then
VirusDetecter.Lines.Add('[BackDoor] Admin GG -> c:\WINDOWS\mssystem.exe');
  If FileExists('c:\WINDOWS\mssystem.exe')then
VirusDetecter.Lines.Add('[BackDoor] Admin GG -> c:\WINDOWS\mssystem.exe');
  If FileExists('c:\Documents and Settings\All Users\Start Menu\Programs\Startup\system.exe')then
VirusDetecter.Lines.Add('[BackDoor] AIKON Logger -> c:\Documents and Settings\All Users\Start Menu\Programs\Startup\system.exe');
  If FileExists('c:\WINDOWS\SYSTEM\AIRserver.exe')then
VirusDetecter.Lines.Add('[BackDoor] AIR -> c:\WINDOWS\SYSTEM\AIRserver.exe');
  If FileExists('c:\WINNT\system32\Server.exe')then
VirusDetecter.Lines.Add('[BackDoor] Almq -> c:\WINNT\system32\Server.exe');
  If FileExists('C:\WINDOWS\SYSTEM\dat92003.exe')then
VirusDetecter.Lines.Add('[BackDoor] AOL Admin -> C:\WINDOWS\SYSTEM\dat92003.exe');
  If FileExists('c:\WINDOWS\system32\abacab.exe')then
VirusDetecter.Lines.Add('[BackDoor] Abacab -> c:\WINDOWS\system32\abacab.exe');
  If FileExists('c:\WINDOWS\system32\protoc.exe')then
VirusDetecter.Lines.Add('[BackDoor] Abacab -> c:\WINDOWS\system32\protoc.exe');
  If FileExists('c:\WINDOWS\SYSTEM\A4.EXE')then
VirusDetecter.Lines.Add('[BackDoor] A4zeta -> c:\WINDOWS\SYSTEM\A4.EXE');
  If FileExists('c:\WINDOWS\system32\regsvr.exe')then
VirusDetecter.Lines.Add('[BackDoor] APS -> c:\WINDOWS\system32\regsvr.exe');
  If FileExists('c:\WINDOWS\arar.exe')then
VirusDetecter.Lines.Add('[BackDoor] ARAB RAT -> c:\WINDOWS\arar.exe');
  If FileExists('c:\WINDOWS\system32\Aroot.exe')then
VirusDetecter.Lines.Add('[BackDoor] ARAB RAT -> c:\WINDOWS\system32\Aroot.exe');
  If FileExists('c:\WINDOWS\system32\Kernel.bat')then
VirusDetecter.Lines.Add('[BackDoor] ARAB RAT -> c:\WINDOWS\system32\Kernel.bat');
  If FileExists('C:\WINDOWS\ARSD.EXE')then
VirusDetecter.Lines.Add('[BackDoor] Arsd -> C:\WINDOWS\ARSD.EXE');
  If FileExists('C:\WINDOWS\SysReq.exe')then
VirusDetecter.Lines.Add('[BackDoor] Asylum -> C:\WINDOWS\SysReq.exe');
  If FileExists('c:\WINDOWS\Taskmon .exe')then
VirusDetecter.Lines.Add('[BackDoor] AYO Cam Spy -> c:\WINDOWS\Taskmon .exe');
  If FileExists('c:\windows\rundll16.exe')then
VirusDetecter.Lines.Add('[BackDoor] A-Trojan -> c:\windows\rundll16.exe');
  If FileExists('C:\WINDOWS\SYSTEM\MY_BACKDOOR (NO X WIN 2000).exe')then
VirusDetecter.Lines.Add('[BackDoor] Backfire -> C:\WINDOWS\SYSTEM\MY_BACKDOOR (NO X WIN 2000).exe');
  If FileExists('c:\windows\notpa.exe')then
VirusDetecter.Lines.Add('[BackDoor] BackDoor -> c:\windows\notpa.exe');
  If FileExists('c:\WINDOWS\regclean.exe')then
VirusDetecter.Lines.Add('[BackDoor] Badluck Reloaded -> c:\WINDOWS\regclean.exe');
  If FileExists('c:\WINDOWS\AVG-RUN.exe')then
VirusDetecter.Lines.Add('[BackDoor] Bump RAT -> c:\WINDOWS\AVG-RUN.exe');
  If FileExists('c:\WINDOWS\twunk_12.exe')then
VirusDetecter.Lines.Add('[BackDoor] Bump RAT -> c:\WINDOWS\twunk_12.exe');
  If FileExists('c:\WINDOWS\twumk_32.dll')then
VirusDetecter.Lines.Add('[BackDoor] Bump RAT -> c:\WINDOWS\twumk_32.dll');
  If FileExists('c:\WINDOWS\svdhost.exe')then
VirusDetecter.Lines.Add('[BackDoor] Bugs Prey -> c:\WINDOWS\svdhost.exe');
  If FileExists('C:\WINDOWS\SYSTEM\SYSTEMTR.EXE')then
VirusDetecter.Lines.Add('[BackDoor] Bugs -> C:\WINDOWS\SYSTEM\SYSTEMTR.EXE');
  If FileExists('c:\WINDOWS\netcfga.exe')then
VirusDetecter.Lines.Add('[BackDoor] Barisot -> c:\WINDOWS\netcfga.exe');
  If FileExists('c:\WINDOWS\BODY.LG')then
VirusDetecter.Lines.Add('[BackDoor] Bugs -> c:\WINDOWS\BODY.LG');
  If FileExists('C:\WINDOWS\SYSTEM\DDRAW16.EXE')then
VirusDetecter.Lines.Add('[BackDoor] Barbie -> C:\WINDOWS\SYSTEM\DDRAW16.EXE');
  If FileExists('c:\WINDOWS\Cmctl32.exe')then
VirusDetecter.Lines.Add('[BackDoor] BackConstruction -> c:\WINDOWS\Cmctl32.exe');
  If FileExists('c:\TEMP12345678.exe')then
VirusDetecter.Lines.Add('[BackDoor] B-|R.A.T|-T -> c:\TEMP12345678.exe');
  If FileExists('c:\WINDOWS\sdssdgjeg012.exe')then
VirusDetecter.Lines.Add('[BackDoor] B-|R.A.T|-T -> c:\WINDOWS\sdssdgjeg012.exe');
  If FileExists('C:\windows\netpopup.exe')then
VirusDetecter.Lines.Add('[BackDoor] Bowl -> C:\windows\netpopup.exe');
  If FileExists('c:\WINDOWS\system32\Restore\wscntfy.exe')then
VirusDetecter.Lines.Add('[BackDoor] BLACK FTP -> c:\WINDOWS\system32\Restore\wscntfy.exe');
  If FileExists('c:\WINDOWS\TGHYU.exe')then
VirusDetecter.Lines.Add('[BackDoor] BlasterX -> c:\WINDOWS\TGHYU.exe');
  If FileExists('c:\WINDOWS\SYSTEMTRAY.exe')then
VirusDetecter.Lines.Add('[BackDoor] BlasterX -> c:\WINDOWS\SYSTEMTRAY.exe');
  If FileExists('c:\WINDOWS\Directory.exe')then
VirusDetecter.Lines.Add('[BackDoor] BlasterX -> c:\WINDOWS\Directory.exe');
  If FileExists('c:\WINNT\bootload.exe')then
VirusDetecter.Lines.Add('[BackDoor] BrainBot -> c:\WINNT\bootload.exe');
  If FileExists('c:\WINDOWS\system32\delete.exe')then
VirusDetecter.Lines.Add('[BackDoor] Cacique -> c:\WINDOWS\system32\delete.exe');
  If FileExists('c:\WINDOWS\ScanDisk.exe')then
VirusDetecter.Lines.Add('[BackDoor] Cacique -> c:\WINDOWS\ScanDisk.exe');
  If FileExists('c:\WINDOWS\navapw16.exe')then
VirusDetecter.Lines.Add('[BackDoor] Cold Fusion -> c:\WINDOWS\navapw16.exe');
  If FileExists('c:\Program Files\Bifrost\server.exe')then
VirusDetecter.Lines.Add('[BackDoor] Bifrost -> c:\Program Files\Bifrost\server.exe');
  If FileExists('C:\WINDOWS\ASDAPI.EXE')then
VirusDetecter.Lines.Add('[BackDoor] Cabronator3 kill -> C:\WINDOWS\ASDAPI.EXE');
  If FileExists('c:\WINDOWS\system32\DL.exe')then
VirusDetecter.Lines.Add('[BackDoor] DarkLabel -> c:\WINDOWS\system32\DL.exe');
  If FileExists('c:\WINDOWS\system32\adobe loader.exe')then
VirusDetecter.Lines.Add('[BackDoor] DjiRAT -> c:\WINDOWS\system32\adobe loader.exe');
  If FileExists('c:\WINDOWS\f.dat')then
VirusDetecter.Lines.Add('[BackDoor] Devil 6 (c) -> c:\WINDOWS\f.dat');
  If FileExists('c:\WINDOWS\system32\d3dx.dll')then
VirusDetecter.Lines.Add('[BackDoor] DG RAT 2008 -> c:\WINDOWS\system32\d3dx.dll');
  If FileExists('C:\WINDOWS\system\lol.exe')then
VirusDetecter.Lines.Add('[BackDoor] DarkFace -> C:\WINDOWS\system\lol.exe');
  If FileExists('c:\WINDOWS\SYSTEM\DARKFTP.EXE')then
VirusDetecter.Lines.Add('[BackDoor] DARKFTP -> c:\WINDOWS\SYSTEM\DARKFTP.EXE');
  If FileExists('c:\WINDOWS\TEMP\file1.exe')then
VirusDetecter.Lines.Add('[BackDoor] Eagle Boy -> c:\WINDOWS\TEMP\file1.exe');
  If FileExists('c:\WINDOWS\TEMP\file2.exe')then
VirusDetecter.Lines.Add('[BackDoor] Eagle Boy -> c:\WINDOWS\TEMP\file2.exe');
  If FileExists('c:\Program Files\ctfnon.exe')then
VirusDetecter.Lines.Add('[BackDoor] Easy Trojano -> c:\Program Files\ctfnon.exe');
  If FileExists('c:\kernal32.exe')then
VirusDetecter.Lines.Add('[BackDoor] EjTroj -> c:\kernal32.exe');
  If FileExists('c:\WINDOWS\repair\MSConfig.exe')then
VirusDetecter.Lines.Add('[BackDoor] Epithalium -> c:\WINDOWS\repair\MSConfig.exe');
  If FileExists('c:\WINDOWS\Netbios32.exe')then
VirusDetecter.Lines.Add('[BackDoor] Eurosol -> c:\WINDOWS\Netbios32.exe');
  If FileExists('c:\WINDOWS\msnmsgr.exe')then
VirusDetecter.Lines.Add('[BackDoor] EYE SPY -> c:\WINDOWS\msnmsgr.exe');
  If FileExists('C:\WINDOWS\SYSTEM\user32.exe')then
VirusDetecter.Lines.Add('[BackDoor] EZ KiLLA -> C:\WINDOWS\SYSTEM\user32.exe');
  If FileExists('c:\WINDOWS\messenger.exe')then
VirusDetecter.Lines.Add('[BackDoor] El-Hacker -> c:\WINDOWS\messenger.exe');
  If FileExists('c:\WINDOWS\SYSTEM\elfRAT.exe')then
VirusDetecter.Lines.Add('[BackDoor] elfRAT -> c:\WINDOWS\SYSTEM\elfRAT.exe');
  If FileExists('c:\WINDOWS\system32\sys32load.exe')then
VirusDetecter.Lines.Add('[BackDoor] EgyLoader -> c:\WINDOWS\system32\sys32load.exe');
  If FileExists('c:\WINDOWS\drvtsn32.exe')then
VirusDetecter.Lines.Add('[BackDoor] EagleAgent -> c:\WINDOWS\drvtsn32.exe');
  If FileExists('c:\WINDOWS\system32\fdos.exe')then
VirusDetecter.Lines.Add('[BackDoor] FAkEdOs -> c:\WINDOWS\system32\fdos.exe');
  If FileExists('C:\WINDOWS\SYSTEM\RENIFER.EXE')then
VirusDetecter.Lines.Add('[BackDoor] F-Backdoor -> C:\WINDOWS\SYSTEM\RENIFER.EXE');
  If FileExists('c:\WINDOWS\system32\fdos.exe')then
VirusDetecter.Lines.Add('[BackDoor] FAkEdOs -> c:\WINDOWS\system32\fdos.exe');
  If FileExists('c:\WINNT\system32\msass.exe')then
VirusDetecter.Lines.Add('[BackDoor] FeRaL[BoT] -> c:\WINNT\system32\msass.exe');
  If FileExists('C:\WINDOWS\SYSTEM\FYEOFORYOUREYESONLY.EXE')then
VirusDetecter.Lines.Add('[BackDoor] ForYourEyesOnly -> C:\WINDOWS\SYSTEM\FYEOFORYOUREYESONLY.EXE');
  If FileExists('c:\WINDOWS\msstatn.exe')then
VirusDetecter.Lines.Add('[BackDoor] FuckBot -> c:\WINDOWS\msstatn.exe');
  If FileExists('c:\cod4reg.crk')then
VirusDetecter.Lines.Add('[BackDoor] Fukas Code4 -> c:\cod4reg.crk');
  If FileExists('c:\WINDOWS\CfgWiz32.exe')then
VirusDetecter.Lines.Add('[BackDoor] Hack a Tack 2000 -> c:\WINDOWS\CfgWiz32.exe');
  If FileExists('c:\WINDOWS\Expl32.exe')then
VirusDetecter.Lines.Add('[BackDoor] Hack a Tack 1.20 -> c:\WINDOWS\Expl32.exe');
  If FileExists('c:\WINDOWS\TEMP\server\server\ev0.exe')then
VirusDetecter.Lines.Add('[BackDoor] Haan -> c:\WINDOWS\TEMP\server\server\ev0.exe');
  If FileExists('c:\WINDOWS\system32\Com\svchost.exe')then
VirusDetecter.Lines.Add('[BackDoor] H4ckItUp![Reb0rn] -> c:\WINDOWS\system32\Com\svchost.exe');
  If FileExists('C:\WINDOWS\SYSTEM\Kernel16.exe')then
VirusDetecter.Lines.Add('[BackDoor] H04x3r -> C:\WINDOWS\SYSTEM\Kernel16.exe');
  If FileExists('c:\WINDOWS\winpro32.exe')then
VirusDetecter.Lines.Add('[BackDoor] FuNKys Webserver -> c:\WINDOWS\winpro32.exe');
  If FileExists('c:\WINDOWS\win32ud.exe')then
VirusDetecter.Lines.Add('[BackDoor] Fukas -> c:\WINDOWS\win32ud.exe');
  If FileExists('c:\WINDOWS\win32ud.exe')then
VirusDetecter.Lines.Add('[BackDoor] Fukas -> c:\WINDOWS\win32ud.exe');
  If FileExists('c:\WINDOWS\SYSTEM\Isass.exe')then
VirusDetecter.Lines.Add('[BackDoor] FuckTrojan -> c:\WINDOWS\SYSTEM\Isass.exe');
  If FileExists('c:\WINDOWS\system32\svxhost.exe')then
VirusDetecter.Lines.Add('[BackDoor] ForBot -> c:\WINDOWS\system32\svxhost.exe');
  If FileExists('c:\WINDOWS\vbrun.exe')then
VirusDetecter.Lines.Add('[BackDoor] Feri -> c:\WINDOWS\vbrun.exe');
  If FileExists('c:\WINDOWS\apph.exe')then
VirusDetecter.Lines.Add('[BackDoor] MoneyRat -> c:\WINDOWS\apph.exe');
  If FileExists('c:\WINDOWS\system32\msn.exe')then
VirusDetecter.Lines.Add('[BackDoor] MsnControl -> c:\WINDOWS\system32\msn.exe');
  If FileExists('c:\WINDOWS\SYSTEM32\SysOps.exe')then
VirusDetecter.Lines.Add('[BackDoor] MsnControl -> c:\WINDOWS\SYSTEM32\SysOps.exe');
  If FileExists('c:\WINDOWS\system32\windII.exe')then
VirusDetecter.Lines.Add('[BackDoor] MSN Display Troy -> c:\WINDOWS\system32\windII.exe');
  If FileExists('c:\WINDOWS\system32\Sysprotecmsn.exe')then
VirusDetecter.Lines.Add('[BackDoor] MSNEspecTrum -> c:\WINDOWS\system32\Sysprotecmsn.exe');
  If FileExists('c:\WINDOWS\winsys.exe')then
VirusDetecter.Lines.Add('[BackDoor] MadCow -> c:\WINDOWS\winsys.exe');
  If FileExists('c:\WINDOWS\system32\msiexec16.exe')then
VirusDetecter.Lines.Add('[BackDoor] LOL -> c:\WINDOWS\system32\msiexec16.exe');
  If FileExists('c:\WINDOWS\system32\mshost.exe')then
VirusDetecter.Lines.Add('[BackDoor] LaMe RAT -> c:\WINDOWS\system32\mshost.exe');
  If FileExists('c:\WINDOWS\system32\yinhu.bat')then
VirusDetecter.Lines.Add('[BackDoor] LaLa Rat -> c:\WINDOWS\system32\yinhu.bat');
  If FileExists('c:\WINDOWS\system32\iexploreri32.exe')then
VirusDetecter.Lines.Add('[BackDoor] Over-Ride -> c:\WINDOWS\system32\iexploreri32.exe');
  If FileExists('C:\WINDOWS\SYSTEM\MSWinsock.exe')then
VirusDetecter.Lines.Add('[BackDoor] Over G -> C:\WINDOWS\SYSTEM\MSWinsock.exe');
  If FileExists('c:\WINDOWS\SYSTEM\orbit.exe')then
VirusDetecter.Lines.Add('[BackDoor] Orbit -> c:\WINDOWS\SYSTEM\orbit.exe');
  If FileExists('c:\WINDOWS\Progr.exe')then
VirusDetecter.Lines.Add('[BackDoor] Opwin -> c:\WINDOWS\Progr.exe');
  If FileExists('c:\WINDOWS\scanregw..exe')then
VirusDetecter.Lines.Add('[BackDoor] Opwin -> c:\WINDOWS\scanregw..exe');
  If FileExists('C:\WINDOWS\msHtml.exe')then
VirusDetecter.Lines.Add('[BackDoor] Pest -> C:\WINDOWS\msHtml.exe');
  If FileExists('C:\WINDOWS\system32\wJQs.exe')then
VirusDetecter.Lines.Add('[Hijackers] WindowsClick.com -> C:\WINDOWS\system32\wJQs.exe');
  If FileExists('C:\Program Files\SC-KeyLog PRO DEMO')then
VirusDetecter.Lines.Add('[KeyLogger] SC-KeyLog PRO -> C:\Program Files\SC-KeyLog PRO DEMO');
  If FileExists('C:\Program Files\SC-KeyLog PRO')then
VirusDetecter.Lines.Add('[KeyLogger] SC-KeyLog PRO -> C:\Program Files\SC-KeyLog PRO');
  If FileExists('C:\Documents and Settings\Sapna\Desktop\Main.lnk')then
VirusDetecter.Lines.Add('[KeyLogger] SC-KeyLog PRO -> C:\Documents and Settings\Sapna\Desktop\Main.lnk');
  If FileExists('C:\Program Files\Perfect Keylogger [XVS]')then
VirusDetecter.Lines.Add('[KeyLogger] Perfect Keylogger -> C:\Program Files\Perfect Keylogger [XVS]');
  If FileExists('C:\Program Files\Blazing Tools\Perfect Keylogger')then
VirusDetecter.Lines.Add('[KeyLogger] Perfect Keylogger -> C:\Program Files\Blazing Tools\Perfect Keylogger');
  If FileExists('C:\Windows\System\csvdea')then
VirusDetecter.Lines.Add('[KeyLogger] AIM Logger -> C:\Windows\System\csvdea');
  If FileExists('C:\Windows\System32\csvdea')then
VirusDetecter.Lines.Add('[KeyLogger] AIM Logger -> C:\Windows\System32\csvdea');
  If FileExists('C:\Winnt\System32\csvdea')then
VirusDetecter.Lines.Add('[KeyLogger] AIM Logger -> C:\Winnt\System32\csvdea');
  If FileExists('C:\Program Files\SBP Demo')then
VirusDetecter.Lines.Add('[KeyLogger] SpyBossPro -> C:\Program Files\SBP Demo');
  If FileExists('C:\Program Files\SBP')then
VirusDetecter.Lines.Add('[KeyLogger] SpyBossPro -> C:\Program Files\SBP');
  If FileExists('C:\Documents and Settings\All Users\Desktop\gphone.exe')then
VirusDetecter.Lines.Add('[Ver] Gphone -> C:\Documents and Settings\All Users\Desktop\gphone.exe');
  If FileExists('C:\Blah.exe')then
VirusDetecter.Lines.Add('[Virus] Blah -> C:\Blah.exe');
  If FileExists('C:\WINDOWS\system32\eygrtt.dll')then
VirusDetecter.Lines.Add('[Virus] Sagipsul -> C:\WINDOWS\system32\eygrtt.dll');
  If FileExists('C:\WINDOWS\system32\buwidodu.dll')then
VirusDetecter.Lines.Add('[Virus] Sagipsul -> C:\WINDOWS\system32\buwidodu.dll');
  If FileExists('C:\Autorun.inf')then
VirusDetecter.Lines.Add('AUTORUN -> C:\Autorun.inf');
  If FileExists('C:\Autorun.ini')then
VirusDetecter.Lines.Add('AUTORUN -> C:\Autorun.inf');
  If FileExists('F:\Autorun.inf')then
VirusDetecter.Lines.Add('AUTORUN -> F:\Autorun.inf');
  If FileExists('F:\Autorun.ini')then
VirusDetecter.Lines.Add('AUTORUN -> F:\Autorun.inf');
  If FileExists('G:\Autorun.inf')then
VirusDetecter.Lines.Add('AUTORUN -> G:\Autorun.inf');
  If FileExists('G:\Autorun.ini')then
VirusDetecter.Lines.Add('AUTORUN -> G:\Autorun.ini');
  If FileExists('H:\Autorun.inf')then
VirusDetecter.Lines.Add('AUTORUN -> H:\Autorun.inf');
  If FileExists('H:\Autorun.ini')then
VirusDetecter.Lines.Add('AUTORUN -> H:\Autorun.ini');
  If FileExists('I:\Autorun.inf')then
VirusDetecter.Lines.Add('AUTORUN -> I:\Autorun.inf');
  If FileExists('I:\Autorun.ini')then
VirusDetecter.Lines.Add('AUTORUN -> I:\Autorun.ini');
  If FileExists('J:\Autorun.inf')then
VirusDetecter.Lines.Add('AUTORUN -> J:\Autorun.inf');
  If FileExists('J:\Autorun.ini')then
VirusDetecter.Lines.Add('AUTORUN -> J:\Autorun.ini');
  If FileExists('K:\Autorun.inf')then
VirusDetecter.Lines.Add('AUTORUN -> K:\Autorun.inf');
  If FileExists('K:\Autorun.inf')then
VirusDetecter.Lines.Add('AUTORUN -> K:\Autorun.ini');
  If FileExists('L:\Autorun.inf')then
VirusDetecter.Lines.Add('AUTORUN -> L:\Autorun.inf');
  If FileExists('L:\Autorun.inf')then
VirusDetecter.Lines.Add('AUTORUN -> L:\Autorun.ini');
ProgressBar1.Position:=99;
  If FileExists('M:\Autorun.inf')then
VirusDetecter.Lines.Add('AUTORUN -> M:\Autorun.inf');
  If FileExists('M:\Autorun.ini')then
VirusDetecter.Lines.Add('AUTORUN -> M:\Autorun.ini');
  If FileExists('N:\Autorun.inf')then
VirusDetecter.Lines.Add('AUTORUN -> N:\Autorun.inf');
  If FileExists('N:\Autorun.ini')then
VirusDetecter.Lines.Add('AUTORUN -> N:\Autorun.ini');
ProgressBar1.Position:=100;
VirusDetecter.Lines.Add('----------------------------------------');
VirusDetecter.Lines.add(FormatDateTime('hh:mm:ss', Now));
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
VirusDetecter.Lines.SaveToFile('C:\ScannerRapport.TXT');
VirusDetecter.Lines.Add('Rapport enregistré à C:\ScannerRapport.TXT');
end;

procedure TForm1.Timer1Timer(Sender: TObject);
begin
Label1.Caption:=(FormatDateTime('hh:mm:ss', Now));
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
VirusDetecter.Clear;
end;

end.
Télécharger le projet
Codes Sources

A voir également

Scanner de malwares ( ße scanner )
Pda scanner - Forum C# / .NET
Scanner multipage ✓ - Forum VBA Office (Excel, Word ...)
Barcode scanner c# - Forum C# / .NET
Sse 4.2 - Forum VB.NET
Delphi scanner component ✓ - Forum Delphi / Pascal
S'inscrire maintenant
Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.
Scanner de malwares ( ße scanner )

Description

Source / Exemple :

Codes Sources

A voir également

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Du même auteur (MrClock)

Exe protector v1

Source / Exemple :

A voir également

Vous n'êtes pas encore membre ? inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Du même auteur (MrClock)

Exe protector v1

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
