IEmailService Interface

public interface IEmailService

Public Interface IEmailService

private void Send(IAppContext appContext, string sendToList, string templateName, NameValueCollection nameValues)
{
    ServiceInfos        svs = appContext.Services;
    IEmailService        mail = (IEmailService)svs.GetServiceInstance("SmtpMail");            
    NetQuarry.Template    tmpl = appContext.Templates[templateName];
    string                body;
    string                subject;

    if (tmpl == null)
        throw new ApplicationException(string.Format(this.TextItems.GetText(IDS_MISSING_TEMPLATE), templateName));

    body = tmpl.Replace(nameValues);
    subject = tmpl.TextItems.GetText("Subject");

    try
    {
        //--- leave the From field empty, it will default to the value configured in the studio
        mail.Send(string.Empty, sendToList, subject, body, true);
    }
    catch(Exception ex)
    {
        //--- log the error then re-throw
        DevLog.LogMessage("XIssue.Send", "sendMailError", ex);
        throw;
    }
}

Private  Sub Send(ByVal appContext As IAppContext, ByVal sendToList As String, ByVal templateName As String, ByVal nameValues As NameValueCollection)
        Dim svs As ServiceInfos =  appContext.Services 
        Dim mail As IEmailService = CType(svs.GetServiceInstance("SmtpMail"), IEmailService)
        Dim tmpl As NetQuarry.Template =  appContext.Templates(templateName) 
        Dim body As String
        Dim subject As String

        If tmpl Is Nothing Then
            Throw New ApplicationException(String.Format(Me.TextItems.GetText(IDS_MISSING_TEMPLATE), templateName))
        End If

        body = tmpl.Replace(nameValues)
        subject = tmpl.TextItems.GetText("Subject")

        Try
           '--- leave the From field empty, it will default to the value configured in the studio
            mail.Send(String.Empty, sendToList, subject, body, True)
        Catch ex As Exception
            '--- log the error then re-throw
            DevLog.LogMessage("XIssue.Send", "sendMailError", ex)
            throw
        End Try
    End Sub