<font color=red>(I have updated the line #'s to correspond with v3.1 SR4)</font id=red>
I inserted this code at line 134 of <b>admin_config_email.asp</b>:
<pre id=code><font face=courier size=2 id=code> <option value="sa-smtp"<% if (lcase(strMailMode)="sa-smtp" or lcase(MailMode)="sa-smtp") then Response.Write(" selected") %>>SA-SmtpMail</option></font id=code></pre id=code>
And inserted this code at line 154 of <b>inc_mail.asp</b>:
<pre id=code><font face=courier size=2 id=code> case "sa-smtp" Set objNewMail = Server.CreateObject("SoftArtisans.SMTPMail") objNewMail.FromName = strFromName objNewMail.FromAddress = strSender objNewMail.AddRecipient strRecipientsName, strRecipients 'objNewMail.AddReplyTo strSender objNewMail.BodyText = strMessage objNewMail.organization = strForumTitle objNewMail.Subject = strSubject objNewMail.RemoteHost = strMailServer on error resume next SendOk = objNewMail.SendMail If not(SendOk) <> 0 Then Err_Msg = Err_Msg & "<li>Your request was not sent due to the following error: " & objNewMail.Response & "</li>" End if</font id=code></pre id=code>
Edited by - Richard Kinser on 31 December 2000 14:27:03
<font color=green>"<font color=red>I no longer call you servants, because a servant does not know his master's business. Instead I have called you friends...</font id=red>" -- John 15:15</font id=green></center>
OK, I think it's time Richard got a new nickname. I vote for "Mailman" (or Mailman Richard") because he seems to be the master at adding all the different email packages to the forum.
Great work Richard!!!
Dave Maxwell -------------- When's the next meeting of Snitzaholics Anonymous<img src=icon_smile_question.gif border=0 align=middle>
Edited by - davemaxwell on 26 October 2000 12:52:33
Edited by - davemaxwell on 26 October 2000 12:53:39
Topic Locked
Posted - 15 October 2000 : 21:09:29
