<% ' Bestellung senden if request.querystring("action") = "send" then strNachricht = "Kontaktformular Mobilo," & VbCrLf & VbCrLf & VbCrLf strNachricht = strNachricht & "Firma: " & trim(request.form("firma")) & VbCrLf strNachricht = strNachricht & VbCrLf & VbCrLf strNachricht = strNachricht & "Name: " & trim(request.form("name")) & VbCrLf strNachricht = strNachricht & "Strasse: " & trim(request.form("strasse")) & VbCrLf strNachricht = strNachricht & "PLZ, Ort: " & trim(request.form("ort")) & VbCrLf strNachricht = strNachricht & "Telefon: " & trim(request.form("telefon")) & VbCrLf strNachricht = strNachricht & "E-Mail: " & trim(request.form("email")) & VbCrLf & VbCrLf & VbCrLf strNachricht = strNachricht & "Kommentar: " & VbCrLf & VbCrLf & trim(request.form("kommentar")) & VbCrLf ' Email abschicken: set Mail = Server.CreateObject("Persits.MailSender") Mail.Host = "mail.rbm.de" 'Mail.Host = "192.168.0.4" Mail.From = "info@shoprouter.de" Mail.AddAddress "mobilo@mobilogmbh.de" Mail.Subject = "Kontaktformular Mobilo" Mail.Body = strNachricht on Error resume next Mail.Send end if %>

<% if request.querystring("action") = "send" then %> • Trennvorhänge • Hallenteiler • Ballfangnetze • Prallschutz • Teleskoptribünen • Teleskoptribünenservice • Kontakte • Impressum Dornaperstr. 16/18 D-42327 Wuppertal Tel: 02058/899800 Fax: 02058/899801 <% else %> Vielen Dank! Wir kümmern uns schnellst möglich um Ihre Anfrage. <% end if %> Haben Sie Fragen und wollen sich mit uns in Verbindung setzen? Dann nutzen Sie doch unser Kontaktformular. Wir freuen uns auf Ihre Nachricht. Auch Anregungen, Wünsche und Beschwerden nehmen wir gerne entgegen. Firma: Name: Straße: PLZ, Ort: Telefon: E-Mail: Kommentar: