(Resolvido) Filtro para envio de email

[David Galiano]

Olá,

Eu queria saber como faço, para os email que aparecerem em minha lista de cadastrados do newsletter, ao eu clicar no botão "Avançar" seja enviado um email para cada um de acordo com um filtro pré determinado?

O código atual está o seguinte:

<!--#include file="conexao.inc.asp"-->

<style type="text/css">

<!--

.style1 {

font-size: 18px;

font-weight: bold;

}

.style3 {color: #FF0000}

.style4 {color: #0099CC}

-->

</style>

<p align="center" class="style1"><font color="#003399">Enviar Mala Direta </font></p>

<form name="form1" method="post" action="?id=newsPE">

<div align="center">Selecione o e-mail a ser enviado

<select name="email" id="email">

<%

dim pemail

set pemail = lojadb.execute("select * from emails_news")

while not pemail.eof

%>

<option value="<%= pemail("id") %>"><%= pemail("titulo") %></option>

<%

pemail.movenext

wend

pemail.close

set pemail = nothing

%>

</select>

<br>

<br>

</div>

<table width="87%" border="0" align="center" cellpadding="0" cellspacing="2">

<%

dim pem

set pem = lojadb.execute("select * from newsletter")

while not pem.eof

%>

<tr>

<td width="2%" bgcolor="#EEEEEE"><input name="chk" type="checkbox" id="chk" value="<%= pem("id") %>" checked></td>

<td width="34%" bgcolor="#EEEEEE">

<div align="left"><%= pem("nome") %> </div></td>

<td width="64%" bgcolor="#EEEEEE">

<div align="left"><%= pem("newsmail") %></div></td>

</tr>

<%

pem.movenext

wend

pem.close

set pem = nothing

%>

</table>

<p align="center">

<input type="submit" name="Submit" value="Avan&ccedil;ar">

</p>

</form>

Valeu!

[Rafael Spilki]

Basta você colocar os filtros no seu select usando cláusulas de where, por exemplo:

set pemail = lojadb.execute("select * from emails_news where campo_bd = '"&variavel_form&"'")

sacou?

[]'s Rafael Spilki

[David Galiano]

Entedi.

Valeu!