% If Request("Send") <> "" Then Set Mail = Server.CreateObject("Persits.MailSender") Mail.Host = "209.252.100.110" Mail.From = Request("From") ' From address Mail.FromName = Request("FromName") ' optional Mail.AddAddress "lou@eandj.com" Mail.Subject = "Web Comment" Mail.Body = Request("Body") strErr = "" bSuccess = False On Error Resume Next ' catch errors Mail.Send ' send message If Err <> 0 Then ' error occurred strErr = Err.Description else bSuccess = True End If End If %>

