ciao a tutti. Mi sto cimentando nella realizzazione di una mailing
L'avevo realizzata con CDONT ma il buon amministratore del server m'ha detto che loro hanno installato aspmail allora l'ho rifatta Secondo voi è corretto questo codice o c'è errore?
Prima di pubblicarla volevo un vs consiglio.
1) pagina sendmail.asp con form
<form action="sendmail1.asp" method="post">
<p align="center">
<textarea name="txt" cols="55" rows="5" > </textarea>
</p>
<p align="center">
<input type="submit" name="Submit" value="Invia">
<input type="reset" name="Submit2" value="Reimposta">
</p>
</form>
2) pagina sendmail1.asp
<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<%
txt = Request.Form("txt")
sql = "SELECT EMAIL FROM CLIENTI"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sql, conn ,3,3
rs.movefirst
set email = server.createObject("Persits.MailSender")
email.Host="smtp.video-magic.it"
email.From="info@video-magic.it"
email.FromName="Piero by Video Magic"
email.Subject="La mailing list dei soci di Video Magic"
email.Body=txt
email.IsHtml=false
email.Priority=1
do while not(rs.eof)
email.AddAddress(rs("email"))
rs.movenext
loop
email.send()
set email = nothing
rs.Close
set rs = Nothing
conn.Close
set conn = Nothing
%>
![]()
![]()