Mi sapete dire dov'è l'errore, perchè la pagina viene eseguita correttemante, ma non viene inviato nulla.
Pagina mail.asp
<%@ Language=VBScript %>
<%
response.expires = -1500
response.AddHeader "PRAGMA", "NO-CACHE"
response.CacheControl = "PRIVATE"
mittente = request("mittente")&""
destinatario = request("destinatario")&""
oggetto = request("oggetto")&""
corpo = request("testo")&""
' Crea l'oggetto email
Set InviaMail = createObject("CDO.Message")
' Dimensiona l'oggetto configurazione
Set objConfig = Server.createObject ("CDO.Configuration")
' Imposta le configurazioni
With objConfig
.Fields.update
End With
' Assegna le configurazioni
Set InviaMail.Configuration = objConfig
'Definiamo i diversi attributi della nostra mail
InviaMail.From = mittente
InviaMail.To = destinatario
InviaMail.Subject = oggetto
'Se il testo è in Html useremo HTMLBody al posto di TextBody
InviaMail.HTMLBody = corpo
'Stabiliamo il livello di importanza (1 o 2)
InviaMail.Fields("urn:schemas:httpmail:importance" ).Value = 2
InviaMail.Fields.Update()
'Inviamo la mail!
InviaMail.Send()
'Eliminiamo l'oggetto...
Set InviaMail = Nothing
%>
e la chiamo così
mail.asp?mittente=luca@posta.it&destinatario=gino@ libero.it&oggetto=Prova&testo=Testo%20di%20prova
Aiutooooooooooooooooo
Rispondi quotando
