% Dim mailadr, modtager, svar, tilmeld, frameld IF request.form("action") = "Yes" THEN tilmeld = request.form("tilmeld") frameld = request.form("frameld") mailadr = request.form("mailadr") modtager = "subscribe@aspwebhotel.dk" IF tilmeld = "Tilmeld nyhedsbrev" THEN emne = "join nyhedsbrev@aspwebhotel.dk" svar = "Du er nu tilmeldt vort nyhedsbrev, du har ligeledes modtaget en email med en bekræftelse." ELSE emne = "leave nyhedsbrev@aspwebhotel.dk" svar = "Du er nu frameldt vort nyhedsbrev, du har ligeledes modtaget en email med en bekræftelse." END IF Set JMail = Server.CreateObject( "JMail.Message" ) JMail.Logging = true JMail.From = mailadr JMail.Subject = emne JMail.AddRecipient modtager 'JMail.Send( "212.130.14.203" ) if not JMail.Send("wsmail.web-solutions.eu" ) then Response.write "
" & JMail.log & "<\pre>"
end if
END IF
%>
ASP Webhotel - Priser fra 99/md inkl. FP-extentions, Database, Statistik, SSI, CGI
og meget mere


Hastighed, kvalitet og stabilitet til rimelige priser!
Nyhedsbrev
Yderligere
oplysninger:
Priser mv.
FAQ's
Gå til bestilling
ASP
Webhotel / Web Solutions Thorsgade 1 DK-5000 Odense C Tel:70262025
Fax: 70262024
Copyright 1998 - 2009 All rights reserved Læs vore
forretningsbetingelser