文件未附加到带有AppleScript的电子邮件中

Question

我的问题是，虽然代码似乎工作正常，但邮件已发送但没有附加文件。 控制台不显示任何错误。 哪个问题？ （我是AppleScript新手） 这是我的代码。感谢。

tell application "Finder"
    set carpetaDelArchivo to folder "Macintosh HD:Users:Alberto:Documents:scripts:"
    set archivoAdjunto to the (first file in carpetaDelArchivo)
end tell

--rellenar los datos del correo (destinatario, asunto, etc)
set destinatario to "xxx@icloud.com"
set enviadoPor to "yyy@hotmail.com"
set asunto to "Prueba con applescript"
set contenido to "Bla bla bla..... " & return & return & "Esto es una prueba"

--abrir aplicación de correo
tell application "Mail"

--crear el correo
set nuevoMensaje to make new outgoing message with properties {subject:asunto, content:contenido, sender:enviadoPor}
log "mensaje creado"

    tell nuevoMensaje

        make new to recipient at end of to recipients with properties {address:destinatario}
        tell content of nuevoMensaje
            try
                make new attachment with properties {file name:archivoAdjunto as alias} at after last paragraph
                log "archivo adjuntado"

            on error errores
                log errores

            end try
        end tell
     end tell

--message mensaje
send nuevoMensaje

log "mensaje enviado"

end tell