Error updated resources

[gte]

I am getting a compile error? (I've removed the private info, but in reality I only changed a few fields?)

As an FYI, when I run it without compiling, it works

>"C:\Program Files\AutoIt3\SciTE\AutoIt3Wrapper\AutoIt3Wrapper_Gui.exe" /in "C:\Documents and Settings\668692\My Documents\Work Stuff\AutoIt\changelibrarylist\librarylistupdatesuccessemail1.au3"

+>12:52:23 Starting AutoIt3Wrapper GUI v.1.10.1.14

-> No changes made..

+>12:52:27 Starting AutoIt3Wrapper v.1.10.1.14 Environment(Language:0409 Keyboard:00000409 OS:WIN_XP/Service Pack 2 CPU:X86 ANSI)

>Running AU3Check (1.54.14.0) from:C:\Program Files\AutoIt3

+>12:52:28 AU3Check ended.rc:0

UpdateResources: $result[0] = 0 - LastError:6:The operation completed successfully.

EndUpdateResource: $result[0] = 0 - LastError:6:The handle is invalid.

+> Updated RT_VERSION information.

>12:52:28 Resource updating finished.

>Running:(0.0.0.0):C:\Program Files\AutoIt3\aut2exe\aut2exe.exe /in "C:\Documents and Settings\668692\My Documents\Work Stuff\AutoIt\changelibrarylist\librarylistupdatesuccessemail1.au3" /out "C:\Documents and Settings\668692\My Documents\Work Stuff\AutoIt\changelibrarylist\librarylistupdatesuccessemail1.exe" /comp 2 /pack

!>12:52:42 Aut2exe.exe ended errors because the target exe wasn't created, abandon build.rc:9999

+>12:52:42 AutoIt3Wrapper Finished

>Exit code: 0 Time: 19.092

expandcollapse popup

#Region;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Res_Comment=This executable emails a status update after an update has been preformed or service stopped/started
#AutoIt3Wrapper_Res_Description=Library List Email Status
#AutoIt3Wrapper_Res_Fileversion=1.0.0.1
#AutoIt3Wrapper_Res_LegalCopyright=Brad W and SSA
#EndRegion;**** Directives created by AutoIt3Wrapper_GUI ****













;
;##################################
; Include
;##################################
#Include<file.au3>
;##################################
; Variables
;##################################
$SmtpServer = "********"             ; address for the smtp-server to use - REQUIRED
$FromName = "Library List Updater"                   ; name from who the email was sent
$FromAddress = "********"; address from where the mail should come
$ToAddress = "********"  ; destination address of the email - REQUIRED
$Subject = "Library List Update Script Status Email for " & @ComputerName  & " - Success"                ; subject from the email - can be anything you want it to be
$Body = "The Library List for computer " & @ComputerName & " has been successfully updated"                         ; the messagebody from the mail - can be left blank but then you get a blank mail
$AttachFiles = ""                     ; the file you want to attach- 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 = "********"                 ; username for the account used from where the mail gets sent - REQUIRED
$Password = "********"               ; password for the account used from where the mail gets sent - REQUIRED
$IPPort = 25                           ; port used for sending the mail
$ssl = 0                               ; enables/disables secure socket layer sending - put to 1 if using httpS
;~ $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)
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)
    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(62) : $S_Files2Attach = ' & $S_Files2Attach & @LF & '>Error code: ' & @error & @LF);### Debug Console
            If FileExists($S_Files2Attach[$x]) Then
                $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
    If $ssl Then
        $objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpusessl") = True
    EndIf
   ;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, 8)
    $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  ;==>MyErrFunc

thanks for this works so much better then the usual _INetSmtpMail func

THANK YOU

EDIT: Just one thing I wonder.. the mail seems to get sent from $Username no mether what $FromAddress I choose...am I doing something wrong?

cheers

[Jos]

This error has nothing to do with this UDF, but there seems to be a problem copying and updating the copy of the BIN file.

What AutoIt3Wrapper does it make a copy of the requested AutoItSC.bin and will update its resource after which it is used for compiling your script.

That second step fails for some reason.

What OS are you using?

EDIT: Topic split and moved to Support

Edited May 20, 2009 by Jos

[gte]

I'm using XP sp2 (check line 5 )

Do you have a work around, this email script is great if I could compile it.

(also, please delete my other post in the initial topic, I thought I was losing my mind, so I reposted it before I got your notification)

Edited May 20, 2009 by gte

[gte]

Just verified it's happening on files I used to be able to compile, so something is wrong with my scite or autoit

[gte]

Whoever created the save session mozilla like setting, brilliant!

Anyway, even with a new session loaded and only 1 file open, it still fails. I cannot find the autoitsc.bin file on my hard drive, via a windows search?

[Jos]

Just verified it's happening on files I used to be able to compile, so something is wrong with my scite or autoit

Yea, there must be something wrong with your setup as it indicates on the red line show in your SciTE output pane.

!>12:52:42 Aut2exe.exe ended errors because the target exe wasn't created, abandon build.rc:9999

Edited May 20, 2009 by Jos

[gte]

Well,

I uninstalled and reinstalled and I'm getting this now

[Jos]

That was to be expected that your AV software was playing trick on you.

Better get in touch with them and inform them about this False Positieve.

Jos

[gte]

I can't control the AV definitions at work, I'm 1 of 100,000 users ... ugh!

and

Edited May 20, 2009 by gte

[gte]

Got it all fixed somehow

Thanks all

[gte]

As an update

Etrust (by CA.com) had a false positive for anything coded in autoit version 3 and it completely hoses the program and deletes an executables created by autoit3.

They got a lot of flack about this, and have made an update, it appears that

Antivirus Engine Version: 31.6.0.0

Signature Version: 31.6.6513.0

Has been corrected

Got it all fixed somehow

Thanks all