Help, mijn formulier werkt niet

Status
Niet open voor verdere reacties.
L

Liejan

Gebruiker
Lid geworden
27 feb 2007
Berichten
9
Hallo,

Mijn voorganger, webmaster van www.paragamesbreda.eu had een ASP formulier gemaakt en dat willen verzenden met CDONTS. Toen werkte dat al niet. Nu heb ik het geprobeerd met CDO.Message, maar dat wil ook niet. Wie kan me helpen? Hieronder staat de complete code

Groetjes,

Liejan van Horen-Meeusen

<%@ LANGUAGE="JScript" %>
<%

function Goed()
{
%>
&nbsp;
<%
}

function Fout()
{
%>
<font face="Verdana,Arial,Helvetica,Courier" size="2" color="red"><b>&nbsp;invullen aub</b></font>
<%
}

function Check(variabele)
{
if (sCommand=="Verzenden")
{
if(variabele=="")
{
Fout();
}
else
{
Goed();
}
}
}

if (Request.Form("cm").Count)
{
ExitCode=1;

sCommand=""+Request.Form("cm");
Voorletters=Request.Form("Voorletters");
Tussen=Request.Form("Tussen");
Achternaam=Request.Form("Achternaam");
Adres=Request.Form("Adres");
Postcode=Request.Form("Postcode");
Woonplaats=Request.Form("Woonplaats");
Geslacht=Request.Form("Geslacht");
Gebdag=Request.Form("Gebdag");
Gebmaand=Request.Form("Gebmaand");
Gebjaar=Request.Form("Gebjaar");
Telefoon=Request.Form("Telefoon");
Email=Request.Form("Email");
Tshirt=Request.Form("Tshirt");
Functie=Request.Form("Keuzedag");
Functie=Request.Form("Functie");
Opmerkingen=Request.Form("Opmerkingen");

if (Voorletters=="")
ExitCode=0;

if (Achternaam=="")
ExitCode=0;

if (Adres=="")
ExitCode=0;

if (Postcode=="")
ExitCode=0;

if (Woonplaats=="")
ExitCode=0;

if (Telefoon=="")
ExitCode=0;
}
else
{
sCommand="";
Voorletters="";
Tussen="";
Achternaam="";
Adres="";
Postcode="";
Woonplaats="";
Geslacht="";
Gebdag="";
Gebmaand="";
Gebjaar="";
Telefoon="";
Email="";
Tshirt="";
Keuzedag="";
Functie="";
Opmerkingen="";

}

if ( (sCommand!="") && (ExitCode==1) )

