why won't this work?!

[BillLuvsU 8]

why won't this script work, it never sends but it works with the message box.

expandcollapse popup

$vare1 = 1
$vare2 = 1
$vare3 = 1
$vare4 = 1
$vare5 = 1
$vare6 = 1
$vare7 = 1
$vare8 = 1
$vare9 = 1
$vare10 = 1
$vare11 = 1
$vare12 = 1
$vare13 = 1
$vare14 = 1
$vare15 = 1
$vare16 = 1
$vare17 = 1
$vare18 = 1
$vare19 = 1
$vare20 = 1
$vare21 = 1
$vis=0
while $vis=0
   $vis=ControlCommand ( "Macromedia Product Activation", "", "Button2", "IsEnabled", "" )
   $vare1=num($vare1,"Edit1") 
   $vare2=num($vare2,"Edit1") 
   $vare3=num($vare3,"Edit1")
   $vare4=num($vare4,"Edit1")
   $vare5=num($vare5,"Edit1")
   $vare6=num($vare6,"Edit1")
   $vare7=num($vare7,"Edit2") 
   $vare8=num($vare8,"Edit2") 
   $vare9=num($vare9,"Edit2") 
   $vare10=num($vare10,"Edit2") 
   $vare11=num($vare11,"Edit2") 
   $vare12=num($vare12,"Edit3") 
   $vare13=num($vare13,"Edit3") 
   $vare14=num($vare14,"Edit3") 
   $vare15=num($vare15,"Edit3") 
   $vare16=num($vare16,"Edit3") 
   $vare17=num($vare17,"Edit4") 
   $vare18=num($vare18,"Edit4") 
   $vare19=num($vare19,"Edit4") 
   $vare20=num($vare20,"Edit4") 
   $vare21=num($vare21,"Edit4") 
   ControlSend ( "Macromedia Product Activation", "", "Edit1", "{bs}{bs}{bs}{bs}{bs}{bs}{del}{del}{del}{del}{del}{del}" )
   ControlSend ( "Macromedia Product Activation", "", "Edit2", "{bs}{bs}{bs}{bs}{bs}{del}{del}{del}{del}{del}" )
   ControlSend ( "Macromedia Product Activation", "", "Edit3", "{bs}{bs}{bs}{bs}{bs}{del}{del}{del}{del}{del}" )
   ControlSend ( "Macromedia Product Activation", "", "Edit4", "{bs}{bs}{bs}{bs}{bs}{del}{del}{del}{del}{del}" )
wend

func num($var1,$ctrl)
   $test = 0
   select
      case $var1 = 1
         $test=ControlSend ( "Macromedia Product Activation","","$ctrl","A")
      case $var1 = 2
         $test=ControlSend ( "Macromedia Product Activation", "", "$ctrl", "B" )
      case $var1 = 3
         $test=ControlSend ( "Macromedia Product Activation", "", "$ctrl", "1" )
      case $var1 = 4
         $test=ControlSend ( "Macromedia Product Activation", "", "$ctrl", "D" )
      case $var1 = 5
         $test=ControlSend ( "Macromedia Product Activation", "", "$ctrl", "E" )
      case $var1 = 6
         $test=ControlSend ( "Macromedia Product Activation", "", "$ctrl", "2" )
      case $var1 = 7
         $test=ControlSend ( "Macromedia Product Activation", "", "$ctrl", "F" )
      case $var1 = 8
         $test=ControlSend ( "Macromedia Product Activation", "", "$ctrl", "G" )
      case $var1 = 9
         $test=ControlSend ( "Macromedia Product Activation", "", "$ctrl", "3" )
      case $var1 = 10
         $test=ControlSend ( "Macromedia Product Activation", "", "$ctrl", "H" )
      case $var1 = 11
         $test=ControlSend ( "Macromedia Product Activation", "", "$ctrl", "I" )
      case $var1 = 12
         $test=ControlSend ( "Macromedia Product Activation", "", "$ctrl", "4" )
      case $var1 = 13
         $test=ControlSend ( "Macromedia Product Activation", "", "$ctrl","W" )
      case $var1 = 14
         $test=ControlSend ( "Macromedia Product Activation", "", "$ctrl", "K" )
      case $var1 = 15
         $test=ControlSend ( "Macromedia Product Activation", "", "$ctrl", "5" )
      case $var1 = 16
         $test=ControlSend ( "Macromedia Product Activation", "", "$ctrl", "L" )
      case $var1 = 17
         $test=ControlSend ( "Macromedia Product Activation", "", "$ctrl", "M" )
      case $var1 = 18
         $test=ControlSend ( "Macromedia Product Activation", "", "$ctrl", "6" )
      case $var1 = 19
         $test=ControlSend ( "Macromedia Product Activation", "", "$ctrl", "N" )
      case $var1 = 20
         $test=ControlSend ( "Macromedia Product Activation", "", "$ctrl", "O" )
      case $var1 = 21
         $test=ControlSend ( "Macromedia Product Activation", "", "$ctrl", "7" )
      case $var1 = 22
         $test=ControlSend ( "Macromedia Product Activation", "", "$ctrl", "P" )
      case $var1 = 23
         $test=ControlSend ( "Macromedia Product Activation", "", "$ctrl", "Q" )
      case $var1 = 24
         $test=ControlSend ( "Macromedia Product Activation", "", "$ctrl", "8" )
      case $var1 = 25
         $test=ControlSend ( "Macromedia Product Activation", "", "$ctrl", "Z" )
      case $var1 = 26
         $test=ControlSend ( "Macromedia Product Activation", "", "$ctrl", "S" )
      case $var1 = 27
         $test=ControlSend ( "Macromedia Product Activation", "", "$ctrl", "9" )
      case $var1 = 28
         $test=ControlSend ( "Macromedia Product Activation", "", "$ctrl", "T" )
      case $var1 = 29
         $test=ControlSend ( "Macromedia Product Activation", "", "$ctrl", "U" )
      case $var1 = 30
         $test=ControlSend ( "Macromedia Product Activation", "", "$ctrl", "0" )
      case $var1 = 31
         $test=ControlSend ( "Macromedia Product Activation", "", "$ctrl", "V" )
      case $var1 = 32
         $test=ControlSend ( "Macromedia Product Activation", "", "$ctrl", "J" )
      case $var1 = 33
         $test=ControlSend ( "Macromedia Product Activation", "", "$ctrl", "X" )
      case $var1 = 34
         $test=ControlSend ( "Macromedia Product Activation", "", "$ctrl", "Y" )
      case $var1 = 35
         $test=ControlSend ( "Macromedia Product Activation", "", "$ctrl", "R" )
      case $var1 = 36
         $test=ControlSend ( "Macromedia Product Activation", "", "$ctrl", "C" )
      case $test = 0 
         msgbox(0,"jfgaj","hdsafdh")
   endselect
   return $var1+1
endfunc

[Helge 3]

I've also tried something like that, and what I had a problem with was that

the main installation window and the window that the serial should be inputted

had the same title which resulted that the script failed..

(Actually I just guess that was the problem in my case and I didn't bothered

to use much more time on it since it wasn't all that useful for me after all)

If that's also the situation in your case then that's might be the problem.

This can probably be easily solved but I'm unable to test or assist you at the moment.

Sorry and good luck !

[BillLuvsU 8]

Thanks, but when I use the ctrl send func in different scripts by itself like:

ControlSend ( "Macromedia Product Activation", "", "edit1", "C" )

it works fine

[BillLuvsU 8]

Somebody HELP!!! PLEASE!!! I need this program for school, badly!

[BillLuvsU 8]

if any1 figures it out please mail me