<% userid=request("user") sqlrec="select email from profile where loginid='"&userid&"'" set rsrec=conn.execute(sqlrec) if request.form("submit")<>"" then set objmail=server.createobject("CDONTS.NewMail") sBody=sBody & request.form("body") & chr(13)& chr(13) sBody=sBody & "http://www.rasbaalbeck.org" & chr(13) objMail.Subject=request.form("subject") objMail.From ="info.environment@rasbaalbeck.org" objMail.To = rsrec("email") objMail.Body =sbody objMail.Send set objMail = nothing%> Email Sent Successfully... <%end if %>
Subject: