<% Set Mail = Server.CreateObject("Persits.MailSender") Mail.Host = "smtp.proweb.pl" Mail.Port = 25 Mail.From = "KlientWWW@proweb.pl" Mail.AddAddress Request.Form ("recipient") Mail.Subject = Request.Form ("subject") For Each Item in Request.Form IF Item <> "redirect" AND Item <> "B1" AND Item <> "Submit" AND Item <> "Recipient" AND Item <> "Subject" Then Mail.Body = Mail.Body & Item & " : " & Request.Form(Item) & Chr(13) & Chr(10) End IF Next Mail.Send Set Mail = Nothing Response.Redirect Request.Form("redirect") %>