Sign in to follow this  
Followers 0
mike1305

dropdown not working on windows 2000

12 posts in this topic

I created a dropdown menu for selecting installation files on a network. I created and ran the script on Windows XP MCE, and when I transferred it to a win2k machine to test it, the dropdown menu would not work. No error, but nothing would happen when I pressed the arrow. Any thoughts? I am using autoIt 3.1.


Amp Energy Drink: the official sponsor of me scripting at 2AM.

Share this post


Link to post
Share on other sites



I created a dropdown menu for selecting installation files on a network. I created and ran the script on Windows XP MCE, and when I transferred it to a win2k machine to test it, the dropdown menu would not work. No error, but nothing would happen when I pressed the arrow. Any thoughts? I am using autoIt 3.1.

this a menu or a combo box, if combo box just change the height to 100 or more


SciTE for AutoItDirections for Submitting Standard UDFs

 

Don't argue with an idiot; people watching may not be able to tell the difference.

 

Share this post


Link to post
Share on other sites

#3 ·  Posted (edited)

whoops, here's the code...

by the way this is just a small bit of a larger code.

#Include <GUIConstants.au3>


GUICreate ( "Programs", 250, 275)

GUICtrlCreateLabel ("These programs require attention.", 10, 10, 200, 20)
GUICtrlCreateInput ("", 10, 35, 200, 100, $ES_MULTILINE)
GUICtrlSetState (-1, $GUI_FOCUS)


$combo=GUICtrlCreateCombo ( "Select Program", 10, 210, 200, 10)

GUICtrlSetData ( -1, "Adobe Standard 6.0|Remove Project 98|Prolog Manager 7.2|Prolog Manager 7.2 SP2|Citrix 7.1|Remote Agent Install|Screwdrivers|Timberline Accounting 9.1|Estimating 7.1.3|Logon Script", "Select Program")

global $notes

$notes = GUICtrlCreateButton ("Notes", 30, 150, 50, 30)
$okbutton=GUICtrlCreateButton ("Go!",  10, 240, 50, 30)
$cancelbutton=GUICtrlCreateButton ( "Cancel",  80, 240, 50, 30)

GUISetState ()

$msg = GUIGetMsg()

While 1
     $msg = GUIGetMsg()

     Select
       Case $msg= $GUI_EVENT_CLOSE
         ExitLoop

       Case $msg = $notes 
         MsgBox(4096, "Notes", "This program is not able to tell the version number for Prolog Manager, Timberline, or Trend Micro.  This will also not check if all device drivers are installed, whether the computer is on the domain, or if the computer's name is correct.  Being off the domain may lead to a username/password prompt popping up several times throughout the initial scan process.")
       Case $msg = $okbutton
         $data = GUICtrlRead($combo)
       
         If $data="Select Program" then 
           msgbox(4096, "Error", "Please select a program to (un)install.")
         ElseIf $data="Adobe Standard 6.0" then 
       Send ("{LWINDOWN}r{LWINUP}")
       WinWaitActive("Run")
           run("\\rminas\software\Adobe\Acrobat Reader\AdbeRdr60_enu_full.exe")
         ElseIf $data="Remove Project 98" then 
           run("\\rminas\Software\Project 98\SETUP.EXE")
         ElseIf $data="Prolog Manager 7.2" then
           run("\\rminas\Software\Meridian\Prolog 7.20\PM720\setup.exe")
         ElseIf $data="Prolog Manager 7.2 SP2" then 
           run ("\\rminas\Software\Meridian\Prolog 7.20\PM720SP2\PM72SP2.msp")
         ElseIf $data="Citrix 7.1" then 
           run ("\\rminas\Software\Citrix\Citrix ICA Client\Citrix ICA Client 7.100\ica32.exe")
         ElseIf $data="Remote Agent Install" then
           run("\\rminas\Software\Trend Micro\RMI-OfficeScan-StandAlone\RA-Internet.exe")
         ElseIf $data="Screwdrivers" then 
           run("\\rminas\Software\Screwdrivers\3.5.6.5\ScrewDrivers Client v3.56 (search).exe")
         ElseIf $data="Timberline Accounting 9.1" then 
           run("T:\Timberline\WININST\install.exe")
         ElseIf $data="Estimating 7.1.3" then 
           run("\\rminas\Software\Timberline Applications\Estimating\launch.exe")
         ElseIf $data="Logon Script" then
       Send("{LWINDOWN}r{LWINUP}")
       WinWaitActive("Run")
           Send("\\Rmisrv1\NETLOGON\E-users.bat")
         EndIf
       
       Case $msg = $cancelbutton
         ExitLoop
     EndSelect

Wend

also on another note, how can I get non-executables to open without opening the windows run command and sending the file's location?

Edited by mike1305

Amp Energy Drink: the official sponsor of me scripting at 2AM.

Share this post


Link to post
Share on other sites

More details:

The combo box, when the arrow is pressed, only shows a black line under the box.

Posted Image

as opposed to this on my XP machine:

Posted Image


Amp Energy Drink: the official sponsor of me scripting at 2AM.

Share this post


Link to post
Share on other sites

gafrost already replied a solution to that.

this a menu or a combo box, if combo box just change the height to 100 or more

Share this post


Link to post
Share on other sites

gafrost already replied a solution to that.

It didn't solve the issue. :D


Amp Energy Drink: the official sponsor of me scripting at 2AM.

Share this post


Link to post
Share on other sites

#8 ·  Posted (edited)

show the modified code and lets see if we can replicate your issue ....

#Include <GUIConstants.au3>


GUICreate ( "Programs", 250, 275)

