send email from netcobol .net 3.1

IDENTIFICATION DIVISION.

*> The internal name of this class must be CLASS-THIS.

CLASS-ID. CLASS-THIS AS "_Default" PARTIAL

INHERITS CLASS-PAGE.

ENVIRONMENT DIVISION.

CONFIGURATION SECTION.

REPOSITORY.

CLASS CLASS-EVENTARGS AS "System.EventArgs"

CLASS CLASS-OBJECT AS "System.Object"

CLASS MyMailATT AS "System.Web.Mail.MailAttachment"

CLASS MyMail AS "System.Web.Mail.MailMessage"

CLASS SmtpMail AS