<% action= request.querystring("action") mname = request.querystring("name") mfirma = request.querystring("firma") mmail = request.querystring("mail") mtel = request.querystring("tel") mthema = request.querystring("thema") mfrage = request.querystring("frage") if action = "" then action = "kontakt" end if %> Sanitär Läpple
<%end if if action = "fehler" then%> <%end if%>

<%if action = "kontakt" then%>
Kontakt

Möchten Sie uns eine Anfrage senden? Oder wünschen Sie ein Angebot? Oder brauchen Sie eine kreative Lösung für Ihr Problem? Über dieses Formalur können Sie jederzeit mit uns in Kontakt treten. Wir beantworten Ihre Fragen und Wünsche schnell und kompetent.

* Name

Firma

* E-Mail

* Telefon

* Betreff

* Anfrage


<%end if%> <%if action = "send" then Set Mail = Server.CreateObject("Persits.MailSender") Mail.Host = "192.168.70.18" ' Specify a valid SMTP server Mail.From = mmail Mail.FromName = mname 'Mail.AddAddress "smatk@hwk-stuttgart.de" Mail.AddAddress "s.bach@schwartz.de" Mail.AddReplyTo mmail Mail.Subject = "Kontaktformular www.sanitär-läpple.de" Mail.Body = "Name: " & mname & vbcrlf & "Firma: " & mfirma & vbcrlf & "E-Mail: " & mmail & vbcrlf & "Telefon: " & mtel & vbcrlf & "Betreff: " & mthema & vbcrlf & vbcrlf & "Anfrage:" & vbcrlf & mfrage & vbcrlf On Error Resume Next Mail.Send If Err <> 0 Then action = "fehler" else action = "erfolg" end if end if if action = "erfolg" then%>

Vielen Dank für Ihre Anfrage! Wir melden uns bei Ihnen in Kürze.


Beim Versenden Ihrer Anfrage ist ein Fehler aufgetreten!
Probieren Sie es bitte später noch einmal.