{
MAILBOX= "Formulier VRIJWILLIGERS" + "\n";
MAILBOX+= "________________________________________________________" + "\n";
MAILBOX+= "Ingevuld door:\n";
MAILBOX+= "Voorletters: "+Request.Form("Voorletters")+"\n";
MAILBOX+= "Tussenvoegsels: "+Request.Form("Tussen")+"\n";
MAILBOX+= "Achternaam: "+ Request.Form("Achternaam")+"\n";
MAILBOX+= "Adres: " + Request.Form("Adres")+"\n";
MAILBOX+= "Postcode: " + Request.Form("Postcode")+"\n";
MAILBOX+= "Woonplaats: " + Request.Form("Woonplaats")+"\n";
MAILBOX+= "Geslacht: " + Request.Form("Geslacht")+"\n";
MAILBOX+= "Geboortedatum: " + Request.Form("Gebdag")+" - " + Request.Form("Gebmaand")+" - " + Request.Form("Gebjaar")+"\n";
MAILBOX+= "Telefoon: "+ Request.Form("Telefoon")+"\n";
MAILBOX+= "Emailadres: " + Request.Form("Email")+"\n";
MAILBOX+= "Maat T-shirt: " + Request.Form("Tshirt")+"\n";
MAILBOX+= "________________________________________________________" + "\n";
MAILBOX+= "Dag van beschikbaarheid: " + "\n";
MAILBOX+= Request.Form("Keuzedag") + "\n";
MAILBOX+= "Functie: " + Request.Form("Functie")+"\n";
MAILBOX+= "________________________________________________________" + "\n";
MAILBOX+= "Opmerkingen:\n";
MAILBOX+= Request.Form("Opmerkingen")+"\n";
MAILBOX+= "________________________________________________________" + "\n";
MAILBOX+= "Einde formulier." + "\n";

Set iMsg = CreateObject("CDO.Message")
Set iConf = CreateObject("CDO.Configuration")
Set Flds = iConf.Fields
Flds("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
Flds("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "84.244.149.60"
Flds("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
Flds("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1
Flds("http://schemas.microsoft.com/cdo/configuration/sendusername") = "secretariaat@paragamesbreda.eu"
Flds("http://schemas.microsoft.com/cdo/configuration/sendpassword") = ""
Flds("http://schemas.microsoft.com/cdo/configuration/sendemailaddress") = "noreply@paragamesbreda.eu"
Flds.Update
Set iMsg.Configuration = iConf
iMsg.To = "secretariaat@paragamesbreda.eu"
iMsg.From = "noreply@paragamesbreda.eu"
iMsg.Subject = "Inschrijving"
strBody = MAILBOX
iMsg.HTMLBody = strBody
iMsg.Send

sCommand = "verstuurd";
}
%>
<html>

<head>
<meta http-equiv="content-type" content="text/html;charset=ISO-8859-1">
<% if (sCommand == "verstuurd")
{%>
<meta http-equiv="refresh" content="3;url=vrijwilligers_send.html">
<% }%>
<title>ParaGamesBreda</title>
<link rel="stylesheet" href="huisstijl.css">
</head>

<body leftmargin="170" rightmargin="20" topmargin="10" marginheight="10" background="httpdocs/img/bg_beeldmain.gif" bgproperties="fixed" bgcolor="white">
<script type="text/javascript" src="milonic_src.js"></script>
<script type="text/javascript">

if(ns4)_d.write("<scr"+"ipt type=text/javascript src=mmenuns4.js><\/scr"+"ipt>");
else _d.write("<scr"+"ipt type=text/javascript src=mmenudom.js><\/scr"+"ipt>");

</script>
<script type="text/javascript" src="menu_data.js"></script>
<script type="text/javascript" src="keypress.js" ></script>
<form name="vrijwilliggersformulier" method="post" action="vrijwilligers.asp">
<input type="hidden">
<%
if (sCommand== "verstuurd")
{
%>
<p>
<font color="red" face="Verdana,Arial,Helvetica,Courier" size="2">
<b>Uw aanvraag wordt verstuurd.</b><br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
</font>
</p>
<%
}
%>
<p>
<font face="Verdana,Arial,Helvetica,Courier" size="3" color="red">
<b>Vrijwilligers</b><br>
<br>
</font>
<font face="Verdana,Arial,Helvetica,Courier" size="2" color="red"><b>
VRIJWILLIGERS GEZOCHT!</b><br>
</font><font face="Verdana,Arial,Helvetica,Courier" size="2" color="black">Mede dankzij de inzet en enthousiaste medewerking van vrijwilligers wordt Para</font><font size="2" color="red" face="Verdana,Arial,Helvetica,Courier">Games</font><font size="2" color="black" face="Verdana,Arial,Helvetica,Courier">Breda</font><font size="2" color="red" face="Verdana,Arial,Helvetica,Courier">!</font><font face="Verdana,Arial,Helvetica,Courier" size="2" color="black"> een succes!<br>
<br>
Stichting Para</font><font size="2" color="red" face="Verdana,Arial,Helvetica,Courier">Games</font><font size="2" color="black" face="Verdana,Arial,Helvetica,Courier">Breda</font><font size="2" color="red" face="Verdana,Arial,Helvetica,Courier">!</font><font face="Verdana,Arial,Helvetica,Courier" size="2" color="black"> is daarom op zoek naar vrijwillige medewerkers, die zich willen inzetten om ons te helpen tijdens de uitvoering van Para</font><font size="2" color="red" face="Verdana,Arial,Helvetica,Courier">Games</font><font size="2" color="black" face="Verdana,Arial,Helvetica,Courier">Breda</font><font size="2" color="red" face="Verdana,Arial,Helvetica,Courier">!</font><font face="Verdana,Arial,Helvetica,Courier" size="2" color="black"><br>
<br>
In verschillende vrijwillige vormen kunt u uw bijdrage leveren.<br>
Van chauffeur tot begeleider van sporters en clinics.<br>
Van logistiek controller tot parkeerco&ouml;rdinator.
<br>
<br>
<img id="Portretfoto_van_twee_vrijwilligers" alt="Portretfoto van twee vrijwilligers" name="Portretfoto_van_twee_vrijwilligers" align="right" valign="top" src="httpdocs/img/vrijwilligers.jpg" style="padding: 3px" height="133" border="0" width="100"></font><font face="Verdana,Arial,Helvetica,Courier" size="2" color="red"><b>Meld u aan als vrijwilliger!<br></b>
</font><font face="Verdana,Arial,Helvetica,Courier" size="2" color="black">
Wilt u meewerken aan een nieuw evenement voor sporters met een lichamelijke beperking?<br>
Wilt u weten of u iets voor de stichting kunt betekenen, vult u dan onderstaand formulier in en u ontvangt zo spoedig mogelijk meer informatie.<br>
<br>
<b>Persoonlijke gegevens:<br></b>
<br>
<i>De met een <font face="Verdana,Arial,Helvetica,Courier" size="2" color="red"><b>*</b></font> aangegeven velden zijn verplicht in te vullen.</i><br>
<br>
</font>
<table border="0" cellpadding="0" cellspacing="2">
<tr>
<td valign="middle" align="left"><font face="Verdana,Arial,Helvetica,Courier" size="2"><b>Voorletter(s) </b></font><font face="Verdana,Arial,Helvetica,Courier" size="2" color="red"><b>*</b></font><font face="Verdana,Arial,Helvetica,Courier" size="2"><b><br>
</b></font></td>
<td valign="middle" align="left"><input type="text" name="Voorletters" size="24" value="<% =Voorletters %>"><%
Check(Voorletters);
%></td>
</tr>
<tr>
<td valign="middle" align="left"><font face="Verdana,Arial,Helvetica,Courier" size="2"><b>Tussenvoegsel</b></font><font face="Verdana,Arial,Helvetica,Courier" size="2"><b><br>
</b></font></td>
<td valign="middle" align="left"><input type="text" name="Tussen" size="24" value="<% =Tussen %>"></td>
</tr>
<tr>
<td valign="middle" align="left"><font face="Verdana,Arial,Helvetica,Courier" size="2"><b>Achternaam </b></font><font face="Verdana,Arial,Helvetica,Courier" size="2" color="red"><b>*</b></font><font face="Verdana,Arial,Helvetica,Courier" size="2"><b><br>
</b></font></td>
<td valign="middle" align="left"><input type="text" name="Achternaam" size="24" value="<% =Achternaam %>"><%
Check(Achternaam);
%></td>
</tr>
<tr>
<td valign="middle" align="left"><font face="Verdana,Arial,Helvetica,Courier" size="2"><b>Adres </b></font><font face="Verdana,Arial,Helvetica,Courier" size="2" color="red"><b>*</b></font><font face="Verdana,Arial,Helvetica,Courier" size="2"><b><br>
</b></font></td>
<td valign="middle" align="left"><input type="text" name="Adres" size="24" value="<% =Adres %>"><%
Check(Adres);
%></td>
</tr>
<tr>
<td valign="middle" align="left"><font face="Verdana,Arial,Helvetica,Courier" size="2"><b>Postcode </b></font><font face="Verdana,Arial,Helvetica,Courier" size="2" color="red"><b>*</b></font><font face="Verdana,Arial,Helvetica,Courier" size="2"><b><br>
</b></font></td>
<td valign="middle" align="left"><input type="text" name="Postcode" size="24" value="<% =Postcode %>"><%
Check(Postcode);
%></td>
</tr>
<tr>
<td valign="middle" align="left"><font face="Verdana,Arial,Helvetica,Courier" size="2"><b>Woonplaats </b></font><font face="Verdana,Arial,Helvetica,Courier" size="2" color="red"><b>*</b></font><font face="Verdana,Arial,Helvetica,Courier" size="2"><b><br>
</b></font></td>
<td valign="middle" align="left"><input type="text" name="Woonplaats" size="24" value="<% =Woonplaats %>"><%
Check(Woonplaats);
%></td>
</tr>
<tr>
<td valign="middle" align="left"><font face="Verdana,Arial,Helvetica,Courier" size="2"><b>Geboortedatum </b></font><font face="Verdana,Arial,Helvetica,Courier" size="2" color="red"><b>*</b></font><font face="Verdana,Arial,Helvetica,Courier" size="2"><b><br>
</b></font></td>
<td valign="middle" align="left"><font face="Verdana,Arial,Helvetica,Courier" size="2"><input type="text" name="Gebdag" size="3" value="<% =Gebdag %>">&nbsp;-&nbsp;<input type="text" name="Gebmaand" size="3" value="<% =Gebmaand %>">&nbsp;-&nbsp;<input type="text" name="Gebjaar" size="5" value="<% =Gebjaar %>">&nbsp;(dag-maand-jaar)<br>
</font></td>
</tr>
<tr>
<td valign="middle" align="left"><font face="Verdana,Arial,Helvetica,Courier" size="2"><b>Geslacht </b></font><font face="Verdana,Arial,Helvetica,Courier" size="2" color="red"><b>*<br>
</b></font></td>
<td valign="middle" align="left"><font face="Verdana,Arial,Helvetica,Courier" size="2"><input type="radio" value="Man" name="geslacht">man&nbsp;&nbsp;&nbsp;<input type="radio" value="Vrouw" name="geslacht">vrouw<br>
</font></td>
</tr>
<tr>
<td valign="middle" align="left"><font face="Verdana,Arial,Helvetica,Courier" size="2"><b>Telefoonnummer</b><b> </b></font><font face="Verdana,Arial,Helvetica,Courier" size="2" color="red"><b>*</b></font><font face="Verdana,Arial,Helvetica,Courier" size="2"><b><br>
</b></font></td>
<td valign="middle" align="left"><input type="text" name="Telefoon" size="24" value="<% =Telefoon %>"><%
Check(Telefoon);
%></td>
</tr>
<tr>
<td valign="middle" align="left"><font face="Verdana,Arial,Helvetica,Courier" size="2"><b>E-mailadres<br>
</b></font></td>
<td valign="middle" align="left"><input type="text" name="Email" size="24" value="<% =Email %>"></td>
</tr>
<tr>
<td valign="middle" align="left"><font face="Verdana,Arial,Helvetica,Courier" size="2"><b>Maat T-shirt<br>
</b></font></td>
<td valign="middle" align="left"><select name="Tshirt" size="1">
<option value="niets gekozen" selected>Kies</option>
<option value="S">S</option>
<option value="M">M</option>
<option value="L">L</option>
<option value="XL">XL</option>
<option value="XXL">XXL</option>
</select></td>
</tr>
<tr>
<td valign="middle" align="left"><br>
</td>
<td valign="middle" align="left"></td>
</tr>
<tr>
<td valign="middle" align="left" colspan="2"><font face="Verdana,Arial,Helvetica,Courier" size="2"><b>Op welke dagen bent u beschikbaar<br>
</b></font></td>
</tr>
<tr>
<td valign="middle" align="left" colspan="2"><font face="Verdana,Arial,Helvetica,Courier" size="2"><b><input type="checkbox" value="zaterdag 14 oktober 2007" name=""> zaterdag 13 oktober<br>
<input type="checkbox" value="zondag 15 oktober 2007" name="Keuzedag"> zondag 14 oktober<br>
</b></font></td>
</tr>
<tr>
<td valign="middle" align="left"><br>
</td>
<td valign="middle" align="left"></td>
</tr>
<tr>
<td valign="middle" align="left"><font face="Verdana,Arial,Helvetica,Courier" size="2"><b>Functie<br>
</b></font></td>
<td valign="middle" align="left"><select name="Functie" size="1">
<option value="niets gekozen" selected>Kies</option>
<option value="Begeleider sporten">Begeleider sporten</option>
<option value="Begeleider clinics">Begeleider clinics</option>
<option value="Logistiek controller">Logistiek controller</option>
<option value="Verkeersregelaar">Verkeersregelaar</option>
<option value="Medewerker verzorging">Medewerker verzorging</option>
<option value="Medewerker op- en afbouw">Medewerker op- en afbouw</option>
<option value="Geen voorkeur">Geen voorkeur</option>
</select></td>
</tr>
<tr>
<td valign="middle" align="left"><font face="Verdana,Arial,Helvetica,Courier" size="2"><b>Opmerkingen<br>
</b></font></td>
<td valign="middle" align="left"><textarea name="Opmerkingen" cols="40" rows="4"></textarea></td>
</tr>
<tr>
<td valign="middle" align="left"><font face="Verdana,Arial,Helvetica,Courier" size="2"><br>
</font></td>
<td valign="middle" align="left"><font face="Verdana,Arial,Helvetica,Courier" size="2"><br>
</font></td>
</tr>
<tr>
<td valign="top" align="left"></td>
<td valign="middle" align="left"><input type="reset" name="cm" value="Wissen"><input type="submit" name="cm" value="Verzenden"></td>
</tr>
</table>
</form>
<br>
<br>
</body>

</html>
 
Als de website op de eigen server draait zal ook de SMTP-server geactiveerd moeten worden. Ook zal de benodigde dll geregistreerd moeten worden: "regsvr32 cdo.dll".

Als de website bij een provider draait moet je de provider vragen welke mail gebruikt kan worden. (CDO, aspMail, JMail.....)

Ik hoor graag of het is gelukt.
Winelover.
 
Ik werk zelf ook met een formulier dat verzonden moet worden, ik gebruik daar Jmail.SMTPMail voor. Je moet weten welke mail ondersteund wordt door de server... want er zijn meerder opties
 
Reactie aan Winelover

Winelover,

De server van de provider ondersteunt CDO.Message en sinds begin deze week ook CDONTS. Geen van beide protocollen werken. Ik denk dan ook dat er iets mis is met het formulier.

Groetjes,

Liejan
 
Volgens mij moet je wel ergens iets saven , maar ik heb nog niet zoveel asp ervaring. Dit heb ik in een werken mail formulier

Code: 
<form action="<%= strFormURL %><%= strScriptName %>?action=save"  onsubmit="return formCheck(this);" method="post">

dan volgt het formulier nadat gesloten te hebben komt het volgende:

Code: 
	<% action=request("action")
	If action="save" then
	%>
En dan volgt de mailfunctie... en dan wordt de if afgesloten

Misschien heb je hier wat aan
 
Heb even naar het formulier gekekenen het blijkt (had ik eerst ook niet op gelet) dat er 2 talen door elkaar worden gehaald.
Er is geprogrammeerd in JScript en het stukje van het verzenden van de mailis geschreven inVBScript.
Als het goed is heb je een foutmelding gekregen bij regel
Set iMsg = CreateObject("CDO.Message")​
Set wordt in JScript niet gebruikt. Bovendien moeten alle regels eindigen met een ;

Zo lukt het wel:
var iMsg = Server.CreateObject("CDO.Message");
var iBodyPart = iMsg.BodyPart;
iBodyPart.ContentTransferEncoding = "8bit";
var iConf = Server.CreateObject("CDO.Configuration");
iConf.Fields("cdoSMTPServerName") = "84.244.149.60";
iMsg.Configuration = iConf;

iMsg.To = "secretariaat@paragamesbreda.eu";
iMsg.From = "noreply@paragamesbreda.eu";
iMsg.Subject = "Inschrijving";
strBody = MAILBOX;
iMsg.TextBody = strBody;
iMsg.Send();

Nog een tip:
Verander TextBody in HTMLBody en je kunt HTML-tags in je bericht mee sturen, dus bijvoorbeeld:
MAILBOX= "<B><I>Formulier VRIJWILLIGERS</I></B><BR><BR>";​

Succes ermee!
Winelover
 
Winelover,

Bedankt voor je hulp. Ik ben nu zo ver dat ik het formulier op het Internet kan zien; verzenden lukt nog steeds niet. Ik denk dat dat ligt aan de provider. Ik laat je weten wanneer het werkt.

Groetjes,

Liejan van Horen-Meeusen
 
In deze regel:
iConf.Fields("cdoSMTPServerName") = "84.244.149.60";​
staat de smtpserver die gebruikt wordt om de mails te verzenden.
Je zult de gegevens moeten gebruiken die jouw provider heeft aangeleverd.
Ik denk dat de mailserver een naam heeft ipv een ip-adres en het zal iets zijn van:
mail.paragamesbreda.eu​
of
smtp.provider.nl​

maar in ieder geval de uitgaande mailserver die gebruikt voor het versturen van mail via je mail-programma.

Ik heb de pagina getest en de smtp-server van mijn provider ingevuld en dat werkte.

Winelover
 
Reactie op Winelover

Winelover,

Ik ben wel zo slim geweest om het juiste IP nummer in mijn formulier te zetten, daar ligt het niet aan. Wat er wel loos is, weet ik niet.

Groetjes,

Liejan van Horen-Meeusen
 
Ik heb de code gekopieerd en op mijn eigen webserver gezet en als het goed is heb je een testbericht ontvangen.
Wat is de foutmelding die jij op je webserver krijgt?
 
Reactie op Winelover

Winelover,

Dat zal ik een navragen bij onze secretaris, want die ontvangt de mail. Kun je me ook zeggen wat er precies op je server staat, want misschien is er iets bij de provider loos.

Met vriendelijke groet,

Liejan van Horen-Meeusen
 
De code die jij in je eerste post hebt gezet heb ik gewoon overgenomen en geplakt in een leeg bestand en dit op mijn webserver gezet.
Ik heb het bestand test2.asp genoemd en dus ook de form-action daarin veranderd.
Ik heb het eerst getest met mijn eigen email-adres en als mailserver die van mijn provider (mail.chello.nl). Daarna het emailadres veranderd in die van het secretariaat en jullie mailserver en verstuurd, en (waarschijnlijk) met succes.

Maar op jullie website geeft de server een foutmelding. Als bezoeker van de site krijg je niet te zien welke melding wordt gegeven. Om het probleem op te lossen moeten we weten welke foutmelding naar voren komt (type foutmelding, regelnummer etc.).

Winelover
 
Reactie op Winelover

Winelover,

Kan het zijn dat ik een verouderde versie van ASPnet-client heb? Zo ja, hoe kom ik dan snel aan een andere?

Met vriendelijke groet,

Liejan van Horen-Meeusen
 
Reactie op ASP-versie

Winelover,

Ik heb de juiste ASP-versie ingesteld. Ik kon kiezen uit 1_1_4322 en 2_0_50727. Ik heb de mail op de server nagekeken; het door jou ingevulde formulier was daar niet bij. Wat zou er nog mis kunnen zijn?

Met vriendelijke groet,

Liejan van Horen-Meeusen
 
Vraag is nog niet opgelost

Het probleem met het formulier is nog niet opgelost. Wel staat het formulier nu in één taal. Het ziet er als volgt uit

<%@ LANGUAGE="JScript" %>
<%

function Goed()
{
%>
&nbsp;
<%
}

function Fout()
{
%>
<font face="Verdana,Arial,Helvetica,Courier" size="2" color="red"><b>&nbsp;invullen aub</b></font>
<%
}

function Check(variabele)
{
if (sCommand=="Verzenden")
{
if(variabele=="")
{
Fout();
}
else
{
Goed();
}
}
}

if (Request.Form("cm").Count)
{
ExitCode=1;

sCommand=""+Request.Form("cm");
Voorletters=Request.Form("Voorletters");
Tussen=Request.Form("Tussen");
Achternaam=Request.Form("Achternaam");
Adres=Request.Form("Adres");
Postcode=Request.Form("Postcode");
Woonplaats=Request.Form("Woonplaats");
Geslacht=Request.Form("Geslacht");
Gebdag=Request.Form("Gebdag");
Gebmaand=Request.Form("Gebmaand");
Gebjaar=Request.Form("Gebjaar");
Telefoon=Request.Form("Telefoon");
Email=Request.Form("Email");
Tshirt=Request.Form("Tshirt");
Functie=Request.Form("Keuzedag");
Functie=Request.Form("Functie");
Opmerkingen=Request.Form("Opmerkingen");

if (Voorletters=="")
ExitCode=0;

if (Achternaam=="")
ExitCode=0;

if (Adres=="")
ExitCode=0;

if (Postcode=="")
ExitCode=0;

if (Woonplaats=="")
ExitCode=0;

if (Telefoon=="")
ExitCode=0;
}
else
{
sCommand="";
Voorletters="";
Tussen="";
Achternaam="";
Adres="";
Postcode="";
Woonplaats="";
Geslacht="";
Gebdag="";
Gebmaand="";
Gebjaar="";
Telefoon="";
Email="";
Tshirt="";
Keuzedag="";
Functie="";
Opmerkingen="";

}

if ( (sCommand!="") && (ExitCode==1) )

{
MAILBOX= "Formulier VRIJWILLIGERS" + "\n";
MAILBOX+= "________________________________________________________" + "\n";
MAILBOX+= "Ingevuld door:\n";
MAILBOX+= "Voorletters: "+Request.Form("Voorletters")+"\n";
MAILBOX+= "Tussenvoegsels: "+Request.Form("Tussen")+"\n";
MAILBOX+= "Achternaam: "+ Request.Form("Achternaam")+"\n";
MAILBOX+= "Adres: " + Request.Form("Adres")+"\n";
MAILBOX+= "Postcode: " + Request.Form("Postcode")+"\n";
MAILBOX+= "Woonplaats: " + Request.Form("Woonplaats")+"\n";
MAILBOX+= "Geslacht: " + Request.Form("Geslacht")+"\n";
MAILBOX+= "Geboortedatum: " + Request.Form("Gebdag")+" - " + Request.Form("Gebmaand")+" - " + Request.Form("Gebjaar")+"\n";
MAILBOX+= "Telefoon: "+ Request.Form("Telefoon")+"\n";
MAILBOX+= "Emailadres: " + Request.Form("Email")+"\n";
MAILBOX+= "Maat T-shirt: " + Request.Form("Tshirt")+"\n";
MAILBOX+= "________________________________________________________" + "\n";
MAILBOX+= "Dag van beschikbaarheid: " + "\n";
MAILBOX+= Request.Form("Keuzedag") + "\n";
MAILBOX+= "Functie: " + Request.Form("Functie")+"\n";
MAILBOX+= "________________________________________________________" + "\n";
MAILBOX+= "Opmerkingen:\n";
MAILBOX+= Request.Form("Opmerkingen")+"\n";
MAILBOX+= "________________________________________________________" + "\n";
MAILBOX+= "Einde formulier." + "\n";

var iMsg = Server.CreateObject("CDO.Message");
var iBodyPart = iMsg.BodyPart;
iBodyPart.ContentTransferEncoding = "8bit";
var iConf = Server.CreateObject("CDO.Configuration");
iConf.Fields("cdoSMTPServerName") = "84.244.149.60";
iConf.Fields("cdoSMTPServerPort") = 25;
iConf.Fields("cdoSMTPAuthenticate") = 1;
iConf.Fields("cdoSendUserName") = "noreply@paragamesbreda.eu";
iConf.Fields("cdoSendPassword") = "123test";
iMsg.Configuration = iConf;

iMsg.To = "secretariaat@paragamesbreda.eu";
iMsg.From = "noreply@paragamesbreda.eu";
iMsg.Subject = "Inschrijving";
strBody = MAILBOX;
iMsg.TextBody = strBody;
iMsg.Send();

sCommand = "verstuurd";
}
%>
<html>

<head>
<meta http-equiv="content-type" content="text/html;charset=ISO-8859-1">
<% if (sCommand == "verstuurd")
{%>
<meta http-equiv="refresh" content="3;url=vrijwilligers_send.html">
<% }%>
<title>ParaGamesBreda</title>
<link rel="stylesheet" href="huisstijl.css">
</head>

<body leftmargin="170" rightmargin="20" topmargin="10" marginheight="10" background="httpdocs/img/bg_beeldmain.gif" bgproperties="fixed" bgcolor="white">
<script type="text/javascript" src="milonic_src.js"></script>
<script type="text/javascript">

if(ns4)_d.write("<scr"+"ipt type=text/javascript src=mmenuns4.js><\/scr"+"ipt>");
else _d.write("<scr"+"ipt type=text/javascript src=mmenudom.js><\/scr"+"ipt>");

</script>
<script type="text/javascript" src="menu_data.js"></script>
<script type="text/javascript" src="keypress.js" ></script>
<form name="vrijwilliggersformulier" method="post" action="vrijwilligers.asp">
<input type="hidden">
<%
if (sCommand== "verstuurd")
{
%>
<p>
<font color="red" face="Verdana,Arial,Helvetica,Courier" size="2">
<b>Uw aanvraag wordt verstuurd.</b><br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
</font>
</p>
<%
}
%>
<p>
<font face="Verdana,Arial,Helvetica,Courier" size="3" color="red">
<b>Vrijwilligers</b><br>
<br>
</font>
<font face="Verdana,Arial,Helvetica,Courier" size="2" color="red"><b>
VRIJWILLIGERS GEZOCHT!</b><br>
</font><font face="Verdana,Arial,Helvetica,Courier" size="2" color="black">Mede dankzij de inzet en enthousiaste medewerking van vrijwilligers wordt Para</font><font size="2" color="red" face="Verdana,Arial,Helvetica,Courier">Games</font><font size="2" color="black" face="Verdana,Arial,Helvetica,Courier">Breda</font><font size="2" color="red" face="Verdana,Arial,Helvetica,Courier">!</font><font face="Verdana,Arial,Helvetica,Courier" size="2" color="black"> een succes!<br>
<br>
Stichting Para</font><font size="2" color="red" face="Verdana,Arial,Helvetica,Courier">Games</font><font size="2" color="black" face="Verdana,Arial,Helvetica,Courier">Breda</font><font size="2" color="red" face="Verdana,Arial,Helvetica,Courier">!</font><font face="Verdana,Arial,Helvetica,Courier" size="2" color="black"> is daarom op zoek naar vrijwillige medewerkers, die zich willen inzetten om ons te helpen tijdens de uitvoering van Para</font><font size="2" color="red" face="Verdana,Arial,Helvetica,Courier">Games</font><font size="2" color="black" face="Verdana,Arial,Helvetica,Courier">Breda</font><font size="2" color="red" face="Verdana,Arial,Helvetica,Courier">!</font><font face="Verdana,Arial,Helvetica,Courier" size="2" color="black"><br>
<br>
In verschillende vrijwillige vormen kunt u uw bijdrage leveren.<br>
Van chauffeur tot begeleider van sporters en clinics.<br>
Van logistiek controller tot parkeerco&ouml;rdinator.
<br>
<br>
<img id="Portretfoto_van_twee_vrijwilligers" alt="Portretfoto van twee vrijwilligers" name="Portretfoto_van_twee_vrijwilligers" align="right" valign="top" src="httpdocs/img/vrijwilligers.jpg" style="padding: 3px" height="133" border="0" width="100"></font><font face="Verdana,Arial,Helvetica,Courier" size="2" color="red"><b>Meld u aan als vrijwilliger!<br></b>
</font><font face="Verdana,Arial,Helvetica,Courier" size="2" color="black">
Wilt u meewerken aan een nieuw evenement voor sporters met een lichamelijke beperking?<br>
Wilt u weten of u iets voor de stichting kunt betekenen, vult u dan onderstaand formulier in en u ontvangt zo spoedig mogelijk meer informatie.<br>
<br>
<b>Persoonlijke gegevens:<br></b>
<br>
<i>De met een <font face="Verdana,Arial,Helvetica,Courier" size="2" color="red"><b>*</b></font> aangegeven velden zijn verplicht in te vullen.</i><br>
<br>
</font>
<table border="0" cellpadding="0" cellspacing="2">
<tr>
<td valign="middle" align="left"><font face="Verdana,Arial,Helvetica,Courier" size="2"><b>Voorletter(s) </b></font><font face="Verdana,Arial,Helvetica,Courier" size="2" color="red"><b>*</b></font><font face="Verdana,Arial,Helvetica,Courier" size="2"><b><br>
</b></font></td>
<td valign="middle" align="left"><input type="text" name="Voorletters" size="24" value="<% =Voorletters %>"><%
Check(Voorletters);
%></td>
</tr>
<tr>
<td valign="middle" align="left"><font face="Verdana,Arial,Helvetica,Courier" size="2"><b>Tussenvoegsel</b></font><font face="Verdana,Arial,Helvetica,Courier" size="2"><b><br>
</b></font></td>
<td valign="middle" align="left"><input type="text" name="Tussen" size="24" value="<% =Tussen %>"></td>
</tr>
<tr>
<td valign="middle" align="left"><font face="Verdana,Arial,Helvetica,Courier" size="2"><b>Achternaam </b></font><font face="Verdana,Arial,Helvetica,Courier" size="2" color="red"><b>*</b></font><font face="Verdana,Arial,Helvetica,Courier" size="2"><b><br>
</b></font></td>
<td valign="middle" align="left"><input type="text" name="Achternaam" size="24" value="<% =Achternaam %>"><%
Check(Achternaam);
%></td>
</tr>
<tr>
<td valign="middle" align="left"><font face="Verdana,Arial,Helvetica,Courier" size="2"><b>Adres </b></font><font face="Verdana,Arial,Helvetica,Courier" size="2" color="red"><b>*</b></font><font face="Verdana,Arial,Helvetica,Courier" size="2"><b><br>
</b></font></td>
<td valign="middle" align="left"><input type="text" name="Adres" size="24" value="<% =Adres %>"><%
Check(Adres);
%></td>
</tr>
<tr>
<td valign="middle" align="left"><font face="Verdana,Arial,Helvetica,Courier" size="2"><b>Postcode </b></font><font face="Verdana,Arial,Helvetica,Courier" size="2" color="red"><b>*</b></font><font face="Verdana,Arial,Helvetica,Courier" size="2"><b><br>
</b></font></td>
<td valign="middle" align="left"><input type="text" name="Postcode" size="24" value="<% =Postcode %>"><%
Check(Postcode);
%></td>
</tr>
<tr>
<td valign="middle" align="left"><font face="Verdana,Arial,Helvetica,Courier" size="2"><b>Woonplaats </b></font><font face="Verdana,Arial,Helvetica,Courier" size="2" color="red"><b>*</b></font><font face="Verdana,Arial,Helvetica,Courier" size="2"><b><br>
</b></font></td>
<td valign="middle" align="left"><input type="text" name="Woonplaats" size="24" value="<% =Woonplaats %>"><%
Check(Woonplaats);
%></td>
</tr>
<tr>
<td valign="middle" align="left"><font face="Verdana,Arial,Helvetica,Courier" size="2"><b>Geboortedatum </b></font><font face="Verdana,Arial,Helvetica,Courier" size="2" color="red"><b>*</b></font><font face="Verdana,Arial,Helvetica,Courier" size="2"><b><br>
</b></font></td>
<td valign="middle" align="left"><font face="Verdana,Arial,Helvetica,Courier" size="2"><input type="text" name="Gebdag" size="3" value="<% =Gebdag %>">&nbsp;-&nbsp;<input type="text" name="Gebmaand" size="3" value="<% =Gebmaand %>">&nbsp;-&nbsp;<input type="text" name="Gebjaar" size="5" value="<% =Gebjaar %>">&nbsp;(dag-maand-jaar)<br>
</font></td>
</tr>
<tr>
<td valign="middle" align="left"><font face="Verdana,Arial,Helvetica,Courier" size="2"><b>Geslacht </b></font><font face="Verdana,Arial,Helvetica,Courier" size="2" color="red"><b>*<br>
</b></font></td>
<td valign="middle" align="left"><font face="Verdana,Arial,Helvetica,Courier" size="2"><input type="radio" value="Man" name="geslacht">man&nbsp;&nbsp;&nbsp;<input type="radio" value="Vrouw" name="geslacht">vrouw<br>
</font></td>
</tr>
<tr>
<td valign="middle" align="left"><font face="Verdana,Arial,Helvetica,Courier" size="2"><b>Telefoonnummer</b><b> </b></font><font face="Verdana,Arial,Helvetica,Courier" size="2" color="red"><b>*</b></font><font face="Verdana,Arial,Helvetica,Courier" size="2"><b><br>
</b></font></td>
<td valign="middle" align="left"><input type="text" name="Telefoon" size="24" value="<% =Telefoon %>"><%
Check(Telefoon);
%></td>
</tr>
<tr>
<td valign="middle" align="left"><font face="Verdana,Arial,Helvetica,Courier" size="2"><b>E-mailadres<br>
</b></font></td>
<td valign="middle" align="left"><input type="text" name="Email" size="24" value="<% =Email %>"></td>
</tr>
<tr>
<td valign="middle" align="left"><font face="Verdana,Arial,Helvetica,Courier" size="2"><b>Maat T-shirt<br>
</b></font></td>
<td valign="middle" align="left"><select name="Tshirt" size="1">
<option value="niets gekozen" selected>Kies</option>
<option value="S">S</option>
<option value="M">M</option>
<option value="L">L</option>
<option value="XL">XL</option>
<option value="XXL">XXL</option>
</select></td>
</tr>
<tr>
<td valign="middle" align="left"><br>
</td>
<td valign="middle" align="left"></td>
</tr>
<tr>
<td valign="middle" align="left" colspan="2"><font face="Verdana,Arial,Helvetica,Courier" size="2"><b>Op welke dagen bent u beschikbaar<br>
</b></font></td>
</tr>
<tr>
<td valign="middle" align="left" colspan="2"><font face="Verdana,Arial,Helvetica,Courier" size="2"><b><input type="checkbox" value="zaterdag 14 oktober 2007" name=""> zaterdag 13 oktober<br>
<input type="checkbox" value="zondag 15 oktober 2007" name="Keuzedag"> zondag 14 oktober<br>
</b></font></td>
</tr>
<tr>
<td valign="middle" align="left"><br>
</td>
<td valign="middle" align="left"></td>
</tr>
<tr>
<td valign="middle" align="left"><font face="Verdana,Arial,Helvetica,Courier" size="2"><b>Functie<br>
</b></font></td>
<td valign="middle" align="left"><select name="Functie" size="1">
<option value="niets gekozen" selected>Kies</option>
<option value="Begeleider sporten">Begeleider sporten</option>
<option value="Begeleider clinics">Begeleider clinics</option>
<option value="Logistiek controller">Logistiek controller</option>
<option value="Verkeersregelaar">Verkeersregelaar</option>
<option value="Medewerker verzorging">Medewerker verzorging</option>
<option value="Medewerker op- en afbouw">Medewerker op- en afbouw</option>
<option value="Geen voorkeur">Geen voorkeur</option>
</select></td>
</tr>
<tr>
<td valign="middle" align="left"><font face="Verdana,Arial,Helvetica,Courier" size="2"><b>Opmerkingen<br>
</b></font></td>
<td valign="middle" align="left"><textarea name="Opmerkingen" cols="40" rows="4"></textarea></td>
</tr>
<tr>
<td valign="middle" align="left"><font face="Verdana,Arial,Helvetica,Courier" size="2"><br>
</font></td>
<td valign="middle" align="left"><font face="Verdana,Arial,Helvetica,Courier" size="2"><br>
</font></td>
</tr>
<tr>
<td valign="top" align="left"></td>
<td valign="middle" align="left"><input type="reset" name="cm" value="Wissen"><input type="submit" name="cm" value="Verzenden"></td>
</tr>
</table>
</form>
<br>
<br>
</body>

</html>

Ik heb ASP-client 1_1_4322 ingesteld. De E-mailadressen zijn juist en er kan E-mail verzonden en ontvangen worden via de server.

Verder weert ik het niet.

Met vriendelijke groet,

Liejan van Horen-Meeusen
 
hierbij een makkelijke oplossing, datzelfde probleem had ik ook omdat de server CDONTS niet meer ondersteund, gebruik nu CDO en onderstaand functioneerd:

1: pagina aanmaken vb bestelformulier.asp

Code: 
</head>

<body>

<form method="POST" action="send.asp">
	<tr>
	 <tr>
     <td colspan="2"><b>Text</b><br><br>
	   <font size="1">Na verzending nemen wij eerst contact met u op om uw gegevens te controleren,
	  hierna reserveren wij de gewenste datum en tijd voor u.<br></font>
	  </td>	  
	 </tr>
	 <tr>
	 <td colspan="2">&nbsp;</td>
	 </tr> 
	      <tr>
		  <td>Gewenste service<td>:<select name="service" style="width: 170 px"> <option value="" selected>-- Selecteer--</option>
	                                              <option value="Reserveren">Reserveren</option>
	                                              <option value="Informatie">Informatie</option>
                                              	  </select> 
		  </td></tr>	
	 <tr>
	 <td>Naam</td>
	 <td>:<select name="titel" style="width: 48 px"> <option value="" selected>----</option>
	                                              <option value="Mnr.">Dhr.</option>
	                                              <option value="Mvr.">Mvr.</option>
												   </select>                   
	    
	                                               <input type="text" name="naam" style="width: 147 px"></td>
	 </tr>
	  <tr>
	   <td>Aantal Personen</td>
	   <td>:<select name="aantalpersonen" style="width: 48 px"> <option value="" selected>----</option>
	                                              <option value="01">01</option>
	                                              <option value="02">02</option>
                                                  <option value="03">03</option>
                                                  <option value="04">04</option>
                                                  <option value="05">05</option>
                                                  <option value="06">06</option>
                                                  <option value="07">07</option>
                                                  <option value="08">08</option>
                                                  <option value="09">09</option>
                                                  <option value="10">10</option>
                                                  <option value="11">11</option>
                                                  <option value="12">12</option>
                                                  <option value="13">13</option>
                                                  <option value="14">14</option>
												  </select>
												  </td>
	 </tr>
	    <td>Bagage aantal stuks</td>
	   <td>:<select name="bagage" style="width: 48 px"> <option value="" selected>----</option>
	                                              <option value="01">01</option>
	                                              <option value="02">02</option>
                                                  <option value="03">03</option>
                                                  <option value="04">04</option>
                                                  <option value="05">05</option>
                                                  <option value="06">06</option>
                                                  <option value="07">07</option>
                                                  <option value="08">08</option>
                                                  <option value="09">09</option>
                                                  <option value="10">10</option>
                                                  <option value="11">11</option>
                                                  <option value="12">12</option>
                                                  <option value="13">13</option>
                                                  <option value="14">14</option>
												  </select>
												  </td>
	 </tr>
	 <tr>
	 <td>Straat + huisnummer</td>
	 <td>:<input type="text" name="adres" style="width: 200 px"></td>
	 </tr>
	 <tr>
	 <td>Postcode</td>
	 <td>:<input type="text" name="postcode" style="width: 200 px"></td>
	 </tr>
	 <tr>
	 <td>Stad</td>
	 <td>:<input type="text" name="stad" style="width: 200 px"></td>
	 </tr>
	 <tr>
	 <td>Telefoon</td>
	 <td>:<input type="text" name="telefoon" style="width: 200 px"></td>
	 </tr>
	 <tr>
	 <td>E-mail</td>
	 <td>:<input type="text" name="email" style="width: 200 px"></td>
	 </tr>
	  <tr><td>Datum</td><td>
	
	 :<select name="dag">                      <option value="" selected>-dag-</option>
	                                              <option value="01">01</option>
	                                              <option value="02">02</option>
                                                  <option value="03">03</option>
                                                  <option value="04">04</option>
                                                  <option value="05">05</option>
                                                  <option value="06">06</option>
                                                  <option value="07">07</option>
                                                  <option value="08">08</option>
                                                  <option value="09">09</option>
                                                  <option value="10">10</option>
                                                  <option value="11">11</option>
                                                  <option value="12">12</option>
                                                  <option value="13">13</option>
                                                  <option value="14">14</option>
                                                  <option value="15">15</option>
                                                  <option value="16">16</option>
                                                  <option value="17">17</option>
                                                  <option value="18">18</option>
                                                  <option value="19">19</option>
                                                  <option value="20">20</option>
                                                  <option value="21">21</option>
                                                  <option value="22">22</option>
                                                  <option value="23">23</option>
                                                  <option value="24">24</option>
                                                  <option value="25">25</option>
                                                  <option value="26">26</option>
                                                  <option value="27">27</option>
                                                  <option value="28">28</option>
                                                  <option value="29">29</option>
                                                  <option value="30">30</option>
                                                  <option value="31">31</option>
	 </select>
	 <select name="maand">                    <option value="" selected>-maand-</option>
                                                  <option value="Januari">Januari</option>
                                                  <option value="Februari">Februari</option>
                                                  <option value="Maart">Maart</option>
                                                  <option value="April">April</option>
                                                  <option value="Mei">Mei</option>
                                                  <option value="Juni">Juni</option>
                                                  <option value="Juli">Juli</option>
                                                  <option value="Augustus">Augustus</option>
                                                  <option value="September">September</option>
                                                  <option value="Oktober">Oktober</option>
                                                  <option value="November">November</option>
                                                  <option value="December">December</option>
   </select>
    <select name="jaar">                      <option value="" selected>-jaar-</option>
                                                  <option value="2007">2007</option>
                                                  <option value="2008">2008</option>
												  <option value="2009">2009</option>
                                                </select>
	 </td></tr>
	  <tr><td>Ophaal tijd vanaf huis adres </td> <td>	
     
	 :<select name="tijduur" style="width: 58 px">            <option value="" selected>uur</option>
	                                              <option value="01">01</option>
	                                              <option value="02">02</option>
                                                  <option value="03">03</option>
                                                  <option value="04">04</option>
                                                  <option value="05">05</option>
                                                  <option value="06">06</option>
                                                  <option value="07">07</option>
                                                  <option value="08">08</option>
                                                  <option value="09">09</option>
                                                  <option value="10">10</option>
                                                  <option value="11">11</option>
                                                  <option value="12">12</option>
                                                  <option value="13">13</option>
                                                  <option value="14">14</option>
                                                  <option value="15">15</option>
                                                  <option value="16">16</option>
                                                  <option value="17">17</option>
                                                  <option value="18">18</option>
                                                  <option value="19">19</option>
                                                  <option value="20">20</option>
                                                  <option value="21">21</option>
                                                  <option value="22">22</option>
                                                  <option value="23">23</option>
                                                  <option value="24">24</option>
												   </select> : 
				 <select name="tijdminuten" style="width: 58 px">  <option value="" selected>min</option>
	                                              <option value="00">00</option>
												  <option value="05">05</option>
	                                              <option value="10">10</option>
                                                  <option value="15">15</option>
                                                  <option value="20">20</option>
                                                  <option value="25">25</option>
                                                  <option value="30">30</option>
                                                  <option value="35">35</option>
                                                  <option value="40">40</option>
                                                  <option value="45">45</option>
                                                  <option value="50">50</option>
                                                  <option value="55">55</option>
												  <option value="00">00</option>
                                                   </select>			 
	</td></tr>
	                       
	 <tr><td>Vluchtnr.</td> <td>	
    	  :<input type="text" name="vluchtnummer" style="width: 58 px"></td></tr>
	 <tr>
	 <td colspan="2">&nbsp;</td>
	 </tr>
	 <tr>
	 <td colspan="2">Speciale wensen mbt datum, tijd, ophaaladres en retourvlucht:</td>
	 </tr>
	 <tr>
	 <td colspan="2"><textarea name="opmerkingen" rows="4" cols="48" class="scrollbar1"></textarea></td>
	 </tr>
	 </table>
	 <table width="500" align="center" class="Normal">
     <tr>
	 <td colspan="2">
	     <input type="submit" value="verzenden" style="background-color: #ff0000; color: #FFFFFF; position: width 100; height: 25; width: 110; font-weight: bold; border-left-style: solid; border-left-width: 1; border-right: 1 inset #FFFFFF; border-top-style: solid; border-top-width: 1; border-bottom: 1 inset #FFFFFF6">&nbsp;
		 <input type="reset" value="Wissen" style="background-color: #ff0000; color: #FFFFFF; position: width 100; height: 25; width: 110; font-weight: bold; border-left-style: solid; border-left-width: 1; border-right: 1 inset #FFFFFF; border-top-style: solid; border-top-width: 1; border-bottom: 1 inset #FFFFFF6">
	 </td>
	 </tr>
	
	</table>
	</form>

  </td>
</tr>
</table>

</body>
</html>

2: pagina aanmaken send.asp:

Code: 
<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> 

<%
'First lets Dim all the variables we need

Dim MyBody
Dim service, titel, naam, aantalpersonen, bagage, adres, postcode, stad, telefoon, email
Dim dag, maand, jaar, vluchtnummer
DIM tijduur, tijdminuten
Dim opmerkingen

'Now lets get some values for the variables from the form

youremail = "info@uwemailadres.nl"
service     = Request.Form("service")
titel       = Request.Form("titel")
naam 		= Request.Form("naam")
aantalpersonen    = Request.Form("aantalpersonen")
bagage      = Request.Form("bagage")
adres 		= Request.Form("adres")
postcode 	= Request.Form("postcode")
stad 		= Request.Form("stad")
telefoon	= Request.Form("telefoon")
email 		= Request.Form("email")
dag         = Request.Form("dag")
maand       = Request.Form("maand")
jaar        = Request.Form("jaar")
vluchtnummer    = Request.Form("vluchtnummer")
opmerkingen  = Request.Form("opmerkingen")
tijduur      = Request.Form("tijduur")
tijdminuten  = Request.Form("tijdminuten")

If check1 = "on" Then
check1 = "Ja"
 Else
check1 = ""
 End If
If check2 = "on" Then
 check2 = "Ja"
 Else
check2 = ""
 End If


'Now lets build the body of the email from the data in the form
MyBody = "<p><font face=verdana size=2>" & Chr(13) & vbcrlf
Mybody = Mybody & "KLANTGEGEVENS" & vbcrlf & "<br>------------------------------------------------------<br>"
Mybody = Mybody & "Gewenste service:      &nbsp;&nbsp;" & service & vbcrlf & "<br>------------------------------------------------------<br>"
Mybody = Mybody & "Naam:                  &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;"& titel &" "& naam & vbcrlf & "<br>"
Mybody = Mybody & "Aantal Personen:       &nbsp;&nbsp;&nbsp;" & aantalpersonen & vbcrlf & "<br>"
Mybody = Mybody & "Stuks Bagage           &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;" & bagage & vbcrlf & "<br>"
Mybody = Mybody & "Adres:                 &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;" & adres & vbcrlf & "<br>"
Mybody = Mybody & "Postcode:              &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;" & postcode & vbcrlf & "<br>"
Mybody = Mybody & "Plaats:                &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;" & stad & vbcrlf & "<br>"
Mybody = Mybody & "Tel.:                  &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;" & telefoon & vbcrlf & "<br>"
Mybody = Mybody & "E-mail:                &nbsp;&nbsp;&nbsp;" & email & vbcrlf & "<br>------------------------------------------------------<br>"
Mybody = Mybody & "Datum naar Schiphol:   &nbsp;"& dag &" "& maand &" "& jaar & vbcrlf & "<br>"
Mybody = Mybody & "Vluchtnummer:          &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;"& vluchtnummer & vbcrlf & "<br>"
Mybody = Mybody & "Ophaaltijd:            &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;"& tijduur &" : "& tijdminuten & vbcrlf & "<br>------------------------------------------------------<br>"
Mybody = Mybody & "Vraag of opmerking:    &nbsp;&nbsp;&nbsp;" & opmerkingen & vbcrlf & "<br>"

'Now lets put the variables and other information we need into the mailing script 

Dim ObjSendMail
Set ObjSendMail = CreateObject("CDO.Message") 
ObjSendMail.To = "info@uwemailadres.nl"
ObjSendMail.cc = "een ander email adres@uw domein.nl"
ObjSendMail.Subject = "Reactie vanaf uw website"
ObjSendMail.From = Request.Form("email")
' we are sending a html email.. simply switch the comments around to send a text email instead
ObjSendMail.HTMLBody = MyBody
'ObjSendMail.TextBody = MyBody   
ObjSendMail.Send
Set ObjSendMail = Nothing 
%>

<HTML>

<head>
<link rel="stylesheet" type="text/css" href="../css/backbestel.css">
</head>

<body class="scrollbar1">
<table border="0" cellpadding="0" cellspacing="0" width="100%" height="100%" class="Normal">
<tr>
  <td width="147"><img src="/images/foto/foto1.jpg" width="147" height="900"></td>
  <td width="653" valign="top" >
     <table width="500" align="center" class="Normal">
	 <tr>
	   <td>&nbsp;</td>
	 </tr>
	 <tr>
	  <td>&nbsp;</td>
	</tr>
	<tr>
	  <td>&nbsp;</td>
	</tr>
	
	
	<form method="POST" action="send.asp">
	<tr>
	  <td class="NormalBold">Uw gegevens zijn succesvol verstuurd,</td>
	</tr>
	<tr>
	  <td>&nbsp;</td>
	</tr>
	<tr>
	  <td>
	      Wij zullen spoedig contact met u opnemen. 
	  <br>Met vriendelijke groet,
	  <br><br>plaats hier zelf tekst
	 </td>
	</tr>
	  <tr>
	   <td><hr width="500" size="2"></td>
	 </tr>
<tr>
	   <td>
<% =Replace(MyBody,vbCr,"<font face=Arial size=2>") %>
</td>
	 </tr>	
	  	<tr>
     <td>&nbsp;</td>
   </tr> 
    	<tr>
     <td><input type=button value="Print deze pagina" name="Print" onClick="printit()"></td></td>
   </tr> 
   
   		  
<SCRIPT Language="Javascript">
function printit()
{  
  if (window.print) 
   {
     window.print() ;  
   } 
  else 
   {
    var WebBrowser = '<OBJECT ID="WebBrowser1" WIDTH=0 HEIGHT=0 CLASSID="CLSID:8856F961-340A-11D0-A96B-00C04FD705A2"></OBJECT>';
    document.body.insertAdjacentHTML('beforeEnd', WebBrowser);
    WebBrowser1.ExecWB(6, 2);
   }
}
</script>

    <tr>
     <td>&nbsp;</td>
   </tr> 
 </table>

</body>
</HTML>
 
Hey Liejan,

even een vraag waar heb jij je www.paragamesbreda.eu site gehost? (mooie site, goed formulier)
ik kan geen enkele host vinden die asp ondersteund bij wie heb je die pagina op de site staan.

tnx alvast
 
bbniels zei:
Hey Liejan,

even een vraag waar heb jij je www.paragamesbreda.eu site gehost? (mooie site, goed formulier)
ik kan geen enkele host vinden die asp ondersteund bij wie heb je die pagina op de site staan.

tnx alvast
Klik om te vergroten...



Ik heb mijn site gehost bij denit.net.
Goede service en alles erop en eraan:thumb:
 
Status
Niet open voor verdere reacties.
                    Steun ons                    

Nieuwste berichten

Terug
Bovenaan Onderaan