send email to selected users in DB

i use access db and aspEmail but you can rearrange this for your use

---------------------------------------
<%
Dim Mail, customer

set conn=Server.CreateObject("ADODB.Connection")
conn.provider="Microsoft.Jet.OLEDB.4.0"
conn.open(server.mappath("database.mdb"))
set rs = Server.CreateObject("ADODB.Recordset")
rs.Open "SELECT customers.custemail FROM customers, orders WHERE orders.cust_id=customers.cust_id AND orders.lottostate='" & Request.Form("lottostate") & "' AND orders.order_status='active' AND orders.expire_date>= date() ", conn
%>
<%
do until rs.EOF
%>
<%
customer=rs("custemail")
%>
<%
Set Mail = Server.CreateObject("Persits.MailSender")
Mail.Host = "smtp.domain.com" ' Specify a valid SMTP server
Mail.From = "email@website.com" ' Specify sender's address
Mail.FromName = "Your From Name" ' Specify sender's name
Mail.AddAddress customer
Mail.AddReplyTo "email@website.com"
Mail.Subject = "..Your Subject.."
Mail.isHTML = True
Mail.Body = request.form("body")

On Error Resume Next
Mail.Send

IF Err <> 0 THEN
Response.Write "Ah man.. you messed it up!! <font color=""#ff0000"">""" & Err.Description & """</font>"
END IF
%>

<%
rs.MoveNext
loop
%>

<%
rs.close
conn.close
Set Mail = Nothing
Set rs = Nothing
set conn = Nothing
%>

<%
Response.Write "Your message has been successfully sent.<br /><br /><strong><font color=""#FF0000""><a href=""page.asp"">BACK</a></font></strong& gt;</font>"
%>
----------------------------------------------------

hope that helps

ok cap lock

what is your submit form code

you can put an "if then" statment in your SELECT string.... to check if a text field is empty if its not then then response.write it into your SELECT string
-----------------------------

sqlselect ="SELECT * FROM emails WHERE " "

<% if Requst.form("surname")="" then  %><%else%>
sqlselect = sqlselect & " surname=' " & Request.Form("surname") &" ' "
<%end if%>

---------------------------
something like that