Website öffnen?

    Hey also ich wollte fragen ob ihr mir sagen könnt was ich hier verkehrt mache :/


    [autoit]


    GUICtrlSetFont(-1, 12, 800, 0, "Franklin Gothic Medium")
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###
    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    WEnd
    Case $GUI_EVENT_CLOSE
    ShellExecute("http://*******.de.tl/",1)
    Case $Form1
    Case $Button1
    ShellExecute("http://*******.com/",1)
    Case $Button2
    ShellExecute("http://*******.com/ ",1)
    Case $Button3
    ShellExecute("http://*******.com/forum ",1)
    Case $Button4
    ShellExecute("http://*******.com/",1)
    Case $Button5
    ShellExecute("http://*******.de/ ",1)
    Case $Button6
    ShellExecute("http://*******.com /",1)
    EndSwitch
    WEnd

    [/autoit]

    Einmal editiert, zuletzt von Toni_Damager (28. Juni 2012 um 16:23)

    Wo sind $Button1 , 2 und etc? Bitte kompletteN Script anzeigen. Und Wieso schließt du eine Schleife ab, wenn sie nicht mal geöffnet wurde :(

    [Blockierte Grafik: http://stefan.blagojevic.at/loading.gif]

    Design, Modellbau, CAD <3
    AutoCAD, ArchiCAD, REVIT (ist ein Scheiss, habe aber das Zertifikat)

    Cinema 4D, RuckZuck Statik Programm

    Michael Bay als Architekt


    Da eine Glasfassade! Booom Sichtbeton! Laminiertes Bild auf Mosaiksteinchen! Granit! Granit! Granit! Sichtbetonwand mit 50° Neigung!
    Holzverkleidung erscheint da! Boooooom!

    Kann shellexecute überhaupt mit URLs umgehen ?
    Für sowas gibts auch den hier:

    [autoit]


    #include <IE.au3>
    _IECreate("http://www.autoitscript.com/forum/index.php")

    [/autoit]

    Wer andern eine Bratwurst brät
    der hat ein Bratwurstbratgerät.

    [autoit]

    Case $GUI_EVENT_CLOSE
    ShellExecute("http://*******.de.tl/",1)

    [/autoit]


    Willst du wirklich beim Schliessen der GUI eine Seite aufrufen ??
    ANsonsten poste mal deinen ganzen Code, hier ist ausgenommen Zeile 7 nichts falsch

    [autoit]


    GUICtrlSetFont(-1, 12, 800, 0, "Franklin Gothic Medium")
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

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

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg

    Case $GUI_EVENT_CLOSE
    ShellExecute("http://teamsuicide.de.tl/",1)
    Case $Form1

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

    Case $Button1
    ShellExecute("http://facebook.com/",1)
    Case $Button2
    ShellExecute("http://youtube.com/ ",1)
    Case $Button3
    ShellExecute("http://elitepvpers.com/forum ",1)
    Case $Button4
    ShellExecute("http://google.com/",1)
    Case $Button5
    ShellExecute("http://schülervz.de/ ",1)
    Case $Button6
    ShellExecute("http://bing.com /",1)
    EndSwitch
    WEnd

    [/autoit]

    also so wie ich in anderen Open Source Scripten oder in Tut's gelesen hab funktioniert ShellExecute :)

    Hab mal eben ne GUI zu deinem unvollständigen Script improvisiert (und ein paar Case entfernt)
    Das hier funktioniert bei mir ohne weiteres:

    [autoit]

    #include <GUIConstantsEx.au3>

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

    $GUI = GUICreate("Testgui", 100,100)
    $Button1 = GUICtrlCreateButton("youtube", 10,10,80,20)
    $Button2 = GUICtrlCreateButton("google", 10,40,80,20)
    $Button3 = GUICtrlCreateButton("gmx", 10,70,80,20)

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

    GUISetState()

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

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $Button1
    ShellExecute("http://youtube.de/")
    Case $Button2
    ShellExecute("http://google.de/")
    Case $Button3
    ShellExecute("http://gmx.de/")
    EndSwitch
    WEnd

    [/autoit]
    UNPLEASANT SPOILER

    You just lost the game!

    Ein großes Danke dafür an dich :)

    Nur da das Programm für einen Kumpel ist bräuchte ich alle Websiten die ich eingefügt hab :)

    Zitat von Toni_Damager

    Ein großes Danke dafür an dich :)

    Nur da das Programm für einen Kumpel ist bräuchte ich alle Websiten die ich eingefügt hab :)

    Dazu erstelle einfach noch 'n paar Buttons (GUI-Größe nach Bedarf anpassen) und erweitere die Cases im Switch

    UNPLEASANT SPOILER

    You just lost the game!

    [autoit]

    #include <GUIConstantsEx.au3>

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

    $GUI = GUICreate("Testgui", 100,190)
    $Button1 = GUICtrlCreateButton("youtube", 10,10,80,20)
    $Button2 = GUICtrlCreateButton("google", 10,40,80,20)
    $Button3 = GUICtrlCreateButton("gmx", 10,70,80,20)
    $Button4 = GUICtrlCreateButton("youtube", 10,100,80,20)
    $Button5 = GUICtrlCreateButton("google", 10,130,80,20)
    $Button6 = GUICtrlCreateButton("gmx", 10,160,80,20)
    GUISetState()

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

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $Button1
    ShellExecute("http://youtube.de/")
    Case $Button2
    ShellExecute("http://google.de/")
    Case $Button3
    ShellExecute("http://gmx.de/")
    Case $Button4
    ShellExecute("http://youtube.de/")
    Case $Button5
    ShellExecute("http://google.de/")
    Case $Button6
    ShellExecute("http://gmx.de/")
    EndSwitch
    WEnd

    [/autoit]


    einfach die Links mit den gewünschten Seiten ersetzen

    Okay vielen Dank an alle die geantwortet haben :)


    Mein Problem ist nur noch...


    Wie baue ich das richtig ein? :/


    [autoit]


    Case $GUI_EVENT_CLOSE
    ShellExecute("http://teamsuicide.de.tl/",1)

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

    Case $GUI_EVENT_CLOSE
    Exit ; aktuell Zeile 15 und 16

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

    ; ersetzen mit :
    Case $GUI_EVENT_CLOSE
    ShellExecute("http://teamsuicide.de.tl/")

    [/autoit]