Beiträge von Lenny

  • Confiker Checker - Seit ihr infiziert?

    Guten Abend ;).
    Also ich habe ein kleines Tool geschrieben, mit dem man überprüfen kann, ob man mit Confiker infiziert ist. Wer Lust hat kann es ja mal testen und sein ergebnis hier posten.
    Script:

    Spoiler anzeigen
    [autoit]


    #include
    #include

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

    Local $line
    Local $cmd = Run(@ComSpec & " /c ipconfig /displaydns", @SystemDir, @SW_HIDE, $STDERR_CHILD + $STDOUT_CHILD)

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

    $cDomains = _INetGetSource("http://www.cert.at/static/conficker/all_domains.txt")

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

    While 1
    $line = StdoutRead($cmd)
    If @error Then ExitLoop
    If $line <> "" Then
    $odom = StringRegExp($line, "Eintragsname.+?:\s([a-z,A-Z,0-9,\.\-]*)", 3)
    EndIf
    WEnd

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

    For $i = 0 To UBound($odom) - 1
    If StringInStr($cDomains, $odom[$i]) Then
    MsgBox(48, "Warning", "You are possibly infected with 'confiker!'"&@CRLF&@CRLF&"The suspicious domain is: "&$odom[$i])
    Exit
    EndIf
    Next

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

    MsgBox(64, "Info", "You are not infected with 'confiker'")

    [/autoit]


    ... und das Ergebnis:

    Spoiler anzeigen


    Mich würds mal interessieren was bei euch so raus kommt :)
    Vielen Dank im Voraus,

  • SuperMario LevelEditor

    Hallo!

    Also der Bug mit dem "ein nach rechts verschoben" ist bei mir jetzt weg. Allerdings fand ich die Version mit den Pfeiltasten besser, weil die Mausversion so wirkt als wäre die Framerate etwas niedrig, also es gibt immer so eine verzögerung beim bewegen des bauelements. Vllt kannst du das ja noch in Griff bekommen :D

  • SuperMario LevelEditor

    Hallo hab nen kleinen Bug gefunden :)

    Wenn man nicht in der untersten Zeile baut, sondern quasi in der Luft, sind bei mir die Bausteine immer ein feld nach rechts verrückt.

    Genutzt habe ich die Mittlere Boden Textur.

    lG,

    Lenny

  • EinkaufsRechner (ZielGruppe : Hausfrauen) ^^

    Hehe, ich finde das Script ganz cool. Die Gui sieht gut aus, es funktioniert soweit auch alles gut - und vllt. wird es wirklich mal gebraucht.

    Nur ich finde mal sollte den gleichen Artikel auch 2mal hinzufügen können, weil man ja durchaus auch mal 2 Packete Spaghetti kauft ;)

    Sonst: Schönes Script!

  • Pfeil auf Bild malen mittels GDI+

    Guten Abend.

    Ich versuche immoment mit GDI+ einen Pfeil auf ein Bild zu malen. Aber ich bekomm es einfach nicht hin. Ich weiß nicht ob ich die falschen Funcs benutze oder was ich sonst falsch mache ^^ ;)

    [autoit]


    _GDIPlus_Startup()
    $hGraphic = _GDIPlus_BitmapCreateFromFile($Name)
    $hPen = _GDIPlus_PenCreate (0xFF000000, 2)
    $hEndCap = _GDIPlus_ArrowCapCreate (3, 6)
    _GDIPlus_PenSetCustomEndCap ($hPen, $hEndCap)
    _GDIPlus_PenSetWidth ($hPen, 6)
    _GDIPlus_GraphicsDrawLine ($hGraphic, 10, 180, 390, 180, $hPen)
    _GDIPlus_ImageSaveToFile($hGraphic, "a_" & $Name)
    _GDIPlus_ArrowCapDispose($hEndCap)
    _GDIPlus_PenDispose($hPen)
    _GDIPlus_ImageDispose($hGraphic)
    _GDIPlus_Shutdown()

    [/autoit]

    Vllt könnte mir ja jemand da mal eben helfen :)

    Vielen Dank im Voraus, Lg, Lenny

  • Error: _IEAttach - HWND

    Guten Abend AutoIt'ler ;)

    Ich habe ein kleines Problem mit "_IEAttach".

    Spoiler anzeigen
    [autoit]


    $oIe = Attach()

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

    Func Attach()
    $Check = 0
    Do
    $IePid = ProcessExists("iexplore.exe")
    If $IePid Then
    $oIe = _IEAttach(GetWinHandleByPID($IePid), "HWND")
    If $oIe Then $Check = 1
    EndIf
    Until $Check
    Return ($oIe)
    EndFunc ;==>Attach

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

    Func GetWinHandleByPID($PID)
    $wList = WinList()
    For $i = 1 To $wList[0][0]
    If IsVisible($wList[$i][1]) Then
    If WinGetProcess($wList[$i][0]) = $PID Then
    Return ($wList[$i][1])
    EndIf
    EndIf
    Next
    Return (0)
    EndFunc ;==>GetWinHandleByPID

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

    Func IsVisible($handle)
    If BitAND(WinGetState($handle), 2) Then
    Return 1
    Else
    Return 0
    EndIf
    EndFunc ;==>IsVisible

    [/autoit]

    Immer wenn ich dieses Script ausführe, bekomme ich folgenden Fehler:

    Code
    ==> The requested action with this object has failed.:
Return HWnd($o_object.HWnd())
Return HWnd($o_object.HWnd()^ ERROR

    Ich habe auch schon direkt WinGetHandle mit meiner etwas frieseligeren "WinGetHandleByPID" Version verglichen: Beides das gleiche Ergebnis. Also kann es am Handle eig. nicht liegen.

    Wüsste vllt jemand Rat?

    Vielen Dank im Voraus, LG,

    Lenny

  • Turbo Messer

    Puh ... so hab ich mir das auch gedacht!

    Danke Oscar! Konnte mir auch nicht vorstellen das ich vor garnicht so langer Zeit nen Dual Core mit 1,6 + 1,6 GHz gekauft habe...

    Außerdem wie ich schon editiert hatte:

    Zitat

    Demnach wäre es ja sinnvoller nen SingelCore mit 3GHz zu kaufen, als nen Quadcore mit 2,9 Ghz.
    Jeder Kern hat 3,2 Ghz !

    Da bin ich ja beruhig!