Jump to content

dropdown not working on windows 2000


Recommended Posts

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.

Link to comment
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.

 

Link to comment
Share on other sites

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.

Link to comment
Share on other sites

  • Developers

It didn't solve the issue. :D

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

SciTE4AutoIt3 Full installer Download page   - Beta files       Read before posting     How to post scriptsource   Forum etiquette  Forum Rules 
 
Live for the present,
Dream of the future,
Learn from the past.
  :)

Link to comment
Share on other sites

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.

Link to comment
Share on other sites

  • Developers

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²ÂÂ#Â#Â

SciTE4AutoIt3 Full installer Download page   - Beta files       Read before posting     How to post scriptsource   Forum etiquette  Forum Rules 
 
Live for the present,
Dream of the future,
Learn from the past.
  :)

Link to comment
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.

Link to comment
Share on other sites

  • 4 weeks later...

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
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...