GUICtrlCreateLabel ("These programs require attention.", 10, 10, 200, 20)
GUICtrlCreateInput ("", 10, 35, 200, 100, $ES_MULTILINE)
GUICtrlSetState (-1, $GUI_FOCUS)

;THIS CREATES THE COMBO BOX TO SELECT THE INSTALLATION FILE.
$combo=GUICtrlCreateCombo ( "Select Program", 10, 210, 200, 1000)

GUICtrlSetData ( -1, "Adobe Standard 6.0|Remove Project 98|Prolog Manager 7.2|Prolog Manager 7.2 SP2|Citrix 7.1|Remote Agent Install|Screwdrivers|Timberline Accounting 9.1|Estimating 7.1.3|Logon Script", "Select Program")


$okbutton=GUICtrlCreateButton ("Go!",  10, 240, 50, 30)
$cancelbutton=GUICtrlCreateButton ( "Cancel",  80, 240, 50, 30)

GUISetState ()

$msg = GUIGetMsg()

While 1
     $msg = GUIGetMsg()

     Select
       Case $msg= $GUI_EVENT_CLOSE
         ExitLoop

       Case $msg = $okbutton
         $data = GUICtrlRead($combo)
       
         If $data="Select Program" then 
           msgbox(4096, "Error", "Please select a program to (un)install.")
         ElseIf $data="Adobe Standard 6.0" then 
           run("\\rminas\software\Adobe\Acrobat Reader\AdbeRdr60_enu_full.exe")
         ElseIf $data="Remove Project 98" then 
           run("\\rminas\Software\Project 98\SETUP.EXE")
         ElseIf $data="Prolog Manager 7.2" then
           run("\\rminas\Software\Meridian\Prolog 7.20\PM720\setup.exe")
         ElseIf $data="Prolog Manager 7.2 SP2" then 
           run ("\\rminas\Software\Meridian\Prolog 7.20\PM720SP2\PM72SP2.msp")
         ElseIf $data="Citrix 7.1" then 
           run ("\\rminas\Software\Citrix\Citrix ICA Client\Citrix ICA Client 7.100\ica32.exe")
         ElseIf $data="Remote Agent Install" then
           run("\\rminas\Software\Trend Micro\RMI-OfficeScan-StandAlone\RA-Internet.exe")
         ElseIf $data="Screwdrivers" then 
           run("\\rminas\Software\Screwdrivers\3.5.6.5\ScrewDrivers Client v3.56 (search).exe")
         ElseIf $data="Timberline Accounting 9.1" then 
           run("T:\Timberline\WININST\install.exe")
         ElseIf $data="Estimating 7.1.3" then 
           run("\\rminas\Software\Timberline Applications\Estimating\launch.exe")
         ElseIf $data="Logon Script" then
       Run("\\Rmisrv1\NETLOGON\E-users.bat{ENTER}")
         EndIf
       
       Case $msg = $cancelbutton
         ExitLoop
     EndSelect

WendoÝ÷ Ù¨x­Âä²z)®åzj'Z)Ý£

is there no easier way?

Edited by mike1305

Amp Energy Drink: the official sponsor of me scripting at 2AM.

Share this post


Link to post
Share on other sites

again, it works no problem on Windows XP MCE 2005, but on 2000Pro it doesn't like the combo box. (notice my gross overcompensation made no change! It was "10" before.)

I also have a side question: notice how the installation file for one of the selections is a .msp file? How would I utilize autoit to get programs such as that, or .msi installation files for example, to execute? the "run" command does not support those filetypes. for now I am using this:

Send("{LWINDOWN}r{LWINUP}")
WinWaitActive("Run")
Send("\\example\this_file.msi{ENTER}")
oÝ÷ Ú+-êÞ²'«Á¬¿ªê-y7¬µçhh§ÚD®÷«jwmëj·¦Éø§v)à±8b±Ø¬¦V²³*.­ê뢹èvº)v'jëh×6$combo=GUICtrlCreateCombo ( "Select Program", 10, 210, 200, 10)oÝ÷ Ù8^±æè¶(®Gâ殶­sbb33c¶6öÖ&óÔuT7G&Ä7&VFT6öÖ&ògV÷Cµ6VÆV7B&öw&ÒgV÷C²ÂÂ#Â#¢b33c¶6öÖ&óÔuT7G&Ä7&VFT6öÖ&ògV÷Cµ6VÆV7B&öw&ÒgV÷C²ÂÂ#Â#Â

Visit the SciTE4AutoIt3 Download page for the latest versions        Beta files                                                          Forum Rules
 
Live for the present,
Dream of the future,
Learn from the past.
  :)

Share this post


Link to post
Share on other sites

Tested on Win2k Server and these are my findings:

This displays your error ... no dropdown

$combo=GUICtrlCreateCombo ( "Select Program", 10, 210, 200, 10)oÝ÷ Ù8^±æè¶(®Gâ殶­sbb33c¶6öÖ&óÔuT7G&Ä7&VFT6öÖ&ògV÷Cµ6VÆV7B&öw&ÒgV÷C²ÂÂ#Â#¢b33c¶6öÖ&óÔuT7G&Ä7&VFT6öÖ&ògV÷Cµ6VÆV7B&öw&ÒgV÷C²ÂÂ#Â#Â
:D

I will try again.

thanks for the feedback!


Amp Energy Drink: the official sponsor of me scripting at 2AM.

Share this post


Link to post
Share on other sites

Sorry for all the confusion. it's working just fine in windows 2000 now! yippee!!!


Amp Energy Drink: the official sponsor of me scripting at 2AM.

Share this post


Link to post
Share on other sites

Gotta love search. It kept me from creating this thread. Any way this info could be clearer in the help file?

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!


Register a new account

Sign in

Already have an account? Sign in here.


Sign In Now
Sign in to follow this  
Followers 0