<% if Request.QueryString ("opt")="y" then
mystr=""
mystr=mystr & "Namm :" & Request.Form ("Namm") &chr(10)
mystr=mystr & "Voornaam :" & Request.Form ("Voornaam") & chr(10)
mystr=mystr & "Firma :" & Request.Form ("Firma") & chr(10)
mystr=mystr & "Straat en nummer :" & Request.Form ("straatennummmer") &chr(10)
mystr=mystr &"Postcode :" & Request.Form("Postcode") &chr(10)
mystr=mystr &"Stad of gemeente :" & Request.Form("Stadofgemeente") &chr(10)
mystr=mystr &"Telefoonnummer algemeen :" & Request.Form ("Telefoonnummeralgemeen") & chr(10)
mystr=mystr &"Telefoonnummer rechtstreeks :" & Request.Form ("Telefoonnummerrechtstreeks") & chr(10)
mystr=mystr &"Faxnummer :" & Request.Form ("Faxnummer") & chr(10)
mystr=mystr & "Email-adres : " & Request.Form ("email") & chr(10)
mystr=mystr & "Uw opmerkingen of vragen :" & Request.Form ("Uwopmerkingenofvragen") & chr(10)
Set oMail = Server.CreateObject("CDONTS.NewMail")
oMail.From = Request.Form ("email")
oMail.To = "info@deroovernv.be"
oMail.Subject = "From" & Request.Form ("Namm")
oMail.Body = mystr
oMail.Send
Set oMail = Nothing
Set oMail = Server.CreateObject("CDONTS.NewMail")
oMail.From = "n.v. Houthandel DE ROOVER"
oMail.To = Request.Form ("email")
oMail.Subject = "www.deroovernv.be"
oMail.Body = "Hartelijk dank voor het invullen van het contactformulier. Wij geven er"& chr(10)&"zo spoedig mogelijk gevolg aan."& chr(10)+chr(10)&"Natuursteen Decor Jacques Bury"& chr(10)&"Jan De Coomanstraat 46"& chr(10)&"9506 Zandbergen"
oMail.Send
Set oMail = Nothing
end if
%>
Houthandel De Roover te Willebroek - Antwerpen
CONTACTFORMULIER
Heeft u vragen
of bedenkingen bij onze website, of wilt u wat meer inlichtingen
over bepaalde producten die Houthandel De Roover N.V. kan
aanbieden, vul dan gewoon onderstaand contactformulier in.
Wij contacteren u dan.
