Jump to content

Save/Send button


Heakert
 Share

Recommended Posts

HI

Im new to AutoIt and this forum so im sry if i am posting this wrong.

ok here's my problem/question.

i am making a aplication where you can answer questions.

now i wanna know how can i make a button that wil send me the answers to my hotmail.

so if some one far away is answers the questions and he presses send i can see what his answers are.

i looked in the help file's but nothing helped me.

can some one help me plss.

( sry for my bad english im dutch ^^ )

Link to comment
Share on other sites

First off, welcome to the forums!

Initially, you should learn how to make a proper gui and controls from the help file. The help file is your best friend, it will give you most of the answers you need for all of the basics of autoit, and some of the more advanced topics as well.

As soon as you can create a basic gui and execute any action by means of pressing a button, you're ready to add the functionality that you want.

In order to send an email using autoit, look at the _INetSmtpMail in the iNet UDF in the help file.

Give some things a shot, post what you've got and we'll help you out where you need it.

[u]You can download my projects at:[/u] Pulsar Software
Link to comment
Share on other sites

thnx for the reply

here's my scipt for so far

#include <GUIConstantsEx.au3>

Opt('MustDeclareVars', 1)

Example()


Func Example()
    Local $widthCell
    Local $mylist, $add, $msg, $close , $add2, $Button_1, $add3, $clear, $del
    GUICreate("Enquête Lan-Party", 390, 800 )  ; will create a dialog box that when displayed is centered


    $widthCell = 70

    ; Made by 
    GUICtrlCreateLabel("Made By: ", 10, 780) ; next line and next cell
    GUICtrlCreateLabel("Charlie Engels", 60, -1) ; next cell same line
    GUICtrlCreateLabel("Powered By: ", 235, 780) ; next line and next cell
    GUICtrlCreateLabel("Dutch-Gaming.nl", 300, -1) ; next cell same line
    
    ; The Answers 
    $add = GUICtrlCreateButton("Ja", 260, 10, 30, 20)
    $add2  = GUICtrlCreateButton("Nee", 290, 10, 30, 20)
    $add3 = GUICtrlCreateButton("Niet Persee", 320, 10, 63, 20) 
    
    $add = GUICtrlCreateButton("Ja", 260, 50, 30, 20)
    $add2  = GUICtrlCreateButton("Nee", 290, 50, 30, 20)
    $add3 = GUICtrlCreateButton("Niet Persee", 320, 50, 63, 20) 
    
    $add = GUICtrlCreateButton("Ja", 260, 90, 30, 20)
    $add2  = GUICtrlCreateButton("Nee", 290, 90, 30, 20)
    $add3 = GUICtrlCreateButton("Niet Persee", 320, 90, 63, 20) 
    
    $add = GUICtrlCreateButton("Ja", 260, 130, 30, 20)
    $add2  = GUICtrlCreateButton("Nee", 290, 130, 30, 20)
    $add3 = GUICtrlCreateButton("Niet Persee", 320, 130, 63, 20) 
    
    $add = GUICtrlCreateButton("Ja", 260, 170, 30, 20)
    $add2  = GUICtrlCreateButton("Nee", 290, 170, 30, 20)
    $add3 = GUICtrlCreateButton("Niet Persee", 320, 170, 63, 20) 
    
    $add = GUICtrlCreateButton("Ja", 260, 210, 30, 20)
    $add2  = GUICtrlCreateButton("Nee", 290, 210, 30, 20)
    $add3 = GUICtrlCreateButton("Niet Persee", 320, 210, 63, 20) 
    
    $add = GUICtrlCreateButton("Ja", 260, 250, 30, 20)
    $add2  = GUICtrlCreateButton("Nee", 290, 250, 30, 20)
    $add3 = GUICtrlCreateButton("Niet Persee", 320, 250, 63, 20) 
    
    $add = GUICtrlCreateButton("Ja", 260, 290, 30, 20)
    $add2  = GUICtrlCreateButton("Nee", 290, 290, 30, 20)
    $add3 = GUICtrlCreateButton("Niet Persee", 320, 290, 63, 20) 
    
    $add = GUICtrlCreateButton("Ja", 260, 330, 30, 20)
    $add2  = GUICtrlCreateButton("Nee", 290, 330, 30, 20)
    $add3 = GUICtrlCreateButton("Niet Persee", 320, 330, 63, 20) 
    
    $add = GUICtrlCreateButton("Lan", 260, 370, 30, 20)
    $add2  = GUICtrlCreateButton("Internet", 290, 370, 30, 20)
    $add3 = GUICtrlCreateButton("Internet & Lan", 320, 370, 63, 20)  
    
    $add = GUICtrlCreateButton("Ja", 260, 410, 30, 20)
    $add2  = GUICtrlCreateButton("Nee", 290, 410, 30, 20)
    $add3 = GUICtrlCreateButton("Niet Persee", 320, 410, 63, 20) 
    
    $add = GUICtrlCreateButton("Ja", 260, 450, 30, 20)
    $add2  = GUICtrlCreateButton("Nee", 290, 450, 30, 20)
    $add3 = GUICtrlCreateButton("Niet Persee", 320, 450, 63, 20) 
    
    $add = GUICtrlCreateButton("Ja", 260, 490, 30, 20)
    $add2  = GUICtrlCreateButton("Nee", 290, 490, 30, 20)
    $add3 = GUICtrlCreateButton("Niet Persee", 320, 490, 63, 20) 
    
    $add = GUICtrlCreateButton("Ja", 260, 530, 30, 20)
    $add2  = GUICtrlCreateButton("Nee", 290, 530, 30, 20)
    $add3 = GUICtrlCreateButton("Niet Persee", 320, 530, 63, 20) 
    
    $add = GUICtrlCreateButton("Ja", 260, 570, 30, 20)
    $add2  = GUICtrlCreateButton("Nee", 290, 570, 30, 20)
    $add3 = GUICtrlCreateButton("Niet Persee", 320, 570, 63, 20) 
    
    
    
    ; The Questions
    GUICtrlCreateInput( "wil de dat het drinken word verzorged ?", 10,10,230)
    GUICtrlCreateInput( "wil je dat het avond eten word verzorged ?", 10,50)
    GUICtrlCreateInput( "zou je ver willen reizen voor de lanparty ?", 10,90)
    GUICtrlCreateInput( "zou je een ontbijt willen ?", 10,130)
    GUICtrlCreateInput( "wil je meer kunnen dan alleen aan de pc ?", 10,170)
    GUICtrlCreateInput( "zou je op een groot scherm films willen zien ?", 10,210)
    GUICtrlCreateInput( "zou je een competie willen doen ?", 10,250)
    GUICtrlCreateInput( "zou je een publiek geluid willen ?", 10,290)
    GUICtrlCreateInput( "wil je dat alles live word uitgezonden ?", 10,330)
    GUICtrlCreateInput( "zou je op internet willen of alleen lan ?", 10,370)
    GUICtrlCreateInput( "zou je ook op een console willen spelen ?", 10,410)
    GUICtrlCreateInput( "wil je eigen boxen mee nemen ?", 10,450)
    GUICtrlCreateInput( "zou je een slaap plaats willen ?", 10,490)
    GUICtrlCreateInput( "zou je meer dan 3 dagen willen ?", 10,530)
    GUICtrlCreateInput( "wil je dat er bezoekers kunnen komen ?", 10,570)
    
    GUICtrlSetLimit(-1, 200)    ; to limit horizontal scrolling
    $Button_1 = GUICtrlCreateButton("Save", 10, 740, 100, 30)
    $clear = GUICtrlCreateButton("Clear", 10, 700, 100, 30)
    $mylist = GUICtrlCreateList("", 120, 600, 260, 175)
    $del = GUICtrlCreateButton("Delete control", 10, 600, 100, 30)
    
    GUISetState()

    
   $msg = 0
    While $msg <> $GUI_EVENT_CLOSE
        $msg = GUIGetMsg()
        Select
            Case $msg = $add
                GUICtrlSetData($mylist, "Ja")
            Case $msg = $add2
                GUICtrlSetData($mylist, "Nee")
            Case $msg = $add3
                GUICtrlSetData($mylist, "Niet Persee") 
            Case $msg = $clear
                GUICtrlSetData($mylist, "")
    Do
        $msg = GUIGetMsg()
            If $msg = $del Then
                GUICtrlDelete($del)
                EndIf
            Until $msg = $GUI_EVENT_CLOSE
        EndSelect
    WEnd
EndFunc

Its part dutch part english i made a list in it where the questions need to send when you pres a button and that list must be send to a email the delete button is for if you wanna delete a answer when answered wrong. i know how to get the ansers in the list but not had the time to fix that yet i just nee to know how to send the ansers to my email

i hope that i explain it good inough.

Gz. Heakert

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...