Top-Themen

Aktuelle Themen (A bis Z)

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit

VBS wird als virus erkannt?

Mitglied: 53111

53111 (Level 1)

11.09.2007, aktualisiert 13.09.2007, 2969 Aufrufe, 1 Kommentar

hallo

ich hab ein problem mit einem vb script das ich geschrieben habe. es wird als ein Kaspersky antivius als Backdoor.Win32.Hupigon.mfg erkannt? könntet ihr mal schauen was an dem script falsch ist?

01.
Dim netzobjekt, benutzername, laufwerkarray, arraylaenge, zaehler 
02.
set netzobjekt=wscript.createobject("wscript.network")
03.
benutzername = netzobjekt.UserName
04.

05.
Set test = netzobjekt.EnumNetworkDrives
06.
	
07.
'Laufwerknamen + gewünschten Pfad hier einstellen:'
08.
laufwerkarray = Array(	"H:",_
09.
			                  "\\Server2\Home\"&benutzername,_
10.
			                  "X:",_
11.
			                  "\\Server2\work",_
12.
			                  "Z:",_
13.
			                  "\\Server2\apps"_
14.
		                 )
15.
		                 
16.
zaehler = 0
17.

18.
If test.Count <> 0 Then
19.
   
20.
      	For h = 0 to UBound(laufwerkarray) - 1 Step 2
21.
        	 For g = 0 to test.Count - 1 Step 2
22.
      		    If laufwerkarray(h) = test.Item(g) And laufwerkarray(h+1) = test.Item(g+1) Then
23.
              zaehler = zaehler + 1 
24.
              Else	
25.
      		    End If
26.
           Next
27.
        Next
28.
        
29.
        If zaehler = (UBound(laufwerkarray) + 1) / 2 AND zaehler < 26  Then
30.
         
31.
        Else
32.
             call sublaufwerke 
33.
        End If  
34.
   
35.
Else
36.
   call sublaufwerke 
37.
End If
38.

39.

40.

41.
Sub sublaufwerke 
42.

43.
      'Pfad der Protokoll-Datei hier einstellen:'
44.
      Name = "C:\Dokumente und Einstellungen\"&benutzername&"\Desktop\Protokoll_zu_neuen_Netzlaufwerken.txt"
45.

46.

47.
      Set InfoDateiObjekt = CreateObject("Scripting.FileSystemObject")
48.
      Set InfoDatei = InfoDateiObjekt.OpenTextFile(Name, 2, True)
49.
      Set objFile = InfoDateiObjekt.GetFile(Name)
50.
       
51.
       
52.
        InfoDatei.WriteLine "Die folgenden Netzlaufwerke wurden gelöscht: "
53.
        InfoDatei.WriteLine " "
54.
      	
55.
      For i = 0 to test.Count - 1 Step 2
56.
      	For j = 0 to UBound(laufwerkarray)			
57.
      		If test.Item(i) = laufwerkarray(j) Then
58.
          		InfoDatei.WriteLine test.Item(i) &" "& test.Item(i+1) 				
59.
              netzobjekt.RemoveNetworkDrive laufwerkarray(j), true, true				
60.
      		End If
61.
      	Next
62.
      Next
63.
      
64.
      'bei mehr Laufwerken erweitern - pro Laufwerk werden 2 neue Werte benötigt'
65.
      netzobjekt.mapnetworkdrive laufwerkarray(0), laufwerkarray(1), true
66.
      netzobjekt.mapnetworkdrive laufwerkarray(2), laufwerkarray(3), true
67.
      netzobjekt.mapnetworkdrive laufwerkarray(4), laufwerkarray(5), true
68.
      'hier erweitern für Laufwerkmapping'
69.
      	
70.
        InfoDatei.WriteLine " "
71.
        InfoDatei.WriteLine " "
72.
        InfoDatei.WriteLine "Die gelöschten Netzlaufwerke wurden mit folgen Pfaden neu verbunden: "
73.
        InfoDatei.WriteLine " "
74.
        InfoDatei.WriteLine laufwerkarray(0) &" "& laufwerkarray(1) 	
75.
        InfoDatei.WriteLine laufwerkarray(2) &" "& laufwerkarray(3) 	
