input and combo

[pcjunki]

i'm trying to step up my game in the gui and scripting making, and i have this idea of pushing out software to computers on my network

my idea is just to type in a "computer" name, and have a dropdown of some simple software to pushout.

click and go

here is what i have so far

i'm not very good with variable and what not, so please be patient, i want to learn this.

#include <GUIConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Remote Push", 307, 134, 213, 146)
$Label1 = GUICtrlCreateLabel("Computer Name", 8, 8, 80, 17)
$Input1 = GUICtrlCreateInput("", 8, 24, 137, 21)
$combo = GUICtrlCreateCombo("Java Install", 152, 24, 137, 25)
$combo = GUICtrlSetData(-1, "Adobe Flash|Adobe Reader")
$Button1 = GUICtrlCreateButton("Install", 152, 48, 73, 57, 0)

GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
  Case $GUI_EVENT_CLOSE
   Exit
EndSwitch
WEnd

[JLogan3o13]

Hi, pcjunki. It looks like you are off to a good start. Do you have a specific question or problem you're running into?

[pcjunki]

so lets say i type in a computer name called "vadar1"

and i want to intall the java

which is located on \\server1\share\javainstall.exe

i would want to run this code to create a scheduled task

schtasks /create /st 09:40 /sc once /tn java /tr "\\server1\share\java.exe" /s vadar1 /ru domain\admin /rp pwd123

then execute the task

but i don't know how in autoit to pass vadar1 into the remote task i want to create

also could type in vadar2 or luke3

so i need a variable somehome, but don't know how to do it

[JLogan3o13]

Ah, ok. So you have your Input created, $Input1. What you want to look up in the help file is GuiCtrlRead. For example, try this expansion of your code. Type something in for the computer and then click the Install button.

#include <GUIConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Remote Push", 307, 134, 213, 146)
$Label1 = GUICtrlCreateLabel("Computer Name", 8, 8, 80, 17)
$Input1 = GUICtrlCreateInput("", 8, 24, 137, 21)
$combo = GUICtrlCreateCombo("Java Install", 152, 24, 137, 25)
$combo = GUICtrlSetData(-1, "Adobe Flash|Adobe Reader")
$Button1 = GUICtrlCreateButton("Install", 152, 48, 73, 57, 0)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
  Case $GUI_EVENT_CLOSE
   Exit
   Case $Button1
    MsgBox(0, "Testing", GUICtrlRead($Input1))
EndSwitch
WEnd

[pcjunki]

starting to understand and see where you are going at..woohoo

but how does it know from the combos, like if i choose java, flash, or adobe reader

[JLogan3o13]

Since $combo points to a control, you can use GUICtrlRead on it as well. I did just notice, however, that you are defining the $combo variable twice. Try giving this code a try:

#include <GUIConstants.au3>
#Region ### START
Koda GUI section ### Form=
$Form1 = GUICreate("Remote Push", 307, 134, 213, 146)
$Label1 = GUICtrlCreateLabel("Computer Name", 8, 8, 80, 17)
$Input1 = GUICtrlCreateInput("", 8, 24, 137, 21)
$combo = GUICtrlCreateCombo("Java Install", 152, 24, 137, 25)
GUICtrlSetData(-1, "Adobe Flash|Adobe Reader") ;<------------------Here you were defining $combo for a second time, which is a no-no. Call it $combo1, or just leave it blank.
$Button1 = GUICtrlCreateButton("Install", 152, 48, 73, 57, 0)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
  Case $GUI_EVENT_CLOSE
   Exit
   Case $Button1
    MsgBox(0, "Testing", GUICtrlRead($Input1) & " " & GUICtrlRead($combo)); <---This will show you how it reads both controls.
EndSwitch
WEnd

[pcjunki]

very cool, i see how that works now!

shouldn't i set a variable somehow for my installers?

i decided to go with the pstools, much easier to execute and install software

#include <GUIConstants.au3>

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

$Form1 = GUICreate("Remote Push", 307, 134, 213, 146)

$Label1 = GUICtrlCreateLabel("Computer Name", 8, 8, 80, 17)

$Input1 = GUICtrlCreateInput("", 8, 24, 137, 21)

$combo = GUICtrlCreateCombo("Java Install", 152, 24, 137, 25)

GUICtrlSetData(-1, "Adobe Flash|Adobe Reader")

$Button1 = GUICtrlCreateButton("Install", 152, 48, 73, 57, 0)

GUISetState(@SW_SHOW)

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

$java=("c:pstoolspsexec.exe" $input1 -u domainadmin -p pwd123 -c "serversharejre-7u5-windows-i586.exe" /s)

$flash=("server1shareflashinstall.exe")

$reader=("server1sharereader.exe")

While 1

$nMsg = GUIGetMsg()

Switch $nMsg

Case $GUI_EVENT_CLOSE

Exit

Case $Button1

MsgBox(0, "Testing", GUICtrlRead($Input1) & " " & GUICtrlRead($combo))

EndSwitch

WEnd

Edited August 1, 2012 by pcjunki

[JLogan3o13]

I typically like use functions with my case statements, for readability. So if I had an install for Java, one for Adobe Reader, and one for Flash, I would do it something like this. The Msgbox inside each function is just there to show you that you're pulling the correct data. You would put your install instructions as needed into each function.

#include <GUIConstants.au3>
#Region ### START Koda GUI section ### Form=

