Beiträge von L3viathan

  • Ip-Liste zwischen zwei IPs

    Ich hatte grade fast was, aber dann ging es plötzlich nicht mehr :(
    Hier der Rest davon (es hat vorher, etwas anders schon mit : 111.111.111.01 bis 111.111.113.01 geklappt...)

    Spoiler anzeigen
    [autoit]

    #include <Array.au3>
    Dim $result[1]
    $ip1="111.111.111.1"
    $ip2="111.111.113.1"
    $x=1

    [/autoit] [autoit][/autoit] [autoit]

    $splitted1=StringSplit($ip1,".")
    $splitted2=StringSplit($ip2,".")
    For $i=$splitted1[1] To $splitted2[1]

    [/autoit] [autoit][/autoit] [autoit]

    If $i=$splitted1[1] And $i <> $splitted2[1] Then
    $count2=255
    $from2=$splitted1[2]
    ElseIf $i=$splitted2[1] And $i <> $splitted1[1] Then
    $count2=$splitted2[2]
    $from2=0
    Else
    $count2=$splitted2[2]
    $from2=0
    EndIf

    [/autoit] [autoit][/autoit] [autoit]

    For $j=$from2 To $count2

    [/autoit] [autoit][/autoit] [autoit]

    If $j=$splitted1[2] And $j <> $splitted2[2] Then
    $count3=255
    $from3=$splitted1[3]
    ElseIf $j=$splitted2[2] And $j <> $splitted1[2] Then
    $count3=$splitted2[3]
    $from3=0
    Else
    $from3=0
    $count3=$splitted2[3]
    EndIf

    [/autoit] [autoit][/autoit] [autoit]

    For $k=$from3 To $count3

    [/autoit] [autoit][/autoit] [autoit]

    If $k=$splitted1[3] And $k <> $splitted2[3] Then
    $count4=255
    $from4=$splitted1[4]
    ElseIf $k=$splitted2[3] And $k <> $splitted1[3] Then
    $count4=$splitted2[4]
    $from4=0
    Else
    $from4=0
    $count4=$splitted2[4]
    EndIf

    [/autoit] [autoit][/autoit] [autoit]

    For $l=$from4 To $count4
    _ArrayAdd($result,$i & "." & $j & "." & $k & "." & $l)
    ToolTip($x,0,0)
    $x+=1
    Next
    Next
    Next
    Next
    _ArrayDisplay($result)

    [/autoit]

    edit: Das von Limette funzt doch! Zumindest fast...
    Das Problem habe ich versucht, mit der If-Verzweigung zu umgehen, aber irgendwie klappt es nicht...

  • WM-Tippspiel

    Sorry, etwas Off-topic, trotzdem hier das Zitat unseres irischen Barkeepers zum DE-Spiel:

    Zitat von Uwe

    Und ich dachte, Serben bringen Glück? Oder verwechsel ich da was?

  • Timer

    Du möchtest dein Skript so lange durchlaufen lassen?
    Okay...

    [autoit]


    While 1
    ;Tue irgendwas
    Sleep(1000*60*60*24*2) ; 2 Tage warten
    WEnd

    [/autoit]


    Oder meinst du, auch nach einem Neustart?
    Dann guck dir den Taskplaner von Windows mal an, der kann zu festen Zeiten Skripts starten...

  • Internetzensur - Nein Danke

    Zitat von nuts

    Die Server stehen ja nicht hier um die Ecke sondern im internationalen Raum.
    Darauf Zugriff zu bekommen ist rechtlich mehr als schwierig.


    Wie schon gesagt, im Bankenumfeld ist es kein Problem, überall auf der Welt Seiten zu löschen - warum nicht auch da?
    In den allermeisten Fällen genügt eine Mail an abuse@provider.tld und die Inhalte sind innerhalb von Stunden entfernt. Kinderpornographie ist weltweit strafbar.

  • Internetzensur - Nein Danke

    @hellboy3's Edit: tatsächlich, man trifft nicht alle Tage auf sowas. Ich noch nie... Man muss gezielt suchen, um KiPo zu finden, außerdem findet ein Großteil des kostenlosen (!) Tauschs nicht via WWW statt, sondern über verschlüsselte FTP-Server, MMS oder einfach die gute alte Bundespost...

  • Blume-HTTP-Server

    Das Ausführen von AutoIt-Code bedeutet eine kritische Sicherheitslücke. Wenn es ein Angreifer irgendwie schafft, (beispielsweise über ein Formular) AutoIt-Code einzuschleusen, hat er Vollzugriff auf deinen Rechner...