76.
        InfoDatei.WriteLine laufwerkarray(4) &" "& laufwerkarray(5) 	
77.
        'hier erweitern für Infodatei'
78.
        InfoDatei.Close 
79.

80.
End Sub 
Mitglied: maneich
13.09.2007 um 02:16 Uhr
Hallo,

virenscanner arbeiten meist mit Virensignaturen und dafür sind für sie Scripte mit den entsprechenden Signaturen immer verdächtig.

In Deinem Script ist eigentlich nichts "FALSCH".

Sofern die Möglichkeit besteht, würde ich dieses Script von der Prüfung ausschließen.

MfG maneich
Bitte warten ..
Ähnliche Inhalte
Viren und Trojaner
Zepto Virus
Frage von franksigViren und Trojaner12 Kommentare

Hallo zusammen, hat jemand Erfahrung mit dem Zepto Virus ? reicht es wenn der Client wo der Virus ausgeführt ...

Viren und Trojaner
Deviceconfigmanager - Virus- Trojaner?
gelöst Frage von freshman2017Viren und Trojaner4 Kommentare

Liebe Gemeinde, leider plage ich mich gerade mit dem Virus / Trojaner -> deviceconfigmanager .exe herum. Der verschiebt bei ...

Viren und Trojaner
Virus gefunden Mailanhang
Frage von MartyMcFlurry90Viren und Trojaner10 Kommentare

Hallo zusammen, sind eine kleine Firma und mein Virenschutz hat mir heute diese Meldung als Report geliefert. Meiner Recherche ...

Erkennung und -Abwehr
Virus GrandCrab 5.0.4
gelöst Frage von Viktor007Erkennung und -Abwehr12 Kommentare

Guten Abend , ich habe jetzt schon seit längerem ein problem und hoffe das Ihr mir hier helfen könnt. ...

Neue Wissensbeiträge
Internet
Copyright-Reform: Upload-Filter
Information von Frank vor 10 StundenInternet

Hallo, viele Menschen reden aktuell von Upload-Filtern. Sie reden darüber, als wären es eine Selbstverständlichkeit, das Upload-Filter die Seitenbetreiber ...

Google Android

Blokada: Tracking und Werbung unter Android unterbinden

Information von AnkhMorpork vor 11 StundenGoogle Android1 Kommentar

In Ergänzung zu meinem vorherigen Beitrag: Blokada efficiently blocks ads, tracking and malware. It saves your data plan, makes ...

Google Android
Facebooks unsichtbare Datensammlung
Information von AnkhMorpork vor 12 StundenGoogle Android

Rund 30 Prozent aller Apps im Play-Store nehmen Kontakt zu Facebook auf, sobald man sie startet. So erfährt der ...

Exchange Server

Exchange 2010 bis 2019 Sicherheitslücke durch CU RU schließen

Information von sabines vor 15 StundenExchange Server

Für die hier: und hier: besprochene Sicherheitslücke ist ein Patch für Microsoft Exchange Server 2010 - 2019 verfügbar. RU ...

Heiß diskutierte Inhalte
Windows 10
Windows Update funktioniert nicht - Keine Verbindung mit dem Updatedienst
gelöst Frage von anveWindows 1030 Kommentare

Hallo, ich kann schon länger keine Updates mehr machen. Wenn ich auf Update suchen gehe, dann schreibt er folgendes: ...

LAN, WAN, Wireless
NETBEUI unter Windows 10
Frage von certifiedit.netLAN, WAN, Wireless26 Kommentare

Guten Abend, wir stehen gerade vor dem Rästel, warum man in einer Industriemaschine (wert gut 6-stellig, paar mal vorhanden) ...

Hardware
Was passiert wenn ein Server zu heiß wird?
Frage von LohrakHardware20 Kommentare

Hallo Sollte ein Server zu heiß werden, da z.B ein Lüfter ausfällt, was würde passieren? Wie meldet sich der ...

Windows Installation
Was haltet Ihr von lizengo.de
Frage von UweGriWindows Installation17 Kommentare

Guten Abend, der Titel ist die Frage: Was haltet Ihr von www.lizengo.de? Wie sehe ich das: Deutsches Unternehmen, Jahre ...