Salve sono un nuovo utente.
Complimenti per il forum, spero di ricavarne anche io qualche profitto o meglio qualche insegnamento.
Vengo al dunque, mi sono buttato sull'asp da poco, ho creato un modulo per invio mail ma non funziona...
ma devo salvare entrambi i file in .asp?
Ecco i due codici:
IL secondo:
Grazie a tutti in anticipo
Complimenti per il forum, spero di ricavarne anche io qualche profitto o meglio qualche insegnamento.
Vengo al dunque, mi sono buttato sull'asp da poco, ho creato un modulo per invio mail ma non funziona...
ma devo salvare entrambi i file in .asp?
Ecco i due codici:
Codice:
<form name="form" id="form" method="post" action="inviata.asp">
<p>Mittente:<br /><input name="mittente" type="text" id="mittente" size="40" /></p>
</p>
<p>Oggetto:<br /><input name="oggetto" type="text" id="oggetto" size="40" /></p>
<p>Messaggio:<br /><textarea name="messaggio" cols="80" rows="7" id="messaggio"></textarea></p>
<p><input type="submit" name="Submit" value="Invia Email" /> <input type="reset" name="submit2" value="Riscrivi Email" /></p>IL secondo:
Codice:
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head><%
Dim iMsg, iConf, Flds
Set iMsg = CreateObject("CDO.Message")
Set iConf = CreateObject("CDO.Configuration")
Set Flds = iConf.Fields
Flds("http://schemas.microsoft.com/cdo/configuration/urlgetlatestversion") = True
mittente= Trim(Request.Form("mittente"))
destinatario = "[email protected]"
oggetto = Trim(Request.Form("oggetto"))
messaggio = Trim(Request.Form("messaggio"))
With iMsg
Set .Configuration = iConf
.From = mittente
.To = destinatario
.Subject = oggetto
.TextBody = messaggio
.Send()
end with
set Flds = Nothing
set iConf = Nothing
set iMsg = Nothing
%>Grazie a tutti in anticipo
