Stuy Advocaten

<%@ LANGUAGE="VBScript" %> Stuy Advocaten <% test = Request( "verstuur") if test <> "" then opdracht="send email" else opdracht="input form" end if if opdracht = "send email" then 'Send mail Dim BodyText BodyText = "Gegevens " & CHR(13)&CHR(10) & "" bodytext = bodytext & "Bedrijfsnaam: " & request("bedrijfsnaam") bodytext = bodytext & CHR(13)&CHR(10) bodytext = bodytext & "Naam: " & request("naam") bodytext = bodytext & CHR(13)&CHR(10) bodytext = bodytext & "Adres: " & request("adres") bodytext = bodytext & CHR(13)&CHR(10) bodytext = bodytext & "Postcode en woonplaats: " & request("postcode") & request("woonplaats") bodytext = bodytext & CHR(13)&CHR(10) bodytext = bodytext & "Land: " & request("land") bodytext = bodytext & CHR(13)&CHR(10) bodytext = bodytext & "Telefoonnummer: " & request("telefoon") bodytext = bodytext & CHR(13)&CHR(10) bodytext = bodytext & "Fax: " & request("fax") bodytext = bodytext & CHR(13)&CHR(10) bodytext = bodytext & "E-mail: " & request("e-mail") bodytext = bodytext & CHR(13)&CHR(10) bodytext = bodytext & "Vraag: " & request("vraag") bodytext = bodytext & CHR(13)&CHR(10) set mailer = server.createobject("ABMailer.Mailman") mailer.MailDate = NOW mailer.mailsubject = "De aanvraag" & NOW mailer.ReplyTo = "site@advocaten-incasso.com" mailer.SendTo ="info@advocaten-incasso.com" mailer.ServerAddr = "195.7.209.66" mailer.ServerPort = 25 mailer.MailMessage = bodytext mailer.sendmail set mailer = Nothing %>

Your message has been sent...

Click here to go back...

<% else %>

Si vous avez des questions à nous poser, n'hésitez pas à utiliser notre page de courrier électronique. Nous pouvons, si vous le désirez, vous contacter pour répondre directement à vos questions. Vous pouvez aussi poser sur cette page d'autres questions concernant par exemple les frais d'une procédure de recouvrement.

<% end if %>