mandare email da form

[RobinHoood]

ciao a tutti,
sto tentando di inviare un email partendo da un form.quando cerco di ricevere il campo email ed inserirlo nella variabile Mittente non mi invia più il messaggio. vi posto il codice e vi chiedo aiuto!!!

grazie



<center>
<form action="/newsend.asp" method="post">
IL TUO NOME


<input name="nome" type="text" value="inserisci qui il tuo nome" size="45">


IL TUO INDIRIZZO EMAIL


<input name="email" type="text" value="inserisci qui il tuo indirizzo email" size="45">


OGGETTO DEL MESSAGGIO


<input name="oggetto" type="text" value="inserisci qui l'oggetto del tuo messaggio" size="45">


CORPO DEL MESSAGGIO


<textarea cols="50" rows="15" name="corpo">inserisci qui il corpo del tuo messaggio</textarea>


<input type="submit" name="pulsante" value="invia">
</form>
</center>


<%
'Impostiamo le nostre preferenze
Dim Destinatario, Mittente, Oggetto, Testo
Destinatario = "mymail@tele2.it"
Mittente = request.form("email")
Oggetto = request.form("oggetto")
Testo = request.form("corpo")

'Creiamo l'oggetto mail con CDOSYS
Dim eMail
Set eMail = CreateObject("CDO.Message")

'Definiamo i diversi attributi della nostra mail
eMail.From = Mittente
eMail.To = Destinatario
eMail.Subject = Oggetto

'Se il testo è in Html useremo HTMLBody al posto di TextBody
eMail.TextBody = Testo

'Stabiliamo il livello di importanza (1 o 2)
eMail.Fields("urn:schemas:httpmail:importance").Va lue = 2
eMail.Fields.Update()

'Inviamo la mail!
eMail.Send()

'Eliminiamo l'oggetto...
Set eMail = Nothing
%>

[Vash SD]

premetto che non sono propio bravissimo quindi se sbaglio, scusami ma ci volevo provare.

prova a sustiturie questo:

eMail.From = Mittente
eMail.To = Destinatario
eMail.Subject = Oggetto

con

eMail.From = " & Mittente & "
eMail.To = " & Destinatario & "
eMail.Subject = " & Oggetto & "

e dimmi se funziona.

[RobinHoood]

ok ho risolto , grazie . non ho provato come hai consigliato, era un problema di indirizzi fasulli che inserivo per fare le prove.
Grazie lo stesso