Send email with an attached file using WinCC script

Hi,

I need to send an email with an attached file using Wincc script.

I have achieved to send an email only with text using this script:

****************************************************************
Dim appOutlook 'As OUTLOOK.APPLICATION
Dim mlNewMail 'As MailItem
Dim objEntry
Dim Text

Const addressee = "mail@address.com"

Text = "Text of the mail"

Set appOutlook = CreateObject("OUTLOOK.APPLICATION")
Set mlNewMail = appOutlook.CreateItem(0)
mlNewMail.To = addressee
mlNewMail.Subject = "Here the subject"
mlNewMail.Body = Text
mlNewMail.Send
****************************************************************

But now, I need to send an attached file, that previously I have created with another script.

Thank you for your support.

Good morning.
This VB application is well and works also with WinCC Flexible. In my project i need use a gmail account.
Please can somebody help me.
Thank you.

mustio_collado

Hi,

I need to send an email with an attached file using Wincc script.

I have achieved to send an email only with text using this script:

****************************************************************
Dim appOutlook 'As OUTLOOK.APPLICATION
Dim mlNewMail 'As MailItem
Dim objEntry
Dim Text

Const addressee = "mail@address.com"

Text = "Text of the mail"

Set appOutlook = CreateObject("OUTLOOK.APPLICATION")
Set mlNewMail = appOutlook.CreateItem(0)
mlNewMail.To = addressee
mlNewMail.Subject = "Here the subject"
mlNewMail.Body = Text
mlNewMail.Send
****************************************************************

But now, I need to send an attached file, that previously I have created with another script.

Thank you for your support.

Hello,

Should I use Outlook or I can use another mail server, as Postbox Express?

How would be the configuration?

Thanks.