please tell me there is a better way to do this

akRJ · June 3, 2009

Hey guys, I have a GUI that has a lot of buttons, all of the buttons launch a vnc window to the target computer on the button. this is the code i wrote because i'm awful with arrays, i imagine there is a much easier way to do this

thanks!

Case $BtnD[1]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop1 /password "&$pass)
        Case $BtnD[2]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop2 /password "&$pass)
        Case $BtnD[3]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop3 /password "&$pass)
        Case $BtnD[4]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop4 /password "&$pass)
        Case $BtnD[5]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop5 /password "&$pass)
        Case $BtnD[6]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop6 /password "&$pass)
        Case $BtnD[7]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop7 /password "&$pass)
        Case $BtnD[8]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop8 /password "&$pass)
        Case $BtnD[9]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop9 /password "&$pass)
        Case $BtnD[10]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop10 /password "&$pass)
        Case $BtnD[11]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop11 /password "&$pass)
        Case $BtnD[12]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop12 /password "&$pass)
        Case $BtnD[13]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop13 /password "&$pass)
        Case $BtnD[14]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop14 /password "&$pass)
        Case $BtnD[15]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop15 /password "&$pass)
        Case $BtnD[16]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop16 /password "&$pass)
        Case $BtnD[17]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop17 /password "&$pass)
        Case $BtnD[18]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop18 /password "&$pass)
        Case $BtnD[19]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop19 /password "&$pass)
        Case $BtnD[20]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop20 /password "&$pass)
        Case $BtnD[21]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop21 /password "&$pass)

stampy · June 3, 2009

It's hard to tell without seeing how the other controls are handled... but assume your using $msg = GUIGetMsg() then you could use something like this...

For $i = 1 to 21
    If $msg = $BtnD[$i] Then
        Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop" & $i & " /password "&$pass)
                exitloop
    EndIf
Next

akRJ · June 4, 2009

It's hard to tell without seeing how the other controls are handled... but assume your using $msg = GUIGetMsg() then you could use something like this...

For $i = 1 to 21
    If $msg = $BtnD[$i] Then
        Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop" & $i & " /password "&$pass)
                exitloop
    EndIf
