AnsweredAssumed Answered

Error in Sending an email in Filemaker 15 with Microsoft Outlook

Question asked by cjurdaneta on Oct 31, 2016
Latest reply on Nov 17, 2016 by cjurdaneta

I has a problem, with a script sending an email.

And the error is:

The task cannot complete, because another program is busy.

Choose  Change to....activate the busy program and solve the problem.

 

At the same time in the windows administrator appear fixmapi.exe*32  repair tool, if i don't close that program i cannot do anything more.

 

This script work perfect in Filemaker 12 and 13.

 

Script:

Go to Layout [ “MEJORAR” (Data_Master) ]

Insert Calculated Result [ Data_Master::R6; "¶¶-------------------------------------------------------------------¶ " & GetAsText(Get(CurrentDate)) & "Se

envio correo a la dirección de email :" & Data_Master::email & " a las :" ]

Insert Current Time [ Data_Master::R6 ]

Go to Layout [ “datos ampliados” (Data_Master) ]

Insert Calculated Result [ Data_Master::contador_veces; Data_Master::contador_veces + 1 ]

[ Select ]

Perform Script [ “refrescar” ]

If [ Data_Master::seleccion_anexo = "1" ]

Set Variable [ $A; Value:If (Data_Master::archivo_anexo1 = "" ; "" ;"file:1AAAAA/" & Data_Master::archivo_anexo1 ) ]

Set Variable [ $B; Value:If (Data_Master::archivo_anexo1 = "" ; "" ;"file:1AAAAA/" & Data_Master::archivo_anexo2 ) ]

Else

If [ Data_Master::seleccion_anexo = "2" ]

Set Variable [ $A; Value:If (Data_Master::archivo_anexo1 = "" ; "" ;"file:1AAAAA/" & Data_Master::archivo_anexo2 ) ]

Else

If [ Data_Master::seleccion_anexo ="3" ]

Set Variable [ $A; Value:If (Data_Master::archivo_anexo1 = "" ; "" ;"file:1AAAAA/" & Data_Master::archivo_anexo3 ) ]

Else

If [ Data_Master::seleccion_anexo = "4" ]

Set Variable [ $A; Value:If (Data_Master::archivo_anexo1 = "" ; "" ;"file:1AAAAA/" & Data_Master::archivo_anexo4 ) ]

Else

If [ Data_Master::seleccion_anexo = "5" ]

Set Variable [ $A; Value:If (Data_Master::archivo_anexo1 = "" ; "" ;"file:1AAAAA/" &Data_Master::archivo_anexo5 ) ]

Else

If [ Data_Master::seleccion_anexo = "6" ]

Set Variable [ $A; Value:If (Data_Master::archivo_anexo1 = "" ; "" ;"file:1AAAAA/" &Data_Master::

archivo_anexo6 ) ]

Else

If [ Data_Master::seleccion_anexo = "7" ]

Set Variable [ $A; Value:If (Data_Master::archivo_anexo1 = "" ; "" ;"file:1AAAAA/" &Data_Master::

archivo_anexo7 ) ]

Else

End If

End If

End If

End If

End If

End If

End If

Insert Calculated Result [ Data_Master::ESTATUS; "ENVIADO" ]

[ Select ]

Copy [ Data_Master::archivo_anexo2 ]

[ Select ]

Send Mail [ Send via E-mail Client; To: Data_Master::email; CC: Data_Master::concopia; BCC: Data_Master::email_en_blindcopy; Subject:

Data_Master::proyecto77; Message: Data_Master::data_contenido; Attachment: “$A” ]

Allow User Abort [ Off ]

 

Please if someone can help me solving this problem.

Regards

CJUrdanetaerror_send_email2.jpg

Outcomes