login send data in koda and autoit

[EvandroAguiar]

I need help from you guys, I made a login system, designed in koda, and made a programming in autoit, however I can not in any way to send the input data to the site in the fields and enter the webmail .... help me !!!!

#include <GUIConstants.au3>

 

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

$Form1 = GUICreate("Form1", 211, 143, 659, 618)

$username = GUICtrlCreateInput("", 64, 24, 129, 21)

$pass = GUICtrlCreateInput("", 64, 56, 129, 21)

$Label1 = GUICtrlCreateLabel("login", 16, 24, 33, 17)

$Label2 = GUICtrlCreateLabel("senha", 16, 56, 33, 17)

$button = GUICtrlCreateButton("Button1", 64, 96, 81, 33, 0)

GUISetState(@SW_SHOW)

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

 

 

 

 

While 1

    $nMsg = GUIGetMsg()

    Switch $nMsg

        Case $GUI_EVENT_CLOSE

            Exit

        Case $button

                ControlFocus($Form1,"","Edit2")

ShellExecute ("http://webmail.quattropublicidades.com.br/cpsess5135348607/3rdparty/roundcube/?_task=mail")

                  Send("Login no Webmail","user","",$username)

                  Send("Login no Webmail","user","","{TAB}")

                  Send("Login no Webmail","pass","",$pass)

                  Send("Login no Webmail","login_submit","","{ENTER}")

 

    EndSwitch

WEnd

[JohnOne]

You might have a very old help file, or one from the future.

In mine AutoIt 3.3.12.0 Send only takes 2 parameters, not 4.

Also you need to use GuiCtrlRead on $username and $pass controls.

[EvandroAguiar]

as I do that, I am newbie

[EvandroAguiar]

i tried so in other arquive

#include <ButtonConstants.au3>

#include <EditConstants.au3>

#include <GUIConstantsEx.au3>

#include <StaticConstants.au3>

#include <WindowsConstants.au3>

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

$Form1 = GUICreate("Form1", 433, 409, 678, 294)

GUISetBkColor(0xFFFFFF)

$login = GUICtrlCreateButton("acessar", 296, 312, 105, 33, $WS_GROUP)

GUICtrlSetFont(-1, 8, 400, 0, "Humnst777 BT")

GUICtrlSetBkColor(-1, 0xA6CAF0)

$user = GUICtrlCreateInput("", 24, 198, 377, 23)

GUICtrlSetFont(-1, 9, 400, 2, "Futura Md BT")

GUICtrlSetCursor (-1, 0)

$pass = GUICtrlCreateInput("",24, 256, 377, 23)

GUICtrlSetFont(-1, 9, 400, 2, "Futura Md BT")

$Pic1 = GUICtrlCreatePic("D:sites 44mail.jpg", 40, 8, 345, 145, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))

$Label1 = GUICtrlCreateLabel("Login", 24, 176, 33, 19)

GUICtrlSetFont(-1, 9, 400, 0, "Futura Bk BT")

$Label2 = GUICtrlCreateLabel("Senha", 24, 232, 37, 19)

GUICtrlSetFont(-1, 9, 400, 0, "Futura Bk BT")

GUISetState(@SW_SHOW)

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

 

While 1

Sleep(100)

 

WEnd

Call('login')

 

Func login ()

 

ShellExecute ("http://webmail.quattropublicidades.com.br/cpsess5135348607/3rdparty/roundcube/?_task=mail")

GUICtrlSetData ($user)

GUICtrlSetData ($pass)

 

EndFunc

[EvandroAguiar]

solved ..... but this line $ Pic1 = GUICtrlCreatePic ("D: sites 4 4 mail.jpg", 40, 8, 345, 145, BITOR ($ SS_NOTIFY, $ WS_GROUP, $ WS_CLIPSIBLINGS)) can not store the image, tested it on my note worked, however no figure

Edited March 2, 2015 by EvandroAguiar

[JohnOne]

"D: sites 4 4 mail.jpg" looks odd, do you really have all them spaces in the path?

[caramen]

Plz use the blue code autoit button to post code that will make it more readable.

like that :

While 1

                  Send("Login no Webmail")
                  Send("user")
                  Send("$username")
 
WEnd

This is correct syntax for your send commands . :/

 

and this cant be correct...

"D: sites 4 4 mail.jpg"

you are oblige to get somthing like that at least...

"D: sites 4 4 mail.jpg"

and probably like this...

"D:sites 44mail.jpg"

Edited March 3, 2015 by caramen

[Kyan]

@EvandroAguiar

Boas, não consegues preencher a form pelo send() que browser usas? existe um UDF para o chrome, outro para o Firefox e outro para o IE

Explica o que pretendes fazer, automaçao do login apenas? ou obter dados da pagina e mostrar no teu programa?

cumps

[EvandroAguiar]

solved guys tanks so much

[EvandroAguiar]

i have other question, but i send before ! tks