NextoÝ÷ Ûú®¢×z·¢²Ø^Â%yÊzÇ¶*'èØ§Ø^nëm¢{"ßÙe¶¼«bjkyÈµëaz¥¥«¢+Ù]¡¥±Ä(ÀÌØí¹5ÍôU%Ñ5Í ¤(MÝ¥Ñ ÀÌØí¹5Í(
ÍÀÌØíU%}Y9Q}
1=M(á¥Ð(
ÍÀÌØíÑ¹}½¹¹Ð(ÍÑ}½¹¹Ð ¤(
ÍÀÌØíÑ¹}Ý(M¡±±áÕÑ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÝ±°¹ÐÅÕ½Ðì¤(
ÍÀÌØíÑ¹}Ù¹(Ù¹}±° ¤(
ÍÀÌØíÑ¹}Á±½ä(Á±½ä ¤(
ÍÀÌØí  Ñ¹lÅt(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹áÍÑ½ÀÄ½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹lÉt(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹áÍÑ½ÀÈ½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹lÍt(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹áÍÑ½ÀÌ½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹lÑt(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹áÍÑ½ÀÐ½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹lÕt(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹áÍÑ½ÀÔ½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹lÙt(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹áÍÑ½ÀØ½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹lÝt(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹áÍÑ½ÀÜ½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹lát(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹áÍÑ½Àà½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹låt(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹áÍÑ½Àä½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹lÄÁt(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹áÍÑ½ÀÄÀ½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹lÄÅt(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹áÍÑ½ÀÄÄ½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹lÄÉt(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹áÍÑ½ÀÄÈ½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹lÄÍt(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹áÍÑ½ÀÄÌ½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹lÄÑt(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹áÍÑ½ÀÄÐ½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹lÄÕt(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹áÍÑ½ÀÄÔ½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹lÄÙt(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹áÍÑ½ÀÄØ½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹lÄÝt(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹áÍÑ½ÀÄÜ½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹lÄát(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹áÍÑ½ÀÄà½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹lÄåt(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹áÍÑ½ÀÄä½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹lÈÁt(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹áÍÑ½ÀÈÀ½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹lÈÅt(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹áÍÑ½ÀÈÄ½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹lÈÉt(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹áÍÑ½ÀÈÈ½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹lÈÍt(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹áÍÑ½ÀÈÌ½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹lÈÑt(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹áÍÑ½ÀÈÐ½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹lÈÕt(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹áÍÑ½ÀÈÔ½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹lÈÙt(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹áÍÑ½ÀÈØ½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹lÈÝt(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹áÍÑ½ÀÈÜ½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹lÈát(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹áÍÑ½ÀÈà½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹lÈåt(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹áÍÑ½ÀÈä½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹lÌÁt(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹áÍÑ½ÀÌÀ½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹lÌÅt(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹áÍÑ½ÀÌÄ½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹lÌÉt(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹áÍÑ½ÀÌÈ½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹lÌÍt(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹áÍÑ½ÀÌÌ½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹lÌÑt(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹áÍÑ½ÀÌÐ½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹lÌÕt(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹áÍÑ½ÀÌÔ½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹lÌÙt(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹áÍÑ½ÀÌØ½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹lÌÝt(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹áÍÑ½ÀÌÜ½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹lÌát(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹áÍÑ½ÀÌà½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹lÌåt(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹áÍÑ½ÀÌä½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹lÐÁt(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹áÍÑ½ÀÐÀ½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹lÐÅt(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹áÍÑ½ÀÐÄ½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹lÐÉt(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹áÍÑ½ÀÐÈ½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹lÐÍt(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹áÍÑ½ÀÐÌ½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹lÐÑt(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹áÍÑ½ÀÐÐ½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹lÐÕt(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹áÍÑ½ÀÐÔ½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹lÐÙt(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹áÍÑ½ÀÐØ½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹lÐÝt(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹áÍÑ½ÀÐÜ½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹lÐát(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹áÍÑ½ÀÐà½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹lÐåt(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹áÍÑ½ÀÐä½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹lÔÁt(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹áÁÐÄÈ½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹1lÅt(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹á±ÁÑ½ÀÄ½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹1lÉt(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹á±ÁÑ½ÀÈ½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹1lÍt(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹á±ÁÑ½ÀÌ½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹1lÑt(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹á±ÁÑ½ÀÐ½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹1lÕt(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹á±ÁÑ½ÀÔ½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹1lÙt(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹á±ÁÑ½ÀØ½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹1lÝt(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹á±ÁÑ½ÀÜ½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹1lát(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹á±ÁÑ½Àà½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹1låt(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹á±ÁÑ½Àä½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹1lÄÁt(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹á±ÁÑ½ÀÄÀ½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹1lÄÅt(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹á±ÁÑ½ÀÄÄ½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹1lÄÉt(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹á±ÁÑ½ÀÄÈ½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹1lÄÍt(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹á±ÁÑ½ÀÄÌ½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹1lÄÑt(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹á±ÁÑ½ÀÄÐ½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹1lÄÕt(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹á±ÁÑ½ÀÄÔ½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹1lÄÙt(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹á±ÁÑ½ÀÄØ½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹1lÄÝt(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹á±ÁÑ½ÀÄÜ½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹1lÄát(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹á±ÁÑ½ÀÄà½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹1lÄåt(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹á±ÁÑ½ÀÄä½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹1lÈÁt(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹á±ÁÑ½ÀÈÀ½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹1lÈÅt(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹á±ÁÑ½ÀÈÄ½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹1lÈÉt(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹á±ÁÑ½ÀÈÈ½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹1lÈÍt(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹á±ÁÑ½ÀÈÌ½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹1lÈÑt(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹á±ÁÑ½ÀÈÐ½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ¤(
ÍÀÌØí  Ñ¹1lÈÕt(IÕ¸ ÅÕ½ÐìÀäÈìÀäÈìÅÕ½ÐìµÀìÀÌØí±½¥¹MÉÙÈµÀìÅÕ½ÐìÀäÈíQµÀÀäÈíÁÐÀäÈíÙ¹Ù¥ÝÈ¹á±ÁÑ½ÀÈÔ½ÁÍÍÝ½ÉÅÕ½ÐìµÀìÀÌØíÁÍÌ

akRJ · June 4, 2009

its really cumbersome I know

stampy · June 4, 2009

Wouldn't it be better to use a drop down and just a go button?

akRJ · June 4, 2009

yeah, but it would sort of defeat the point, i guess now its hard to see what i'm doing without the whole code, here it is:

#cs ----------------------------------------------------------------------------

 AutoIt Version: 3.3.0.0
 Author:         myName

 Script Function:
    Template AutoIt script.

#ce ----------------------------------------------------------------------------

; Script Start - Add your code below here

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>

Dim $i = 1
Dim $response, $reponse
Dim $label

Global $BtnD[51], $BtnL[26], $left = 40, $top = 8, $Cnt = 0, $a, $b

$loginServer = InputBox("PDC","Please enter the login server for this site","server01")
$pass = InputBox("VNC password", "Enter the vnc password for this location", "******")

FileWriteLine("Login_server.txt",$loginServer)
DirCreate("\\"&$loginServer&"\temp\dpt\maintenance\"&@MON&"-"&@MDAY&"-"&@YEAR)
$Form1 = GUICreate("Maintenance Console ", 882, 701, 193, 115)
$Group1 = GUICtrlCreateGroup("PCs", 192, 8, 689, 649)

For $ii = 1 To 3
    $top = 8
    $left += 160
    For $x = 1 To 25
        $top += 24
        If $ii >= 3 Then
           
           $BtnL[$x] = GUICtrlCreateButton("Laptop " & $x, $left, $top, 89, 17, 0)
        Else
            
            If $ii >= 2 Then $Cnt = 25
            $BtnD[$x + $Cnt] = GUICtrlCreateButton("Desktop " & $x + $Cnt, $left, $top, 89, 17, 0)
        EndIf
    Next
Next

$btn_wake = GUICtrlCreateButton("Wake all PCs", 0, 136, 185, 65, 0)
$btn_connect = GUICtrlCreateButton("Establish Connection", 0, 232, 185, 65, 0)
$btn_deploy = GUICtrlCreateButton("Deploy Client", 0, 424, 185, 65, 0)
$btn_vnc = GUICtrlCreateButton("VNC all PCs", 0, 328, 185, 65, 0)
GUISetState(@SW_SHOW)

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $btn_connect
            est_connect()
        Case $btn_wake
            ShellExecute("\\"&$loginServer&"\Temp\dpt\wakeall.bat")
        Case $btn_vnc
            vnc_all()
        Case $btn_deploy
            deploy() 
        Case $BtnD[1]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop1 /password "&$pass)
        Case $BtnD[2]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop2 /password "&$pass)
        Case $BtnD[3]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop3 /password "&$pass)
        Case $BtnD[4]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop4 /password "&$pass)
        Case $BtnD[5]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop5 /password "&$pass)
        Case $BtnD[6]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop6 /password "&$pass)
        Case $BtnD[7]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop7 /password "&$pass)
        Case $BtnD[8]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop8 /password "&$pass)
        Case $BtnD[9]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop9 /password "&$pass)
        Case $BtnD[10]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop10 /password "&$pass)
        Case $BtnD[11]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop11 /password "&$pass)
        Case $BtnD[12]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop12 /password "&$pass)
        Case $BtnD[13]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop13 /password "&$pass)
        Case $BtnD[14]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop14 /password "&$pass)
        Case $BtnD[15]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop15 /password "&$pass)
        Case $BtnD[16]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop16 /password "&$pass)
        Case $BtnD[17]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop17 /password "&$pass)
        Case $BtnD[18]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop18 /password "&$pass)
        Case $BtnD[19]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop19 /password "&$pass)
        Case $BtnD[20]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop20 /password "&$pass)
        Case $BtnD[21]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop21 /password "&$pass)
        Case $BtnD[22]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop22 /password "&$pass)
        Case $BtnD[23]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop23 /password "&$pass)
        Case $BtnD[24]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop24 /password "&$pass)
        Case $BtnD[25]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop25 /password "&$pass)
        Case $BtnD[26]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop26 /password "&$pass)
        Case $BtnD[27]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop27 /password "&$pass)
        Case $BtnD[28]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop28 /password "&$pass)
        Case $BtnD[29]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop29 /password "&$pass)
        Case $BtnD[30]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop30 /password "&$pass)
        Case $BtnD[31]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop31 /password "&$pass)
        Case $BtnD[32]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop32 /password "&$pass)
        Case $BtnD[33]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop33 /password "&$pass)
        Case $BtnD[34]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop34 /password "&$pass)
        Case $BtnD[35]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop35 /password "&$pass)
        Case $BtnD[36]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop36 /password "&$pass)
        Case $BtnD[37]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop37 /password "&$pass)
        Case $BtnD[38]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop38 /password "&$pass)
        Case $BtnD[39]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop39 /password "&$pass)
        Case $BtnD[40]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop40 /password "&$pass)
        Case $BtnD[41]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop41 /password "&$pass)
        Case $BtnD[42]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop42 /password "&$pass)
        Case $BtnD[43]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop43 /password "&$pass)
        Case $BtnD[44]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop44 /password "&$pass)
        Case $BtnD[45]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop45 /password "&$pass)
        Case $BtnD[46]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop46 /password "&$pass)
        Case $BtnD[47]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop47 /password "&$pass)
        Case $BtnD[48]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop48 /password "&$pass)
        Case $BtnD[49]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop49 /password "&$pass)
        Case $BtnD[50]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe desktop50 /password "&$pass)
        Case $BtnL[1]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe laptop1 /password "&$pass)
        Case $BtnL[2]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe laptop2 /password "&$pass)
        Case $BtnL[3]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe laptop3 /password "&$pass)
        Case $BtnL[4]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe laptop4 /password "&$pass)
        Case $BtnL[5]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe laptop5 /password "&$pass)
        Case $BtnL[6]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe laptop6 /password "&$pass)
        Case $BtnL[7]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe laptop7 /password "&$pass)
        Case $BtnL[8]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe laptop8 /password "&$pass)
        Case $BtnL[9]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe laptop9 /password "&$pass)
        Case $BtnL[10]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe laptop10 /password "&$pass)
        Case $BtnL[11]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe laptop11 /password "&$pass)
        Case $BtnL[12]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe laptop12 /password "&$pass)
        Case $BtnL[13]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe laptop13 /password "&$pass)
        Case $BtnL[14]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe laptop14 /password "&$pass)
        Case $BtnL[15]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe laptop15 /password "&$pass)
        Case $BtnL[16]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe laptop16 /password "&$pass)
        Case $BtnL[17]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe laptop17 /password "&$pass)
        Case $BtnL[18]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe laptop18 /password "&$pass)
        Case $BtnL[19]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe laptop19 /password "&$pass)
        Case $BtnL[20]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe laptop20 /password "&$pass)
        Case $BtnL[21]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe laptop21 /password "&$pass)
        Case $BtnL[22]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe laptop22 /password "&$pass)
        Case $BtnL[23]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe laptop23 /password "&$pass)
        Case $BtnL[24]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe laptop24 /password "&$pass)
        Case $BtnL[25]
            Run("\\"&$loginServer&"\Temp\dpt\vncviewer.exe laptop25 /password "&$pass)
    
    EndSwitch
    
WEnd

Func est_connect()
    $i = 1
    Do
        $reponse = Ping("desktop"&$i, 1000)
   
        ;MsgBox(1,"",$reponse&" "&@error)
        If $reponse >= 1 Then
   
            GUICtrlSetBkColor($BtnD[$i], 0x00FF00)
        ElseIf @error = 1 Then
            GUICtrlSetBkColor($BtnD[$i], 0xFF0000)
        ElseIf @error = 3 Then
            GUICtrlSetBkColor($BtnD[$i], 0xFFFF00)
        ElseIf $reponse = 0 AND @error = 4 Then
            GUICtrlSetBkColor($BtnD[$i], 0xFFFF00)
        ;Else
            ;MsgBox(4096, "Error", $reponse)
        EndIf
        $i = $i + 1
    Until $i = 51
    
        $i = 1
    Do
        $reponse = Ping("laptop"&$i, 1000)
   
        ;MsgBox(1,"",$reponse&" "&@error)
        If $reponse >= 1 Then
      
            GUICtrlSetBkColor($BtnL[$i], 0x00FF00)
        ElseIf @error = 1 Then
            GUICtrlSetBkColor($BtnL[$i], 0xFF0000)
        ElseIf @error = 3 Then
            GUICtrlSetBkColor($BtnL[$i], 0xFFFF00)
        ElseIf $reponse = 0 AND @error = 4 Then
            GUICtrlSetBkColor($BtnL[$i], 0xFFFF00)
        ;Else
            ;MsgBox(4096, "Error", $reponse)
        EndIf
        $i = $i + 1
    Until $i = 26
    
EndFunc   ;==>est_connect

Func vnc_all()
        
    $ip = @IPAddress1
    $ip = StringLeft($ip, 11)
    Run(@ComSpec & " /c" & "\\"&$loginServer&"\Temp\dpt\vncall.bat"&" "&$ip&" "&$pass)

EndFunc

Func deploy()
    $i = 1
    Do
        FileCopy("\\"&$loginServer&"\temp\dpt\maintenance\Login_server.txt","C:\dpt", 1)
        FileCopy("\\"&$loginServer&"\temp\dpt\maintenance\maintenance_client.exe","\\desktop"&$i&"\c$\Documents and Settings\All Users\Start Menu\Programs\Startup", 1)
        $i = $i + 1
    Until $i = 51

    $i = 1
    Do
        FileCopy("Login_server.txt","\\laptop"&$i&"\c$\dpt", 1)
        FileCopy("maintenance_client.exe","\\laptop"&$i&"\c$\Documents and Settings\All Users\Start Menu\Programs\Startup", 1)
        $i = $i + 1
    
    Until $i = 26

EndFunc

it shows you what computers are online after hiting the establish connection button, and then from there you can click the computer to VNC it

Sign In

please tell me there is a better way to do this

Recommended Posts

akRJ

Link to comment

Share on other sites

stampy

Link to comment

Share on other sites

akRJ

Link to comment

Share on other sites

akRJ

Link to comment

Share on other sites

stampy

Link to comment

Share on other sites

akRJ

Link to comment

Share on other sites

Create an account or sign in to comment

Create an account

Sign in

Recently Browsing 0 members

Browse

AutoIt Resources

Release

Beta