Sign in to follow this  
Followers 0
gte

Error updated resources

11 posts in this topic

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

#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 :party:

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

Share this post


Link to post
Share on other sites



#2 ·  Posted (edited)

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 by Jos

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

Share this post


Link to post
Share on other sites

#3 ·  Posted (edited)

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 by gte

Share this post


Link to post
Share on other sites

#6 ·  Posted (edited)

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 by Jos

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

Share this post


Link to post
Share on other sites

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


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

Share this post


Link to post
Share on other sites

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

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