Beiträge von Greek

  • Ich grig kein button hin der was macht!

    hab nen programm das macht mir nen gui fenster genau wie ich es will , ich muss es nur "hinmalen" dann F9 drücken und grig den code generiert und da war das halt drin mit dem switch^^.

    Also weiter zum Thema: Ich spiel das spiel Diablo 2 und da gibt es ne trade seite dazu names https://autoit.de/www.d2jsp.org da kann man seine sachen reintun die man für virueles geld verkäuft. Damit die sachenvon dir alle sehen muss man jede 4 Stunden Bump schreiben. Ich will das das programm jede 4 stunden bump schreibt damit ich das nicht mehr machen muss. Das Programm würde bestimmt sehr bliebt werden. :)
    Aber dauert noch bis es soweit ist :/

    So jetzt weist du was ich machen will ;)

    E: und ich hab kein plan obs funktioniert xD er soll ja mit dem code eigentlich noch garnix machen wenn man auf dem button drückt

  • Ich grig kein button hin der was macht!

    GLeich noch ne frage, wenn ich mit Inetget ( "$input1" ) machen will dann ist ja $input1 keine varible mehr durch die "" er soll die Url nehmen die eingeben wurde

    Spoiler anzeigen

    #include

    #Region ### START Koda GUI section ### Form=
    $Form1 = GUICreate("Form1", 633, 447, 193, 125)
    $aa = GUICtrlCreateButton("Diese Url Bumpen!", 256, 336, 115, 33, 0)
    $Label1 = GUICtrlCreateLabel("AutoBump Maschine", 240, 8, 102, 17)
    $Input1 = GUICtrlCreateInput("", 168, 136, 450, 21)
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $aa
    InetGet ( "$Input1" )

    EndSwitch
    WEnd

    Edit : Ich bin gerade auf irgendso ne Taste kommen und die schrift und alles ist ganz klein geworden weis einer wie ich alles wieder groß mach?^^
    GtaSpider: FireFox oder Inetnet Explorer Aktivieren und STRG + 0 drücken. hab aber opera

  • Ich grig kein button hin der was macht!

    danke, und wie macht man es mit GuiSetOnEvent?

    Edit: GLeich noch ne frage, wenn ich mit Inetget ( "$input1" ) machen will dann ist ja $input1 keine varible mehr durch die "" er soll die Url nehmen die eingeben wurde

    Spoiler anzeigen

    #include <GUIConstants.au3>

    #Region ### START Koda GUI section ### Form=
    $Form1 = GUICreate("Form1", 633, 447, 193, 125)
    $aa = GUICtrlCreateButton("Diese Url Bumpen!", 256, 336, 115, 33, 0)
    $Label1 = GUICtrlCreateLabel("AutoBump Maschine", 240, 8, 102, 17)
    $Input1 = GUICtrlCreateInput("", 168, 136, 450, 21)
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $aa
    InetGet ( "$Input1" )

    EndSwitch
    WEnd

  • Ich grig kein button hin der was macht!

    Ich sitzt schon ewig dran nen button zu machen der irgendwas macht aber nie passiert was!
    hier ma nen versuch:

    Spoiler anzeigen

    #include


    #Region ### START Koda GUI section ### Form=

    $Form1 = GUICreate("Form1", 633, 447, 193, 125)

    $ha = GUICtrlCreateButton("Mach was!!!", 240, 144, 153, 121, 0)

    GUISetState(@SW_SHOW)

    #EndRegion ### END Koda GUI section ###


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

    EndSwitch
    WEnd

    GUISetOnEvent ( $ha, "Abgehter" )

    Func Abgehter ()
    MsgBox ( 0, "Abgehter", "ja man!" )
    EndFunc


    und kann der button auch ohne den GuiSetOnEvent befehl machen? freund hat ein script da ist das alles mit if -then- endif glaubich

  • Msgbox nicht im vordergrund

    Spoiler anzeigen
    [autoit]

    HotKeySet("{ESC}", "_exit")

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

    #include

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

    GUICreate("D2JSP-Tool", 200, 390)
    $n1 = GUICtrlCreateList("", 5, 5, 190, 200)
    GUICtrlSetData(-1, "Softcore - Price Check|Softcore - USWEST Trading|Softcore - USWEST Ladder Trading|Softcore - USEAST Trading|Softcore - USEAST Ladder Trading|Softcore - EUROPE Trading|Softcore - EUROPE Ladder Trading|Softcore/Hardcore - ASIA Trading|Hardcore - Price Check|Hardcore - USWEST Trading|Hardcore - USEAST Trading|Hardcore - EUROPE Trading|Classic Trading|Low Level Dueling Trading (LLD)|", "item2")
    $n2 = GUICtrlCreateButton("Auswahl in der Liste bestätigen", 3, 195, 193)
    $n3 = GUICtrlCreateInput("Wie oft soll gesucht werden?", 3, 222, 193)
    $n4 = GUICtrlCreateButton("Auswahl der Suchlaufzahl bestätigen", 3, 250, 193)
    $n5 = GUICtrlCreateInput("Wie lange soll pausiert werden?", 3, 278, 193)
    $n6 = GUICtrlCreateButton("Auswahl der Pausenzeit bestätigen", 3, 305, 193)
    $n8 = GUICtrlCreateInput("Nach was soll gesucht werden?", 3, 333, 193)
    $n9 = GUICtrlCreateButton("Bestätigen und starten", 3, 360, 193)

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

    GUISetState()

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

    Do
    $msg = GUIGetMsg()
    ; if 1
    If $msg = $n2 Then
    MsgBox(0, "", GUICtrlRead($n1))
    If GUICtrlRead($n1) = "Softcore - Price Check" Then
    $n7 = "http://forums.d2jsp.org/index.php?showforum=71"
    EndIf

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

    If GUICtrlRead($n1) = "Softcore - USWEST Trading" Then
    $n7 = "http://forums.d2jsp.org/index.php?showforum=52"
    EndIf

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

    If GUICtrlRead($n1) = "Softcore - USWEST Ladder Trading" Then
    $n7 = "http://forums.d2jsp.org/index.php?showforum=168"
    EndIf

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

    If GUICtrlRead($n1) = "Softcore - USEAST Trading" Then
    $n7 = "http://forums.d2jsp.org/index.php?showforum=53"
    EndIf

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

    If GUICtrlRead($n1) = "Softcore - USEAST Ladder Trading" Then
    $n7 = "http://forums.d2jsp.org/index.php?showforum=169"
    EndIf

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

    If GUICtrlRead($n1) = "Softcore - EUROPE Trading" Then
    $n7 = "http://forums.d2jsp.org/index.php?showforum=54"
    EndIf

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

    If GUICtrlRead($n1) = "Softcore - EUROPE Ladder Trading" Then
    $n7 = "http://forums.d2jsp.org/index.php?showforum=170"
    EndIf

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

    If GUICtrlRead($n1) = "Softcore/Hardcore - ASIA Trading" Then
    $n7 = "http://forums.d2jsp.org/index.php?showforum=55"
    EndIf

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

    If GUICtrlRead($n1) = "Softcore/Hardcore - ASIA Trading" Then
    $n7 = "http://forums.d2jsp.org/index.php?showforum=55"
    EndIf

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

    If GUICtrlRead($n1) = "Hardcore - Price Check" Then
    $n7 = "http://forums.d2jsp.org/index.php?showforum=97"
    EndIf

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

    If GUICtrlRead($n1) = "Hardcore - USWEST Trading" Then
    $n7 = "http://forums.d2jsp.org/index.php?showforum=99"
    EndIf

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

    If GUICtrlRead($n1) = "Hardcore - USEAST Trading" Then
    $n7 = "http://forums.d2jsp.org/index.php?showforum=98"
    EndIf

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

    If GUICtrlRead($n1) = "Hardcore - EUROPE Trading" Then
    $n7 = "http://forums.d2jsp.org/index.php?showforum=25"
    EndIf

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

    If GUICtrlRead($n1) = "Classic Trading" Then
    $n7 = "http://forums.d2jsp.org/index.php?showforum=271"
    EndIf

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

    If GUICtrlRead($n1) = "Low Level Dueling Trading (LLD)" Then
    $n7 = "http://forums.d2jsp.org/index.php?showforum=123"
    EndIf

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

    $msg = 0
    While $msg <> $GUI_EVENT_CLOSE
    $msg = GUIGetMsg()
    ; if 2
    If $msg = $n4 Then
    MsgBox(0, "", GUICtrlRead($n3))
    $msg = 0
    While $msg <> $GUI_EVENT_CLOSE
    $msg = GUIGetMsg()
    ; if 3
    If $msg = $n6 Then
    MsgBox(0, "", GUICtrlRead($n5))
    $msg = 0

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

    ; ------------

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

    While $msg <> $GUI_EVENT_CLOSE
    $msg = GUIGetMsg()
    ; if 4
    If $msg = $n9 Then
    MsgBox(0, "", GUICtrlRead($n8))
    $msg = 0
    FileDelete("c:\d2jsp\download.bat")
    $file = FileOpen("c:\d2jsp\download.bat", 1)

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

    If $file = -1 Then
    MsgBox(0, "Error", "Unable to open file.")
    Exit
    EndIf

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

    FileWrite($file, "@echo off" & @CRLF)
    FileWrite($file, "if exist found.ini goto 2" & @CRLF)
    FileWrite($file, ":1" & @CRLF)
    FileWrite($file, "echo [section] > found.ini" & @CRLF)
    FileWrite($file, 'find /I "' & GUICtrlRead($n8) & '" c:\d2jsp\d2.txt >> found.ini' & @CRLF)
    FileWrite($file, "exit" & @CRLF)
    FileWrite($file, ":2" & @CRLF)
    FileWrite($file, "ren found.ini found.txt" & @CRLF)
    FileWrite($file, 'find /I "' & GUICtrlRead($n8) & '" c:\d2jsp\d2.txt >> found.txt' & @CRLF)
    FileWrite($file, "ren found.txt found.ini" & @CRLF)
    FileWrite($file, "exit" & @CRLF)

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

    FileClose($file)

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

    ; ------------

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

    ; While $msg <> $GUI_EVENT_CLOSE
    ; ...
    $g = GUICtrlRead($n5) * 1000
    $c = GUICtrlRead($n3) / 100
    ProgressOn("Durchlaufsanzeige", "Bisherige Suchläufe")
    For $b = 1 To GUICtrlRead($n3) Step +1
    InetGet($n7, "C:\d2jsp\d2.txt", 1)
    Run("C:\d2jsp\download.bat")
    Sleep($g)
    $d = $b / $c
    $e = Round($d, 1)
    ProgressSet($e, $e & " Prozent")
    Next
    MsgBox(3, "Abgeschlossen", "Beenden") ;<<<<<;ProgressSet($b , "Fertig", "Abgeschlossen")

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

    $msg = GUIGetMsg()
    ; Wend
    EndIf
    WEnd
    EndIf
    WEnd
    EndIf
    WEnd
    EndIf

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

    Until $msg = $GUI_EVENT_CLOSE

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

    Func _exit()
    Exit
    EndFunc ;==>_exit

    [/autoit]

    hab hingeschrieben wo die msgbox nicht im vordergund ist. Wie mach ich das die vor dem anderem Fenster ist?

    damit ihr es benutzen könnt müsst ihr eine batch datei machen mit dem namen download und mit dem inhalt:
    @echo off

    if exist found.ini goto 2

    :1
    echo [section] > found.ini
    find /I "need" c:\d2jsp\d2.txt >> found.ini
    exit

    :2
    ren found.ini found.txt
    find /I "need" c:\d2jsp\d2.txt >> found.txt
    ren found.txt found.ini
    exit

    und nen ordner wo es drin ist c:\d2jsp\ also auf c nen d2jsp ordner erstellen oder pfad verändern von wo er die daten download lesen soll

    bernd670 : AutoIt-Tags gesetzt!

  • FileWrite befehl help

    ich will diese zeile in eine batch datei schreiben.... : find /I "xxx" c:\d.txt >> found.ini wie geht das ich das " zeichen schreibe kann ohne das eine fehlermeldung kommt? mit dem FileWrite befehl

  • Brauch hilfe

    wo such ich den nach kuh? O.o ich such nach dem wort "need" hab was gemacht das die source runterläd von einer seite und es dann nach dem wort durchsucht mit dem link das ich brauch ist sowas wie ne suchmaschine , funktioniert auch schon aber ich möchte lieber die batch datei in dem auto script drin ham. Hier ist das script

    $a = InputBox("Wiederholungen", "Wie oft soll gesucht werden?", "")
    $f = InputBox("Pausen", "Wie lange soll zwischen den Suchen gewartet werden?", "(In Sekunden)")
    $g = $f*1000
    $c = $a/100
    ProgressOn("Durchlaufsanzeige", "Bisherige Suchläufe")
    For $b = 1 to $a Step +1
    InetGet("http://forums.d2jsp.org/index.php?showforum=54", "C:\d2jsp\d2.txt", 1)
    Run("C:\Dokumente und Einstellungen\Ackermann\Desktop\Programmiern\download.bat")
    sleep($g)
    $d = $b/$c
    $e = Round ($d, 1)
    ProgressSet( $e, $e & " Prozent")
    Next
    ProgressSet($b , "Fertig", "Abgeschlossen")

    ich muss zusätzlich das hier machenRun("C:\Dokumente und Einstellungen\Ackermann\Desktop\Programmiern\download.bat")
    wie man sieht aber das geht auch mit autoit, also die download.bat datei sucht nach dem word in ner datei und schreibt es dann in ne andere rein mit link wo sie es gefunden hat. Das kann man auch mit autoit machen nur wie..

  • Brauch hilfe

    ich hab die batch datei geschrieben
    @echo off

    if exist found.ini goto 2

    :1
    echo [section] > found.ini
    find /I "need" c:\d2jsp\d2.txt >> found.ini
    exit

    :2
    ren found.ini found.txt
    find /I "need" c:\d2jsp\d2.txt >> found.txt
    ren found.txt found.ini
    exit

    aber ich will das für auto it haben grigs aber net hin...
    also er soll in einer datei wo die source von ner seite drin ist nach einem bestimmt wort durchsuchen und das dann in der found.ini speichern