$Form1 = GUICreate("Remote Push", 307, 134, 213, 146)
$Label1 = GUICtrlCreateLabel("Computer Name", 8, 8, 80, 17)
$Input1 = GUICtrlCreateInput("", 8, 24, 137, 21)
$combo = GUICtrlCreateCombo("Java_Install", 152, 24, 137, 25)
GUICtrlSetData(-1, "Adobe_Flash|Adobe_Reader")
$Button1 = GUICtrlCreateButton("Install", 152, 48, 73, 57, 0)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
  Case $GUI_EVENT_CLOSE
   Exit
   Case $Button1
    $app = GUICtrlRead($combo)
    $pc = GUICtrlRead($Input1)
    Call($app, $pc)
EndSwitch
WEnd

Func Adobe_Flash($pc)
MsgBox(0, "", "Adobe Flash on PC " & $pc)
EndFunc

Func Adobe_Reader($pc)
MsgBox(0, "", "Adobe Reader on PC " & $pc)
EndFunc

Func Java_Install($pc)
MsgBox(0, "", "Java Install on PC " & $pc)
EndFunc

[pcjunki]

now i'm getting a Error parsing function call

(so close...this is awesome)

here's what i have so far

#include <GUIConstants.au3>

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

$Form1 = GUICreate("Remote Push", 307, 134, 213, 146)

$Label1 = GUICtrlCreateLabel("Computer Name", 8, 8, 80, 17)

$Input1 = GUICtrlCreateInput("", 8, 24, 137, 21)

$combo = GUICtrlCreateCombo("Java_Install", 152, 24, 137, 25)

GUICtrlSetData(-1, "Adobe_Flash|Adobe_Reader")

$Button1 = GUICtrlCreateButton("Install", 152, 48, 73, 57, 0)

GUISetState(@SW_SHOW)

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

While 1

$nMsg = GUIGetMsg()

Switch $nMsg

Case $GUI_EVENT_CLOSE

Exit

Case $Button1

$app = GUICtrlRead($combo)

$pc = GUICtrlRead($Input1)

Call($app, $pc)

EndSwitch

WEnd

Func Adobe_Flash($pc)

;MsgBox(0, "", "Adobe Flash on PC " & $pc)

EndFunc

Func Adobe_Reader($pc)

MsgBox(0, "", "Adobe Reader on PC " & $pc)

EndFunc

Func Java_Install($pc)

ShellExecute ("c:\pstools\psexec.exe" [,"\\$pc -u domain\user -p pwd123 -c \\server\share\jre-7u5-windows-i586.exe /s" [, "" [, "" [, ]]]] )

EndFunc

[JLogan3o13]

Hi, pcjunki. Look in your shellexecute line. You have some stray [ symbols.

Also, after the first comma in that line, you're going to want to do something like this:

instead of:

ShellExecute ("c:pstoolspsexec.exe" [,"$pc -u domainuser -p pwd123 -c serversharejre-7u5-windows-i586.exe /s" [, "" [, "" [, ]]]] )

try this, and compare to see the differences:

ShellExecute ("c:pstoolspsexec.exe" ,"" & $pc & "-u domainuser -p pwd123 -c serversharejre-7u5-windows-i586.exe /s", "", "")

[pcjunki]

i pulled a homer, and think i got it before you posted..."doh"

put now as you can see in the attached image, i get a different error

[JLogan3o13]

The thumbnail shows psexec trying to connect to the machine. Is it failing to do so? If so, is the machine pingable? Can you browse to the machine by typing in <machine>C$ in the run line?

[pcjunki]

yes the machine is on, if i run the command "manually" from a cmd, it works fine

you can see where it's tring to connect to $pc

i don't think the variable (if thats right) is passing through correctly

[BrewManNH]

pcjunki your quotes are in the wrong place.

[JLogan3o13]

pcjunki your quotes are in the wrong place.

D'oh! LOL I missed that completely. As BrewManNH pointed out, your screenshot shows you trying to connect to $pc. That means your variable is not outside the "" as it should be. Make sure you have it written as I do in post #10. If you need, repost your full code.

[pcjunki]

you guys rock btw...

i fixed the quote thing..

ShellExecute ("c:\pstools\psexec.exe" , "\\" & $pc & "-u domain\user -p pwd1234 -c \\server\share\jre-7u5-windows-i586.exe /s" , "" , "" )

now a "dos" box, (the pstools) comes up, flashes and goes away

to fast to see anything, i can't see the error from it

[pcjunki]

I GOT IT!

ShellExecute ("c:\pstools\psexec.exe" , "\\" & $pc &" -u

i was able to see that the -u was being passed off into the pcname variable

got it working!

[JLogan3o13]

Try setting the last flag in your ShellExecute to @SW_SHOW, like this:

ShellExecute ("c:pstoolspsexec.exe" ,"" & $pc & " -u domainuser -p pwd123 -c serversharejre-7u5-windows-i586.exe /s", "", "", @SW_SHOW)

If that doesn't resolve it, we may need to run it a different way. Do you see anything in your Event Viewer regarding why PSExec is failing?

[pcjunki]

i added another function to copy a file to the all users desktop (xp is the os)

but it's not copying....

Func link($pc)
   FileCopy("serversharelink with spaces.url" , "" & $pc &" c$Documents and SettingsAll UsersDesktoplink with spaces.url"  )
EndFunc

Edited August 2, 2012 by pcjunki

[pcjunki]

fixed it, i had a space

correct way is

Func link($pc)
FileCopy("[url="file://serversharelink"]serversharelink[/url] with spaces.url" , "" & $pc &"c$Documents and SettingsAll UsersDesktoplink with spaces.url" )
EndFunc

Edited August 2, 2012 by pcjunki