Corsi di Cultura - ASP e PHP ed. 2002

	Corsi di Cultura Informatica (edizione 2002) CICAIA Centro Interdipartimentale di Calcolo Automatico e Informatica Applicata dell'Università di Modena e Reggio Emilia CEDOC Centro Documentazione della Provincia di Modena
ASP e PHP

argomenti ASP

presentazione

Inclusione lato server

Bibliografia e siti web

Spedire e-mail

Un altro esempio utile nella programazione ASP: la spedizione di e-mail da una pagina WEB.
Per effettuare la spedizione deve essere installato sul server WEB anche il server di posta.
Si utilizza l'oggetto newmail come segue:

 Set objMail=Server.CreateObject("CDONTS.NewMail")
     objMail.Send mittente, destinatario, oggetto, testo_del_messaggio, 1
     Set objMail=nothing

Esempio

Supponiamo di mettere a disposizione dei visitatori un modulo di richiesta informazioni:

La pagina .ASP richiamata dal tasto della form: ES33

nome del file: es33.asp

<html>
<head> <title> La mia pagina ASP 33 </title>
</head>
<body>
Questa è la mia pagina ASP 33
<br>
<pre>
<% 
'
' ricezione dei dati della form
'
<%
   TR=request.form ("tipo_rich")
   if tr=1 then dest="support@unimo.it"
   if tr=2 then dest="info@unimo.it"
   if tr=3 then dest="help@unimo.it" 
 
   messaggio="------------- richiesta informazioni ------------------" & chr(13) & chr(13)
   messaggio=messaggio & "Richiesto da: " & request("nome_utente") & " - " & ute & chr(13) 
   messaggio=messaggio & "Tipo richiesta: " & tr & chr(13)  & chr (13)
   messaggio=messaggio & "commenti: " &  request("commenti") & chr (13)

   Set objMail=Server.CreateObject("CDONTS.NewMail")
     objMail.Send "nasi@unimo.it", dest, "richiesta info", messaggio, 1
     Set objMail=nothing
     response.write "La richiesta è  stata inviata"
%>
</pre>
</body>
</html>