Want to protect your cyber security and still get fast solutions? Ask a secure question today.Go Premium

x
  • Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 333
  • Last Modified:

Sending Email to Multiple Email Addresses (Textbox)

I would like to know how to send an email out to mulitple email address that are specified inside a textbox tag.

For example:

greg@somewhere.com
mary@microsoft.com
joe@someplace.net

In the <textbox> each email address is on a separate line.

Can anyone help me with this?

Thank you,
-Greg
0
greddin
Asked:
greddin
1 Solution
 
dukestaTAICommented:
Make a form with text box called message and a textbox called recipients

<!--METADATA TYPE="typelib" UUID="CD000000-8B95-11D1-82DB-00C04FB1625D" NAME="CDO for Windows 2000 Type Library" -->
<!--METADATA TYPE="typelib" UUID="00000205-0000-0010-8000-00AA006D2EA4" NAME="ADODB Type Library" -->

<%@ Language=VBScript %>

<HTML>
<BODY>
<%
Dim strHTML
DIM iMsg, Flds, iConf

Set iMsg = CreateObject("CDO.Message")
Set iConf = CreateObject("CDO.Configuration")
Set Flds = iConf.Fields

Flds(cdoSendUsingMethod) = cdoSendUsingPort
Flds(cdoSMTPServer) = "127.0.0.1"
Flds(cdoSMTPServerPort) = 25
Flds(cdoSMTPAuthenticate) = cdoAnonymous ' 0
Flds.Update

strHTML = "<HTML>"
strHTML = strHTML & "<HEAD>"
strHTML = strHTML & "<BODY>"
strHTML = strHTML & "<Table>"
strHTML = strHTML & "<td><b> This is a request from a Client</b><br><br><br></td><tr>"
strHTML = strHTML & "<td><b>Message:</b></td><td>&nbsp;&nbsp;" & Request.Form("frmMessage") & "</td>
strHTML = strHTML & "</Table>"
strHTML = strHTML & "</BODY>"
strHTML = strHTML & "</HTML>"

With iMsg
Set .Configuration = iConf
.To = "" & Replace(Request.Form("Recipients"), "vbcrlf", ", ") & ""
.From = "Client@YOURDOMAIN"
.Subject = "This is a request from a Client"
.HTMLBody = strHTML
.Send
End With

Set iMsg = Nothing
Set iConf = Nothing
Set Flds = Nothing

Response.Redirect "email.asp"

%>


</BODY>
</HTML>
0
 
greddinAuthor Commented:
Thanks for your help!
0

Featured Post

Free Tool: Port Scanner

Check which ports are open to the outside world. Helps make sure that your firewall rules are working as intended.

One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.

Tackle projects and never again get stuck behind a technical roadblock.
Join Now