У меня был похожий сценарий, вместо того, чтобы использовать задачу отправки почты, я решил отправить письмо из задачи сценария. Это единственный способ, который я нашел, чтобы объединить отправку электронной почты и провал пакета в один шаг.
Dim Message As MailMessage
Dim Smtp As SmtpClient
Message = New MailMessage("email@domain.com", "email@domain.com", "Packaged Failed", "Package Failed because...")
Smtp = New SmtpClient(Dts.Variables("EmailServer").Value.ToString())
Smtp.Credentials = CredentialCache.DefaultNetworkCredentials
Smtp.Send(Message)
Dts.TaskResult = Dts.Results.Failure