Beiträge von Ineluki

  • Favicon aus HTML-Code extrahieren

    Was klappt hierdran denn nicht?:

    [autoit]

    #include <String.au3>
    #include <INet.au3>
    $aIconURL = _StringBetween(_INetGetSource("http://autoit.de/index.php?page=Portal"), '<link rel="shortcut icon" href="', '" type=')
    MsgBox(262144 + 64, "Favicon-URL", $aIconURL[0])

    [/autoit]

  • Itemloader filtern

    Spoiler anzeigen
    [autoit]

    #include <GUIListView.au3>
    Opt("GUIOnEventMode", 1)
    $hGUI = GUICreate("Test", 500, 600)
    GUISetOnEvent(-3, "close")
    $hCombo = GUICtrlCreateCombo("", 20, 20, 400, 500)
    GUICtrlSetOnEvent(-1, "bla")
    GUISetState()
    $itemnames = propitemget_itemname("propItem.txt.txt")
    If IsArray($itemnames) Then
    $inames = $itemnames[0]
    For $x = 1 To UBound($itemnames) - 1
    If $itemnames[$x] <> "" Then $inames &= "|" & $itemnames[$x]
    Next
    GUICtrlSetData($hCombo, $inames)
    Else
    MsgBox(0, "", $itemnames)
    EndIf

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

    While 1
    WEnd
    Func propitemget_itemname($propitempath)
    Return StringRegExp(FileRead($propitempath), "IDS_PROPITEM_TXT_\w*\s([\w ()äÄöÖüÜ.]*)", 3)
    EndFunc ;==>propitemget_itemname
    Func propitemget_itemverweis($propitempath, $itemname)
    Return StringRegExp(FileRead($propitempath), "(IDS_PROPITEM_TXT_\w*)\s" & $itemname, 3)
    EndFunc ;==>propitemget_itemverweis

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

    Func propitemget_itemdefine($propitempath, $itemverweis)
    Return StringRegExp(FileRead($propitempath), "(II_[\w_]*)\s" & $itemverweis, 3)
    EndFunc ;==>propitemget_itemdefine
    Func bla()
    Local $BliBlaBlubb
    $Z = propitemget_itemverweis("propItem.txt.txt", GUICtrlRead($hCombo))
    If IsArray($Z) Then $BliBlaBlubb = propitemget_itemdefine("propItem.txt", $Z[0])
    If IsArray($BliBlaBlubb) Then
    FileOpen("propmoverex.inc", 1)
    FileWrite("propmoverex.inc", "DropItem(" & $BliBlaBlubb[0] & ", 200000000, 0, 1);" & @CRLF)
    FileClose("propmoverex.inc")
    EndIf
    EndFunc ;==>bla
    Func close()
    Exit
    EndFunc ;==>close

    [/autoit]


    Das Problem bestand darin, dass die Variable $BliBlaBlubb nur deklariert wurde, wenn $Z ein Array ist. Ob $Z nun ein Array ist oder nicht, AutoIt meckert rum, dass $BliBlaBlubb villeicht noch nicht deklariert ist. Ein Local $BliBlaBlubb löst das Problem. Es deklariert $BliBlaBlubb für die Funktion und überschreibt es immer mit dem neuen Wert, wenn $Z ein Array ist.
    Wie du die Itembeschreibungen rausfiltern kannst, weiß ich leider immernoch nicht.

  • [ tutorial ] GUI's in AutoIt

    Ich meinte insbesondere das hier:


    Ist ja toll, das überall eine Erklärung hinter ist, aber erkläre lieber jedes Control, dass du verwendest einzeln ;)

  • [ tutorial ] GUI's in AutoIt

    Wer noch kein GUI kann, wird deine Beispielscripts nicht verstehen. Mach lieber einfache, normale Beispielscripts, ohne besondere Sachen ;)
    Und Koda zu empfehlen, um GUI's zu erstellen ist auch nicht grad das wahre. Ohne Koda geht's besser.
    Außerdem solltest du noch ein bisschen hinzufügen ;) Du schreibst nichts, außer wie man ein GUI erstellt und wie man den OnEvent und message Modus nutzt. Aber wenn es ein Tut über GUI's sein soll, gehört da auch noch GUICtrlCreate... und so dazu ;)
    Naja, ist ja schön, dass du dir die Arbeit machst, aber glaubst du die, die ein GUI nicht hinbekommen, werden sich das durchlesen? xD

  • Warum Geht Mein Script Nicht ?

    Spoiler anzeigen
    [autoit]

    #include <GUIConstants.au3>
    HotKeySet('x','start')
    HotKeySet('c','Beenden')
    #Region ### START Koda GUI section ### Form=C:\Documents and Settings\Aa\Local Settings\Temp\Rar$EX00.303\Forms\test1 sb.kxf
    $Form1 = GUICreate("xxxx ", 171, 178, 199, 125)
    $xxxx = GUICtrlCreateInput("xxxx", 16, 16, 137, 21)
    $Button1 = GUICtrlCreateButton("Start", 16, 56, 137, 25, 0)
    $Button2 = GUICtrlCreateButton("Beenden", 16, 136, 137, 25, 0)
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

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

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $Button1
    start()

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

    Case $Button2
    Beenden()

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

    EndSwitch
    WEnd
    Func start()
    MsgBox(0, "", GUICtrlRead($xxxx))
    EndFunc
    Func Beenden ()
    Exit
    EndFunc

    [/autoit]

  • bplaced.net - FTP Upload

    @Sprenger: Es geht ja auch, aber ich kann die Datei nicht finden ;(
    Edit: Mein Fehler, die Datei ist schon auf dem Server vorhanden und ich hatte noch den Passiv Modus aufgrund deines 1. Lösungsvorschlags drin.
    Klappt also jetzt, Danke :party: