Microsofts Virenschutz blokiert jetzt auch Adware. Eigentlich ist die nützliche Funktion für Unternehmensnetze gedacht – sie lässt sich aber auch auf gewöhnlichen Windows-Systemen freischalten, wie ein Test von heise Security zeigt.
Windows Defender mit verstecktem Adware-Killer
-
-
Interesse an so einer Anwendung? 4
-
Ja (4) 100%
-
Nein (0) 0%
Mal schauen - hört sich sehr interessant an.
Bei Interesse schreibe ich gewrade mal eine kleine GUI Anwendung, die diese Funktion freischaltet.
Interesse? -
-
Muss mal testen, ob sich was ändert. Ich melde mich...
-
Ich glaube nicht, dass dafür extra ein Progrämmle nötig ist. Bei Heise steht ja drunter, wie man das bequem ändern kann, ohne in der Registry rumwuseln zu müssen:
Wer sich nicht von Hand durch den Registry-Editor klicken möchte,
kann eine Textdatei beispielsweise namens MpEnablePus.reg (nur die
Endung ist wichtig) mit dem folgenden Inhalt anlegen:Windows Registry Editor Version 5.00
[HKEY_LOCAL_MACHINE\SOFTWARE\Policies\Microsoft\Windows Defender\MpEngine]
"MpEnablePus"=dword:00000001 -
Mit Programm kann man die Funktion jederzeit wieder deaktivieren ohne in der Registry zu fummeln. Der erkennt scheinbar eine ganze Menge mehr als andere Programme.
Die Option ist für Firmenrechner gedacht. Lässt man die Option aktiviert, kann man auch viele Programme nicht herunterladen, bei denen das PUP optional deaktivierbar ist (CristalDiskInfo zum Beispiel).
-
Hier Downloadlink für das Proggie: Download WindefAdwProt.exe
-
Alles erkennt er nicht - ist aber gar nicht so schlecht, mit der Einstellung.
-
AHT, könntest Du den Quelltext des Tools noch posten? Einfach zum zu zeigen wie das geht, bzw. für die Transparenz.
-
Code: WinDefAdwProt.prf
Alles anzeigen$H Windows.PH $H Messages.PH $U RegEx.PCU = RegistryEx. DEF GetDlgCtrlID(1) !"USER32","GetDlgCtrlID" DEF ButtonClicked(1) @GetDlgCtrlID(@&(1))=-%MENUITEM Declare Font%, BtnLink%, BtnSet%, AdwOff%, AdwOn%, AdwGroup%, Link$, WDefAdwWert$ Declare Heigt&, Width&, MessADW% Heigt& = 158 Width& = 420 Link$ = "http://www.paules-pc-forum.de" WindowStyle 512 | 16 | 8 WindowTitle "MSE (Defender) Einstellungen" Window int(abs((%MAXX / 2) - (Width& / 2))), int(abs((%MAXY / 2) - (Heigt& / 2))) - 420, 158 UserMessages ~WM_CLOSE UseIcon "A" Font% = ~GetStockObject(17) SetDialogFont Font% CLS ~GetSysColor(15) AdwGroup% = Create("GroupBox", %HWnd, "Adwareerkennung in MSE", 4, 4, Width(%HWnd) - 10, 80) BtnLink% = Control("SysLink", "<a href=\qwww.paules-pc-forum.de/\q>Paules-PC-Forum</a>", $50000002, 20, int(abs(Height(%HWnd) - 32)), 160, 25, %HWnd, 90001, %hInstance, 0) AdwOn% = Create("RadioButton", AdwGroup%, "Adwareerkennung in MSE aktivieren", 4, 24, 200, 16) AdwOff% = Create("RadioButton", AdwGroup%, "Adwareerkennung in MSE deaktivieren", 4, 44, 200, 16) BtnSet% = Create("Button", %HWnd, "Setzen", int(abs(Width(%HWnd) - 88)), int(abs(Height(%HWnd) - 32)), 80, 24) WDefAdwWert$ = RegistryEx.ReadRegistryValue("HKEY_2", "Software\Policies\Microsoft\Windows Defender\MpEngine", "MpEnablePus") If WDefAdwWert$ = "1" SetCheck AdwOn%, 1 else SetCheck AdwOff%, 1 endif While %UMessage <> $10 Sleep 100 IF %WMNOTIFY IF &NotifyWnd = BtnLink% IF %NotifyCode = -2 SetMenuitem 0 ShellExec(Link$, "open", 1) endif endif endif iF ButtonClicked(BtnSet%) SetMenuItem 0 If GetCheck(AdwOn%) RegistryEx.CreateKey("HKEY_2", "Software\Policies") RegistryEx.CreateKey("HKEY_2", "Software\Policies\Microsoft") RegistryEx.CreateKey("HKEY_2", "Software\Policies\Microsoft\Windows Defender") RegistryEx.CreateKey("HKEY_2", "Software\Policies\Microsoft\Windows Defender\MpEngine") RegistryEx.SetRegistryValue("HKEY_2", "Software\Policies\Microsoft\Windows Defender\MpEngine", "MpEnablePus", "REG_DWORD", "1") WDefAdwWert$ = RegistryEx.ReadRegistryValue("HKEY_2", "Software\Policies\Microsoft\Windows Defender\MpEngine", "MpEnablePus") If WDefAdwWert$ = "1" SetCheck AdwOn%, 1 SetCheck AdwOff%, 0 else SetCheck AdwOff%, 1 SetCheck AdwOn%, 0 endif MessADW% = MessageBox("Der Rechner muss neu gestartet werden, damit die Einstellungen wirksam werden. Rechner neu starten?", "Neustart erforderlich", 4 | 32) If MessADW% = 6 ExitWindows 1 endif ElseIf GetCheck(AdwOff%) RegistryEx.SetRegistryValue("HKEY_2", "Software\Policies\Microsoft\Windows Defender\MpEngine", "MpEnablePus", "REG_DWORD", "0") WDefAdwWert$ = RegistryEx.ReadRegistryValue("HKEY_2", "Software\Policies\Microsoft\Windows Defender\MpEngine", "MpEnablePus") If WDefAdwWert$ = "1" SetCheck AdwOn%, 1 SetCheck AdwOff%, 0 else SetCheck AdwOff%, 1 SetCheck AdwOn%, 0 endif MessADW% = MessageBox("Der Rechner muss neu gestartet werden, damit die Einstellungen wirksam werden. Rechner neu starten?", "Neustart erforderlich", 4 | 32) If MessADW% = 6 ExitWindows 1 endif endif EndIf wend -
Danke! Tolle Idee mit dem kleinen Tool!
Jetzt mitmachen!
Sie haben noch kein Benutzerkonto auf unserer Seite? Registrieren Sie sich kostenlos und nehmen Sie an unserer Community teil!