Jump to content

Loops and increase vañues


Recommended Posts

Hi everyone, I'm new using this kind of tool and i really need your help to solve this problem...

i made this little script:

 

what i need is:

 

1. do a loops and in each loop increase the value

the color blue: increase 1 in each loop

the color red: increase 90px

the color green: increase 20px

 

is that possible?

 

sucursales()

func sucursales()
   
   ; IN THIS PART, START THE LOOP
   ; MOVIMIENTOS EN LA HOJA DE EXCEL
  MouseClick("left",475,759,1) ;abre excel 
   MouseClick("left",292,241,1) ;copia la celda
   Send("^c")
   MouseClick("left",1289,13,1);minimiza excel
   
   ; MOVIMIENTOS EN LA PAGINA OTRS
   
   MouseClick("left",505,749,1) ;abre chrome
   MouseClick("left",193,583,1) ;se posiciona en la pagina
   Send("{up 25}") ;hace 25 movimientos hacia arriba
   MouseClick("left",146,165,1);selecciona la opcione de clientes
   MouseClick("left",152,200,1); selecciona user administrator
   MouseClick("left",82,269,4) ;se posiciona en el buscador
   Sleep(130) ; se espera 130 milimesimas de segundo
   Send("^v") ; pega el texto copiado
   Send("{ENTER}"); busca
   MouseClick("left",323,293,1); selecciona la sucursal encontrada
   MouseClick("left",201,453,1) ; da clic en un espacio de la pagina para que detecte los movimientos posteriores
   Sleep(130) ; se espera 130 milimesimas de segundo
   Send("{TAB 38}") ; hace 30 tabs para llegar a la informacion de la IP de la sucursal
   Send("^c") ; copea la informacion

   ; MOVIMIENTOS EN LA HOJA DE EXCEL
   
   MouseClick("left",458,741,1) ; Regresa a la hoja de excel
   MouseClick("left",366,243,1) ; selecciona la celda donde se pegara la informacion
   Send("^v") ; se pega la informacion
   Sleep(130) ; se espera 130 milimesimas de segundo
                                                                                                                     
   ; MOVIMIENTOS EN EL INTERNET EXPLORER
   MouseClick("left",544,745,1) ; Selecciona el Internet Explorer
   Sleep(530) ; se espera 530 milimesimas de segundo
   MouseClick("left",113,38,1) ; se posiciona en la barra de direcciones del IE
   Sleep(530) ; se espera 530 milimesimas de segundo
   Send("^v") ; pega la informacion
   Send("{ENTER}") ; da enter
   Sleep(1999) ; espera a que se abra el pop-up de usuario y contraseñA
   Send("{TAB 2}") ; da dos tabs
   Send("{ENTER}") ; y da enter en el pop-up de usuario y contraseña
   Sleep(4999) ; se espera 530 milimesimas de segundo
   MouseClick("left",135,531,1) ; hace un patrol en la camara
   Sleep(15900)
   Send("{PRINTSCREEN}") ; captura de pantalla
   Sleep(2999) ;
   MouseClick("left",1275,38,1)
   Sleep(1500)
   MouseClick("left",584,748,1) ; se posiciona en microsoft outlook
   Sleep(330) ; se espera 130 milimesimas de segundo
   MouseClick("left",431,267,1)
   Send("^u") ; abre nuevo mensaje del correo electronico
   Send("{TAB 3}") ; da dos tabs
   Send("^v")
   
   MouseClick("left",462,751,1) ;abre el excel
   Sleep(180)
   MouseClick("left",629,238,1) ; selecciona el campo del correo electronico
   Send("^c")
   Sleep(330) ; se espera 130 milimesimas de segundo
   MouseMove(581,748)
   Sleep(3000)
   MouseClick("left",634,700,1)
   
   MouseClick("left",168,168,1)
   Send("^v")
   Send("{TAB 2}")
   
   
   Send("sucursal macro") ; pone titulo al correo
   Sleep(1000)
   Send("!e") ; manda el correo
   Sleep(3600)
   Send("#m")
   Sleep(3000)

 

; IN THIS PART END THE LOOP

 

 

I hope you can help me! :)

Link to comment
Share on other sites

First of all, please put your code in the code tag. It's the <> button in the top, when writing a post.

And here's a concept:

$i = 0
While 1
    $i+=1
    ConsoleWrite( "Blue: " & $i & @CRLF )
    ConsoleWrite( "Red: " & $i*90 & @CRLF )
    ConsoleWrite( "Green: " & $i*20 & @CRLF )
    If $i>10 Then ExitLoop
WEnd

 

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

  • Recently Browsing   0 members

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