MaxWilko

Jos its all working, this was really helpful, thanks!

; ;################################## ; Include ;################################## #Include<file.au3> ;################################## ; Variables ;################################## $SmtpServer = "smtp-mail.outlook.com"              ; address for the smtp-server to use - REQUIRED $FromName = "AutoCaliBot"                      ; name from who the email was sent $FromAddress = "ri------autocali@outlook.com" ; address from where the mail should come $ToAddress = "au------collect@outlook.com"   ; destination address of the email - REQUIRED $Subject = "Calibration Report"                   ; subject from the email - can be anything you want it to be $Body = "Test"                              ; the messagebody from the mail - can be left blank but then you get a blank mail $AttachFiles = "01089.csv"                       ; the file(s) you want to attach seperated with a ; (Semicolon) - leave blank if not needed $CcAddress = ""                           ; address for cc - leave blank if not needed $BccAddress = ""     ; address for bcc - leave blank if not needed $Importance = "Normal"                  ; Send message priority: "High", "Normal", "Low" $Username = "ri------autocali@outlook.com"                    ; username for the account used from where the mail gets sent - REQUIRED $Password = "mypass"                  ; password for the account used from where the mail gets sent - REQUIRED $IPPort = 587                            ; port used for sending the mail $ssl = 0                                ; enables/disables secure socket layer sending - put to 1 if using httpS $tls = 0                                ; enables/disables TLS when required ;$IPPort=465                          ; GMAIL port used for sending the mail ;$ssl=1                               ; GMAILenables/disables secure socket layer sending - put to 1 if using httpS ;################################## ; Script ;################################## Global $oMyRet[2] Global $oMyError = ObjEvent("AutoIt.Error", "MyErrFunc") $rc = _INetSmtpMailCom($SmtpServer, $FromName, $FromAddress, $ToAddress, $Subject, $Body, $AttachFiles, $CcAddress, $BccAddress, $Importance, $Username, $Password, $IPPort, $ssl, $tls) If @error Then     MsgBox(0, "Error sending message", "Error code:" & @error & "  Description:" & $rc) EndIf ; ; The UDF Func _INetSmtpMailCom($s_SmtpServer, $s_FromName, $s_FromAddress, $s_ToAddress, $s_Subject = "", $as_Body = "", $s_AttachFiles = "", $s_CcAddress = "", $s_BccAddress = "", $s_Importance="Normal", $s_Username = "", $s_Password = "", $IPPort = 25, $ssl = 0, $tls = 0)     Local $objEmail = ObjCreate("CDO.Message")     $objEmail.From = '"' & $s_FromName & '" <' & $s_FromAddress & '>'     $objEmail.To = $s_ToAddress     Local $i_Error = 0     Local $i_Error_desciption = ""     If $s_CcAddress <> "" Then $objEmail.Cc = $s_CcAddress     If $s_BccAddress <> "" Then $objEmail.Bcc = $s_BccAddress     $objEmail.Subject = $s_Subject     If StringInStr($as_Body, "<") And StringInStr($as_Body, ">") Then         $objEmail.HTMLBody = $as_Body     Else         $objEmail.Textbody = $as_Body & @CRLF     EndIf     If $s_AttachFiles <> "" Then         Local $S_Files2Attach = StringSplit($s_AttachFiles, ";")         For $x = 1 To $S_Files2Attach[0]             $S_Files2Attach[$x] = _PathFull($S_Files2Attach[$x]) ;~          ConsoleWrite('@@ Debug : $S_Files2Attach[$x] = ' & $S_Files2Attach[$x] & @LF & '>Error code: ' & @error & @LF) ;### Debug Console             If FileExists($S_Files2Attach[$x]) Then                 ConsoleWrite('+> File attachment added: ' & $S_Files2Attach[$x] & @LF)                 $objEmail.AddAttachment($S_Files2Attach[$x])             Else                 ConsoleWrite('!> File not found to attach: ' & $S_Files2Attach[$x] & @LF)                 SetError(1)                 Return 0             EndIf         Next     EndIf     $objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2     $objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserver") = $s_SmtpServer     If Number($IPPort) = 0 then $IPPort = 25     $objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = $IPPort     ;Authenticated SMTP     If $s_Username <> "" Then         $objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1         $objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendusername") = $s_Username         $objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendpassword") = $s_Password     EndIf     ; Set security params     If $ssl Then $objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpusessl") = True     If $tls Then $objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendtls") = True     ;Update settings     $objEmail.Configuration.Fields.Update     ; Set Email Importance     Switch $s_Importance         Case "High"             $objEmail.Fields.Item ("urn:schemas:mailheader:Importance") = "High"         Case "Normal"             $objEmail.Fields.Item ("urn:schemas:mailheader:Importance") = "Normal"         Case "Low"             $objEmail.Fields.Item ("urn:schemas:mailheader:Importance") = "Low"     EndSwitch     $objEmail.Fields.Update     ; Sent the Message     $objEmail.Send     If @error Then         SetError(2)         Return $oMyRet[1]     EndIf     $objEmail="" EndFunc   ;==>_INetSmtpMailCom ; ; ; Com Error Handler Func MyErrFunc()     $HexNumber = Hex($oMyError.number, 😎     $oMyRet[0] = $HexNumber     $oMyRet[1] = StringStripWS($oMyError.description, 3)     ConsoleWrite("### COM Error !  Number: " & $HexNumber & "   ScriptLine: " & $oMyError.scriptline & "   Description:" & $oMyRet[1] & @LF)     SetError(1); something to check for when this function returns     Return EndFunc   ;==> ScriptLine: 93 Description: The server rejected the sender address. The server response was: 451 5.7.3 STARTTLS is required to send mail [LO4P123CA0226.GBRP123.PROD.OUTLOOK.COM] Hi all, what am I doing wrong here? Please help ! Thanks for your time!

This worked great I used it inside the loop and it is running perfectly thank you @water & @JockoDundee. I next need to export some reports from the software and stick them in a email and send them. But this might be for another forum topic.

Thanks @water this was really helpful and I understood it. Problem that occurs it seems is the ControlID changes everytime the program opens, so it cannot find the window and pops the error that was kindly coded for me. I am going to attempt using pixel capture I think its called, there is also a colour that changes when it is complete, perhaps this might be an easier way to script, I will post back with my progress soon. Thanks everyone

Thanks again for your support!

Hi all ! Hi @water yes! I can use the AutoIT window info tool to find the ID of the control. This is great I can query it's value, I must sound very noob but how would I query the value? attached is a photo of the window info tool & my code

Hi all, I've been trying to research about this one but keep hitting a wall so here I am. My goal: To start executing mouse clicks when a word in a box changes to "Done" Would I need a combination of WinExists and If statements? Would this be the best way to do this? If so I would really appreciate a little help with the syntax. Thanks for your time pros!