Beiträge von Blade

  • Wert aus txt datei auslesen

    Zitat von NiGHTMARE

    tut mir leid das ich das nicht auf anhieb verstehe, aber was ist jetzt $i also

    For $i = 1 To $aText[0]

    und wie bekomme ich es hin, dass er den wert in den zwischenspeicher nimmt?
    ist eines meiner ersten scripts also bitte nicht böse sein das ichs nicht verstehe.


    Mit dem Befehl "_FileReadToArray" wird deine Datei zeilenweise in ein Array($aText) eingelesen.

    Das nullte Element von diesem Array ($aText[0]) enthält die Anzahl der eingelesenen Zeilen.

    $i ist eine Zählvariable die nur hochgezählt wird und somit wird jedes Element des Arrays analysiert.

    War das verständlich?

  • Script - 14 Mausklicks + Pause - Wie Hidden laufen lassen - Alter Thread, Neue Frage

    ja das mit den eckigen klammern kann verwirrend sein...

    es müsste in diesme fall so aussehen wenn ich mich nicht irre:

    [autoit]

    ControlClick ( "Tickets zur FIFA WM 2010™ inkl. Flug + Übernachtung zu gewinnen - auf CokeFridge! - Mozilla Firefox", "", "[CLASS:MozillaWindowClass; INSTANCE:2]" , "left" , 1 , 823 , 564)

    [/autoit]

    Meine Aussage von vorhind, dass du die eckigen klammern weglassen musst, bezieht sich auf die optionale angeben bei der beschriebeung der befehle. dies ist hier nicht der fall. Guck dir mal in der Hilfe den Controlclick an... die eckigene klammern beim aufbau des befehls oben muss mand ann weglassen... aber unten im beispiel haste einen ähnlichen fall wie ihn name22 geschildert hat und da müssen die her...hoffe du weiß was ich meine^^

  • Script - 14 Mausklicks + Pause - Wie Hidden laufen lassen - Alter Thread, Neue Frage

    ah sorry, habe vergessen zu erwähnen, dass du das left in anführungszeichen setzen musst!

    also anstatt left -> "left"

    p.s.: Poste deinen Code doch bitte in den Autoit-Boxen, das ist wesentlich besser lesbar ;)

    Spoiler anzeigen
    [autoit]


    HotKeySet ("{F5}", "Start")
    HotKeySet ("{F6}", "Pause")
    HotKeySet ("{F7}", "Ende")
    Global $Paused
    while 1
    Sleep(1)
    WEnd
    Func Start()
    ToolTip('script start!')
    Sleep(1000)
    ToolTip("")
    While True
    ControlClick ( "Tickets zur FIFA WM 2010™ inkl. Flug + Übernachtung zu gewinnen - auf CokeFridge! - Mozilla Firefox", "", 11280760 , "left" , 1 , 358 , 497)
    ControlClick ( "Tickets zur FIFA WM 2010™ inkl. Flug + Übernachtung zu gewinnen - auf CokeFridge! - Mozilla Firefox", "", 11280760 , "left" , 1 , 823 , 564)
    ControlClick ( "Tickets zur FIFA WM 2010™ inkl. Flug + Übernachtung zu gewinnen - auf CokeFridge! - Mozilla Firefox", "", 11280760 , "left" , 14 , 767 , 566)
    ControlClick ( "Tickets zur FIFA WM 2010™ inkl. Flug + Übernachtung zu gewinnen - auf CokeFridge! - Mozilla Firefox", "", 11280760 , "left" , 1 , 577 , 590)
    ControlClick ( "Tickets zur FIFA WM 2010™ inkl. Flug + Übernachtung zu gewinnen - auf CokeFridge! - Mozilla Firefox", "", 11280760 , "left" , 1 , 552 , 589)
    ControlClick ( "Tickets zur FIFA WM 2010™ inkl. Flug + Übernachtung zu gewinnen - auf CokeFridge! - Mozilla Firefox", "", 11280760 , "left" , 1 , 1068 , 647)
    Sleep(21000)
    WEnd
    EndFunc
    Func Pause()
    $Paused = NOT $Paused
    While $Paused
    sleep(100)
    ToolTip('Script is "Paused"',0,0)
    WEnd
    ToolTip("")
    EndFunc
    Func Ende()
    Tooltip("Bot beendet!")
    sleep( 1000 )
    Tooltip("")
    Exit
    EndFunc

    [/autoit]

  • 4 whiles gleichzeitig

    Spoiler anzeigen
    [autoit]


    HotKeySet("{ESC}","_Exit")
    #include <GUIConstants.au3>
    $hWnd = GUICreate("Test", 400, 200)
    $dutton = GUICtrlCreateButton('1-6', 5, 25, 100, 25)
    $dutton2 = GUICtrlCreateButton('6-12', 5, 50, 100, 25)
    $dutton3 = GUICtrlCreateButton('12-18', 5, 75, 100, 25)
    $dutton4 = GUICtrlCreateButton('18+', 5, 100, 100, 25)
    GUISetState(@SW_SHOW)
    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $dutton
    $gui2 = GUICreate("Test", 400, 200, -1, -1)
    GUISetState(@SW_SHOW, $gui2)
    $Button1 = GUICtrlCreateButton("Junge", 5, 25)
    $Button2 = GUICtrlCreateButton("Mädchen", 5, 50)
    Case $dutton2
    $gui3 = GUICreate("Test", 400, 200, -1, -1)
    GUISetState(@SW_SHOW, $gui3)
    $Button1 = GUICtrlCreateButton("Junge", 5, 25)
    $Button2 = GUICtrlCreateButton("Mädchen", 5, 50)
    Case $dutton3
    $gui4 = GUICreate("Test", 400, 200, -1, -1)
    GUISetState(@SW_SHOW, $gui4)
    $Button1 = GUICtrlCreateButton("Junge", 5, 25)
    $Button2 = GUICtrlCreateButton("Mädchen", 5, 50)
    Case $GUI_EVENT_CLOSE
    Exit
    EndSwitch
    WEnd

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

    Func _Exit()
    Exit
    EndFunc

    [/autoit]


    Hilft dir das so?


    Edit:\\ ich bin einfach zu langsam...^^

  • 4 whiles gleichzeitig

    also 4 endlossschleifen gleichzeitig, geht meines wissens nach nicht... macht auch keinen wirklichen sinn und brauch man eigentlich auch nicht.

    aber mit skript wäre dir sicher leichter und besser zu helfen.

  • Laufwerksbuchstaben ändern

    Beim ersten Schritt holst du dir den Wert vom USB-Laufwerk. ( F: )

    Beim zweiten löschst du das USB-Laufwerk. ( F: )

    Beim dritten fügst du es mit dem zuvor geholten Wert hinzu. ( E: )

    So müsste es für dich dann passen:

    Spoiler anzeigen
    [autoit]

    $wert = RegRead("HKEY_LOCAL_MACHINE\SYSTEM\MountedDevices", "\DosDevices\F:")
    RegDelete("HKEY_LOCAL_MACHINE\SYSTEM\MountedDevices", "\DosDevices\F:")
    RegWrite("HKEY_LOCAL_MACHINE\SYSTEM\MountedDevices", "\DosDevices\E:", "REG_BINARY", $wert)

    [/autoit]

  • ControlSend macht Probleme beim Serial eintragen

    ja das entsprechende Programm kostet mehrere Teuro's...und da gibts keine günstige Alternative... deswegen bringt es nichts...

    aber danke für den Hinweis mit den Option...die hatte ich noch nicht gesehen.

    Die Option "SendCapslockMode" könnte mir hierbei vielleicht auch noch helfen! Danke!

    werde bei Erfolg berichten! :)

  • ControlSend macht Probleme beim Serial eintragen

    thx spider,

    dies hatte ich am Anfang, aber da hat er mir das gar nicht erst angenommen. Darauf kam immer wie Fehlermeldung dass ich die eingegebenen Daten prüfen soll.

    Er zeigt zwar das Richtige an, aber er akzeptiert sie nicht.

    Ich kann dann zum Beispiel auch nicht mit dem Cursor die Zeichen entlanglaufen.(Hoffe du weißt was ich hiermit meine)

    Deswegen bin ich zum ControlSend gewechselt. oder muss ich da noch mehr beachten?

  • ControlSend macht Probleme beim Serial eintragen

    Grüßt euch.

    Folgendes Problem:

    bei einer Installation muss ich den Firmennamen eintragen und habe dies wie folgt erledigt.

    [autoit]

    ControlSend($hWinHandle, "", 1012, "Meine Firma")

    [/autoit]

    dies hat auch bei den ersten versuchen geklappt.(wobei er da auch shconmal zeichen vergessen hatte, aber eher selten)

    Nun bin ich an einen anderen Rechner und wollte dies wieder durchführen lassen.

    Dummerweise hat er aber anstatt "Meine Firma" "MEINE FIRMA" eingetragen.

    Und schwups funktioniert das nicht. beim serial kommt es manchmal vor dass er zeichen verschluckt und anstatt beispielsweise GDWH7 nur GDH7 schreibt.

    Ne Ahnung was das sein kann? Beim Firmennamen sieht mir das schwer nach Capslock aus, jedoch ist dieser nicht bei der Tatstatur aktiv gewesen!

    Jemand eine Idee? Bzw. gibt es da vielleicht eine schönere und zuverläßigere Lösung?

    edit: bei dem anderen Rechner hatte ich die compilierte EXE benutzt

  • Email versenden (ehem.: Warten bis Button aktiv ist / Window Info incorrect??)

    Da dies wohl leider so nicht klappt, habe ich eine andere Idee.

    Ich würde dann gerne an der Stelle der Installation eine Email versenden, um den User darüber zu informieren dass die Installation jetzt hängt und er weiter machen muss per Hand.

    Dabei bin ich schnell auf den Befehl "_INetSmtpMail()" gestoßen.

    Problem an der Sache: ich habe keine Ahnung welche SMTP Adresse die hier in der Firma verwenden.

    Geht das auch ohne? Bzw. kann ich den SMTP irgendwie herausfinden? Email Client ist Lotus Notes.