Jump to content

Working The _inetmail Function


Recommended Posts

how do u work the _INetMail function???

here is my script i need u guys to help me with the part between the edit start and edit end comments

; ----------------------------------------------------------------------------
;
; AutoIt Version: 3.1.0
; Author:        A.N.Other <myemail@nowhere.com>
;
; Script Function:
;   Template AutoIt script.
;
; ----------------------------------------------------------------------------

; Script Start - Add your code below here

#include <INet.au3>
#region --- GuiBuilder code Start ---
; Script generated by AutoBuilder 0.6 Prototype

#include <GuiConstants.au3>


GuiCreate("DisKlean", 594, 152,-1, -1 , BitOR($WS_OVERLAPPEDWINDOW, $WS_CLIPSIBLINGS))

$hlp = GuiCtrlCreateButton("HELP", 10, 110, 70, 30)
$getclean = GuiCtrlCreateButton("GET Cclean", 10, 60, 70, 30)
$start = GuiCtrlCreateButton("START", 10, 10, 70, 30)
$Label_4 = GuiCtrlCreateLabel("Thank you for chosing DisKlean. Please read the help file before emailing me. For best results I suggest that you download Cclean it is free program that will not install spyware or any other malicious things onto your computer.", 100, 10, 130, 130)
$Icon_5 = GuiCtrlCreateIcon("Icon5", 0, 250, 30, 70, 70)
$Label_6 = GuiCtrlCreateLabel("To email me simply type the body of your message into the box below and click the GO button.", 340, 10, 230, 40)
$Input_7 = GuiCtrlCreateInput("Email Body Here", 340, 60, 230, 40)
$sendemail = GuiCtrlCreateButton("GO", 420, 110, 70, 30)

GuiSetState()
While 1
    $msg = GuiGetMsg()
    Select
        
    Case $msg = $hlp
        $url = "http://zmastersdisklcleanhelpfilesfornoonetofinde.50webs.com/"
        Run(@ComSpec & ' /c start ' & $url, '', @SW_SHOW)   

    Case $msg = $start
        Run("notepad.exe")
        Run("cleanmgr.exe")
        WinWaitActive("Untitled - Notepad")
        WinSetTitle("Untitled - Notepad", "", "Instructions")
        Send("~~DisKlean By: Zmaster~~ {ENTER}")
        Send("{ENTER}DO NOT CLOSE THIS WINDOW IT WILL CLOSE IT SELF LATER {ENTER}")
        Send("{ENTER}This window will automaticaly close itself when the wizard is done running. {ENTER}")
        Send("{ENTER}Please follow all instructions on this page for optimal script operation. {ENTER}")
        Send("{ENTER}Make sure that the following Files to Delete are selected in the Disk Clean up for (C:) window {ENTER}")
        Send("{ENTER}1. Downloaded Program Files")
        Send("{ENTER}2. Temporary Internet Files")
        Send("{ENTER}3. Recycle Bin")
        Send("{ENTER}4. Temporary file")
        Send("{ENTER}5. WebClient/Publisher Temporary Files")
        Send("{ENTER}6. Compress old files{ENTER}")
        Send("{ENTER}After making sure that those itmes are marked for deletion click the OK button.{ENTER}")
        WinClose("Instructions")
        Sleep(8000)
        
        
;----edit start-----
    Case $msg = $sendemail
        $address = ("zmaster.atf@gmail.com")
        $subject = ("DisKlean_Report")
        _INetMail($s_MailTo
;----edit end-------
        
        
        
                
    Case $msg = $GUI_EVENT_CLOSE
        ExitLoop
    Case Else
;;;
    EndSelect
WEnd
Exit
#endregion --- GuiBuilder generated code End ---

EDIT:

ok um wut?? how do i do that??

Edited by Zmaster

A great place to start Autoit 1-2-3

Link to comment
Share on other sites

I don't see the problem. You just need to finish the function call.

#include <INet.au3>

_INetMail ( $s_MailTo, $s_MailSubject, $s_MailBody ) ; from the helpfile.

You're not going to want parentheses around your text, I know that much.

$s_MailTo = address

$s_MailSubject = subject

$s_MailBody = body

Then go.

Edited by greenmachine
Link to comment
Share on other sites

----edit start-----

Case $msg = $sendemail

; $address = ("zmaster.atf@gmail.com")

$s_MailTo= ("cippo.atf@gmail.com")

$s_MailSubject = ("DisKlean_Report")

$s_MailBody = "cippolippowashere"

_INetMail ( $s_MailTo, $s_MailSubject, $s_MailBody )

;----edit end-------

Link to comment
Share on other sites

uh im lost wut do i do??

Try it

works here

Case $msg = $sendemail

; $address = "zmaster.atf@gmail.com"

$s_MailTo= "cippo.atf@gmail.com"

$s_MailSubject = "DisKlean_Report"

$s_MailBody = "cippolippowashere"

_INetMail ( $s_MailTo, $s_MailSubject, $s_MailBody )

this too

----edit start-----

Case $msg = $sendemail

; $address = ("zmaster.atf@gmail.com")

$s_MailTo= ("cippo.atf@gmail.com")

$s_MailSubject = ("DisKlean_Report")

$s_MailBody = "cippolippowashere"

_INetMail ( $s_MailTo, $s_MailSubject, $s_MailBody )

Edited by Lapo
Link to comment
Share on other sites

If you don't understand with the code posted in your face, you're not ready to use it yet. Keep reading.

Edit - That goes for other people's scripts too. You keep posting "omg noes i don't know how to use this helpme!!>!???!?!" and stuff like that. If you don't understand, read the code and look things up in the helpfile, read the description provided by the creator, or DON'T USE WHAT YOU DON'T UNDERSTAND. That always works.

Edited by greenmachine
Link to comment
Share on other sites

If you don't understand with the code posted in your face, you're not ready to use it yet. Keep reading.

Edit - That goes for other people's scripts too. You keep posting "omg noes i don't know how to use this helpme!!>!???!?!" and stuff like that. If you don't understand, read the code and look things up in the helpfile, read the description provided by the creator, or DON'T USE WHAT YOU DON'T UNDERSTAND. That always works.

ROTFL

for the OP open vour help file (C:\PROGRA~1\AUTOIT3\AUTOIT3.CHM) and go to >>> InputBox

Link to comment
Share on other sites

Upsss sorry 2 _:

Edit : (the $s_MailBody was wrong )

Case $msg = $sendemail

$a1 =GUICtrlRead ( $Input_7)

$s_MailTo= "zmaster.atf@gmail.com"

$s_MailSubject = "DisKlean_Report"

$s_MailBody = $a1

_INetMail ( $s_MailTo, $s_MailSubject, $s_MailBody )

Edited by Lapo
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...