Rate mal :-) / Crackme for Newbies

[silenced]

Ich hab hier ein kleines Script geschrieben.
Und von euch möchte ich wissen was es macht.

cu

On Error Resume Next

intStartingAddress = 50
intEndingAddress = 254
strSubnet = "212.204.97."

For i = intStartingAddress to intEndingAddress
    strComputer = strSubnet & i

Set objWMIService = GetObject("winmgmts:" _
    & "{(Security)}\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery _
        ("Select * From Win32_OperatingSystem")
    For Each objItem in ColItems
        Wscript.Echo strComputer & ": " & objItem.Caption
    Next

Set colLoggedEvents = objWMIService.ExecQuery _
    ("Select * From Win32_NTLogEvent Where SourceName ='NTFS'")
For Each objEvent in colLoggedEvents
    Wscript.Echo "Category: " & objEvent.Category
    Wscript.Echo "Event Code: " & objEvent.EventCode
    Wscript.Echo "Message: " & objEvent.Message
    Wscript.Echo "Record Number: " & objEvent.RecordNumber
    Wscript.Echo "Source Name: " & objEvent.SourceName
    Wscript.Echo "Time Written: " & objEvent.TimeWritten
    Wscript.Echo "Event Type: " & objEvent.EventType
Next
Next

 

[ghostdog]

Es sucht alle Win-PC's im Netzwerk? (blind geraten, hab keine Ahnung von den Objekten, die da benutzt werden)

 

[silenced]

Nein

 

[end4win]

Als BOFH interessieren mich nur die laufenden Prozesse
Wer spielt den da Während der Arbeitszeit und wie nutze ich es
zu meinem Vorteil

 

[silenced]

@end4win:

Na die kleinen Änderungen sollten nicht allzu schwer sein

 

[xeno]

es hat was mit rechtevergabe zu tun

 

[silenced]

@happy:

nein

 

[end4win]

nicht alles ist böse, manchmal nur nützlich.

 

[Ranger]

Hm, es Scannt alle im Subnet befindlichen PCs und gibt offene Ports mit Beschreibung aus?

 

[benwilliam]

mhhh
zeigt log meldungen aller rechner im definierten subnetz??

 

[silenced]

@Ranger
nein

@benwilliam
schon besser, aber was zeigt er an ?

@all
Es besteht aus mehreren Teilen:
Der 1. Teil wurde schon als Schleife für den entsprechenden Netzbereich erkannt.
Was macht der 2. Teil ??
Was macht der 3. Teil ??

 

[SUID:root]

Du fragst das Eventlog "Sicherheit" im Range 212.204.97.50-254 ab?

 

[silenced]

@SUID:root

nicht komplett

 

[[Phoenix]]

Hm, Du greifst auf jeden Fall per WMI auf die Ereignisprotokolle eines Netztwerkrechners zu. Ich habe das Ganze nur kurz überflogen, aber es sieht nach folgendem aus:

1.Teil:
Wurde schon gesagt...

2.Teil
Du lässt dir das Betriebssystem anzeigen?!

3.Teil
Du lässt dir alle Festplattenzugriffe ausgeben, die auf ein NTFS Dateisystem erfolgen?!

 

[silenced]

@Phoenix
fast richtig

Ich lasse mir nur die Fehler ausgeben

Gut gemacht leute.

Evtl. gibt´s bald mehr WMI Scripts von mir die evtl. jemandem Nutzen.

Bitte beachtet auch, dass nicht alle Scripte perfekt sind und fehlerfrei laufen.

In diesem hier sind auch ein oder zwei Fehler drin

cu