Need help with one program

[akira2891]

Hi all im new in autoit so i want to know can i make something like this look on pic

So i want when i choose programs and click on Start button to make install program 1 by 1 and in silent mode not to click next next etc...

Can someone make me a little code with 1,2 programs just to see example. Thanks in advance

[TheSaint]

@ akira2891 - Someone could and someone probably will, but you would be better served to do a few of the >tutorials available here at the Forum (Examples section), and investigate some of the Examples in your AutoIt install folder, using the wonderful and enlightening Help file during the process.

Edited July 7, 2013 by TheSaint

[water]

Please have a look at the >Vollatran project. Maybe it already does what you are looking for or at least gives so some ideas.

Edited July 7, 2013 by water

[akira2891]

ok thx water i think its that what i need

[akira2891]

So i need a bit help i made this and works good but when i cancel instalation of 1 program it goes to another as it need to, but when i cancel instalation on last file i get Msg 

Msgbox(0, "Error", "Please select programs to install", 0)

i just tested on 2 programs and works fine

here is code

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
         Case $Button1
            If _listPrograms() = 0 Then
               Msgbox(0, "Error", "Please select programs to install", 0)
            EndIf

    EndSwitch
WEnd

Func _listPrograms()

         If GUICtrlRead($winamp) = 1 Then
            ShellExecuteWait(@DesktopDir & "\Silent Auto Instaler\Programs\winamp_v.5.63.exe")
         EndIf

         If GUICtrlRead($klitecodecpack) = 1 Then
            ShellExecuteWait(@DesktopDir & "\Silent Auto Instaler\Programs\k_Lite_codec_pack_8.60_Full.exe")
         EndIf
EndFunc

and do i make this good or on bad way ?

[TheSaint]

You are kind of on the right track, but here is a more effective but simple way.

Global $installed

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $Button1
                    $installed = ""
                    _listPrograms()
                    If $installed = "" Then
               Msgbox(0, "Error", "Please select programs to install", 0)
                    EndIf

    EndSwitch
WEnd

Func _listPrograms()

    If GUICtrlRead($winamp) = 1 Then
            ShellExecuteWait(@DesktopDir & "\Silent Auto Instaler\Programs\winamp_v.5.63.exe")
            $installed = 1
    EndIf

        If GUICtrlRead($klitecodecpack) = 1 Then
            ShellExecuteWait(@DesktopDir & "\Silent Auto Instaler\Programs\k_Lite_codec_pack_8.60_Full.exe")
            $installed = 1
        EndIf
EndFunc

Sorry about the way this forum formats things ... very annoying without TAB.

Edited July 7, 2013 by TheSaint

[water]

ShellExecuteWait returns the exit code of the program that was run. So you need to check if the program you run returns a different value if cancelled.

Edited July 7, 2013 by water

[akira2891]

@TheSaint thnx your code work fine and now no error

@water how to do that ? but is that needed if code work fine and without error now ?

[water]

If your script now does what you need then just forget my post