<% for each item in request.form if item <> "mail" then body=body&item&": "&request.form(item)&vbcrlf end if next Dim mail Set mail = Server.CreateObject("CDO.Message") mail.From = Request("mittente") mail.To = Request("mail") mail.Subject = "Messaggio da Scambio link" mail.textBody = Body mail.Send Set mail = nothing response.redirect("index.asp") %>