>> Torna all'Homepage <<
Contattaci Entra nei forum Cerca nel sito
News della settimana ASP: esempi di pagine dinamiche Trucchi e suggerimenti per il PC Manuali e guide I dossier e gli approfondimenti di AmicoPc Il sito della settimana I racconti di Armando Staffa Chi siamo
     
 

 

Scarica i file
Scarica i file
citati in questa pagina

 


GESTIONE NEWSLETTER
1/2

Impostiamo ora il mittente di questa email (ovvero il nostro indirizzo)

confermaMail.From = "tuo_indirizzo@tuo_sito.com"

L'email dell'utente a cui inviare la conferma è contenuta nella variabile indirizzo: quindi scriveremo

confermaMail.To = indirizzo

Definiamo l'oggetto dell'email

confermaMail.Subject = "Conferma registrazione alla newsletter"

Specifichiamo il formato dell'email stessa (1 = html, 0 = testo)

confermaMail.BodyFormat = 1
confermaMail.MailFormat = 0

Il testo dell'email è contenuto nella variabile confermaCorpo, quindi avremo

confermaMail.Body = confermaCorpo

Inviamo l'email

confermaMail.Send
set confermaMail = Nothing

Inviamo ora l'email al programma di gestione della newsletter, ovvero alla nostra casella di posta elettronica:

Dim iscriviMail
Set iscriviMail = CreateObject("CDONTS.NewMail")
iscriviMail.From = indirizzo
iscriviMail.To = "tua_email@tuo_sito.com"
iscriviMail.Subject = "iscrizione_newsletter"
iscriviMail.BodyFormat = 1
iscriviMail.MailFormat = 1
iscriviMail.Body = "-"
iscriviMail.Send
set iscriviMail = Nothing

In questo caso come destinatario sarà il nostro indirizzo email, come mittente l'indirizzo email dell'utente.
Come oggetto dell'email abbiamo abbiamo inserito iscrizione_newsletter in modo che il nostro programma Emailing List possa riconoscerlo come messaggio di iscrizione alla newsletter stessa.
Inviate entrambe le email visualizziamo una pagina di conferma

response.redirect "ok.htm"

Nel caso in cui l'indirizzo email inserito fosse già presente nel database (ricordate l'if rs.eof iniziale?) chiudiamo la connessione al database e visualizziamo la pagina di errore passandole il parametro errore=esiste

else
rs.close
set rs=nothing
conn.close
set conn=nothing
response.redirect "errore.asp?errore=esiste"
end if
%>

ERRORE.ASP
Mediante questa pagina saremo in grado di gestire gli eventuali errori generati nell'esecuzione delle pagine (indirizzo non valido o già esistente, indirizzo mancante...)
Ogni volta che questa pagina viene richiamata le viene passato il parametro errore il cui valore cambia di volta in volta: grazie a questo parametro possiamo visualizzare un messaggio di errore di volta in volta diverso.
Utilizzeremo infatti il comando select case: in base al valore assunto dalla variabile visualizzeremo un messaggio di errore appropriato.

Per prima cosa dobbiamo prendere il valore del parametro contenuto nella stringa di collegamento e lo memorizziamo nella variabile errore.

<%
errore=request.querystring("errore")

Se questo parametro è vuoto significa che qualcuno ha richiamato direttamente questa pagina, quindi lo reindirizziamo verso la pagina iniziale.

if errore="" then response.redirect "index.htm"

Cominciamo a definire i possibili messaggi di errore in base al valore del parametro.
La struttura di select case è molto semplice:

select case nome_variabile

caso "1"
codice da eseguire

caso "2"
codice da eseguire

...

end select

dove 1, 2... sono i possibili valori assunti dalla variabile.
Quindi avremo

select case errore
case "esiste"
messaggio = "L'indirizzo email inserito è già iscritto alla newsletter"

case "manca"
messaggio= "L'indirizzo email inserito non è risulta iscritto alla newsletter"

case "sbagliato"
messaggio= "L'indirizzo email inserito non è corretto"

case "vuoto"
messaggio= "Occorre specificare l'indirizzo email "

end select
%>

Quindi se il parametro errore ha come valore esiste, la variabile messaggio sarà "L'indirizzo email inserito è già iscritto alla newsletter"

A questo punto prepariamo una normale pagina all'interno della quale visualizzare il messaggio di errore. Nel punto in cui si desidera visualizzarlo sarà sufficiente scrivere

<% response.write messaggio %>

<html>
<head>
<title>Newsletter</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>
<body bgcolor="#FFFFFF" text="#666666" link="#808080" vlink="#808080" alink="#808080">
<p align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="2" color="#D90000"><b><font color="#c60000">ATTENZIONE!</font></b></font></p>
<p align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="2"><% response.write messaggio %><br>
Verificare i dati e riprovare.</font></p>
</body>
</html>

 

<< indietro

Utenti connessi: 49

Invia questa pagina ad un amico

 

 

 

Chi siamo | Pubblicità | Note sulla privacy | Dicono di noi
Grafica cura di Paolo Omero
- Stefania Migliorucci