Varför funkar inte denna kod nu då???
Set mail = Server.CreateObject("CDONTS.NewMail")
mail.Subject = Request.form("amne")
mail.Body = Request.Form("meddelande")
mail.From = "info@bla.se"
mail.Host = "xxxxx"
mail.To = "Kundlista@bla.se"
epost = request.form("epost")
if instr(epost, ",") >0 then
for each item in request.form("epost")
mail.bcc item
next
else
mail.bcc "" & epost & ""
end if
mail.Send
set mail = Nothing
%>