MsgBox schliessen nach beginn einer Aktion wie z.B. Installation

  • Hi zusammen...

    Ich hab ein kleines Skript geschrieben, welches zu beginn eine MsgBox raushaut wo kurz darüber informiert wird was das Skript macht..
    Wenn ich auf "Los geht`s" klicke sollen die Aktionen ausgefügrt und die MsgBox automatisch geschlossen werden..
    Krieg ich iwie nich gebacken weil ich nich weiss wonach ich in der Hilfe suchen soll :wacko:

    Hier das Skript:

    Spoiler anzeigen
    [autoit]

    #RequireAdmin
    #include <GUIConstants.au3>
    #include <Inet.au3>

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

    #Region ### START Koda GUI section ### Form=C:\Users\Mike\Desktop\AutoIT3-Scripts\Helferchen.kxf
    #AutoIt3Wrapper_Icon=D:\Tools\Iconsammlung\incredigames.ico
    #AutoIt3Wrapper_Outfile_x64=RegBackup.exe
    #AutoIt3Wrapper_Res_Comment=RegBackup
    #AutoIt3Wrapper_Res_Description=Kleines Programm sichern der Registry
    #AutoIt3Wrapper_Res_Fileversion=1.0.0
    #AutoIt3Wrapper_Res_LegalCopyright=Mike
    #AutoIt3Wrapper_Res_Language=1031
    $Form1_1 = GUICreate("Regbackup", 298, 82, 454, 342)
    $Button1 = GUICtrlCreateButton("Los geht`s", 104, 40, 89, 33, 0)
    $Label1 = GUICtrlCreateLabel("Downlad-Registrybackup - ausführen - feddich", 8, 8, 282, 17)
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

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

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

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

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

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

    Case $Button1

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

    ; Download von Regbackup.cmd ( Legt eine Sicherung der Registry unter C:\RegistryBackup ab
    $url2="http://mm-edv.eu/DL/regbackup.cmd"
    $filename = StringSplit($url2, "/")
    $filesplit = UBound($filename)-1
    InetGet($url2, @ScriptDir & "\" & $filename[$filesplit])

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

    ; Ausführen RegistryBackup
    ShellExecuteWait("Regbackup.cmd")

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

    MsgBox(0, "Feddich", " Registry gesichert unter: C:\RegistryBackup")
    EndSwitch
    WEnd

    [/autoit]

    2 Mal editiert, zuletzt von Mike280399 (22. September 2011 um 09:38)

  • So wird die GUI ausgeblendet:

    Spoiler anzeigen
    [autoit]

    #RequireAdmin
    #include <GUIConstants.au3>
    #include <Inet.au3>

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

    #Region ### START Koda GUI section ### Form=C:\Users\Mike\Desktop\AutoIT3-Scripts\Helferchen.kxf
    #AutoIt3Wrapper_Icon=D:\Tools\Iconsammlung\incredigames.ico
    #AutoIt3Wrapper_Outfile_x64=RegBackup.exe
    #AutoIt3Wrapper_Res_Comment=RegBackup
    #AutoIt3Wrapper_Res_Description=Kleines Programm sichern der Registry
    #AutoIt3Wrapper_Res_Fileversion=1.0.0
    #AutoIt3Wrapper_Res_LegalCopyright=Mike
    #AutoIt3Wrapper_Res_Language=1031
    $Form1_1 = GUICreate("Regbackup", 298, 82, 454, 342)
    $Button1 = GUICtrlCreateButton("Los geht`s", 104, 40, 89, 33, 0)
    $Label1 = GUICtrlCreateLabel("Downlad-Registrybackup - ausführen - feddich", 8, 8, 282, 17)
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

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

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

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

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

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

    Case $Button1
    GUISetState(@SW_HIDE)
    ; Download von Regbackup.cmd ( Legt eine Sicherung der Registry unter C:\RegistryBackup ab
    $url2 = "http://mm-edv.eu/DL/regbackup.cmd"
    $filename = StringSplit($url2, "/")
    $filesplit = UBound($filename) - 1
    InetGet($url2, @ScriptDir & "\" & $filename[$filesplit])

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

    ; Ausführen RegistryBackup
    ShellExecuteWait("Regbackup.cmd")

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

    MsgBox(0, "Feddich", " Registry gesichert unter: C:\RegistryBackup")
    EndSwitch
    WEnd

    [/autoit]

    Andy hat mir ein Schnitzel gebacken aber da war ein Raupi drauf und bevor Oscar das Bugfixen konnte kam Alina und gab mir ein AspirinJunkie.

  • Hallo Mike280399,

    ich sehe nur eine MsgBox und danach kommt nichts mehr, es ist die Fertigmeldung. Wenn du MsgBoxen beenden willst kannst du auch einen TimeOut-Parameter setzen. Damit MsgBoxen nicht durch Userbediennung hinter dem eigentlich Anwendunsfenster verschwinden solltest du auch das Parent-Window angeben. Das ganze sähe dann bei dir so aus:

    [autoit]

    MsgBox(0, "Feddich", " Registry gesichert unter: C:\RegistryBackup",20,$Form1_1)

    [/autoit]

    Das ganze findet man übrigens in der Hilfe unter MsgBox (wo auch sonst).

    Edit: habe ich dich etwa falsch verstanden ?(

    mfg autoBert

  • So wird die GUI ausgeblendet:

    Funzt!
    Sauber, danke ! :thumbup:

    @ AutoBert: Die Gui sollte ausgeblendet werden, nich die MsgBox.... Anfängerdefinitionsfehler meinerseits :wacko:
    Danke euch :)