<% cmdSubmit = Request.Form("cmdSubmit") If Not cmdsubmit = "" Then mstrBedrijfsnaam= Trim(Request.Form("txtBedrijfsnaam")) mstrNaam = Trim(Request.Form("txtNaam")) mstrGeslacht = Trim(Request.Form("txtGeslacht")) mstrEmail = Trim(Request.Form("txtEmail")) mstrUitschrijven = Trim(Request.Form("txtUitschrijven")) mstrEnter = chr(13)+chr(10) mstrText = "Bedrijfsnaam:" & mstrBedrijfsnaam & mstrEnter & _ "Naam contacpersoon: " & mstrGeslacht & " " & mstrNaam & mstrEnter & _ "Email: "& mstrEmail & mstrEnter & _ "Uitschrijven: " & mstrEnter & mstrUitschrijven Set Mail = Server.CreateObject("Persits.MailSender") Mail.Host = "netserver2.net" ' Specify a valid SMTP server Mail.From = mstrEmail ' Specify sender's address Mail.FromName = mstrNaam ' Specify sender's name Mail.IsHTML = False Mail.AddAddress "info@indedriehoek.nl", "In de Driehoek" 'Mail.AddAddress "aamhs@rocketmail.com", "Alberto Smulders" Mail.Subject = "Blijf op de hoogte" Mail.Body = mstrText On Error Resume Next Mail.Send If Err.Number <> 0 Then Response.Write "Error encountered: " & Err.Description Else %> <% Response.End End If End if %> Blijf op de hoogte, In de Driehoek, zalencentrum in Utrecht voor vergaderingen, trainingen, workshops, presentaties, recepties, contactbijeenkomsten
De Zalen Prestatie & faciliteiten Eten & Drinken Tarieven Routewijzer
  Wie is wie? Omgeving & bezienswaardigheden
 
" method="post" onSubmit="return formCheck(this);">

Blijf op de hoogte


In de Driehoek houdt u graag op de hoogte van nieuwe faciliteiten en andere ontwikkelingen binnen onze accommodatie. U hoeft alleen hieronder uw gegevens in te vullen en te klikken op de knop <verzenden>. Wij zullen u dan, zodra daar aanleiding toe is, onze Nieuwsflits per e-mail toesturen. Wanneer u deze informatie niet langer wilt ontvangen, hoeft u na het invullen van uw gegevens alleen het vakje 'uitschrijven' aan te klikken en opnieuw op de knop <verzenden> te klikken.

Naam bedrijf:  
t.a.v. mevrouw de heer  
E-mail adres:  
 
uitschrijven
 
 
Home Bereikbaarheid Contact