Jo selvfølgelig. Jeg har klippet og strikket og klistret og samlet alt hvad jeg har kunnet finde. Jeg kom egentlig på sporet da jeg læste udbyderens løsningsforslag. De henledte selv min opmærksomhed på at jeg skulle søge i jmail regi.
Her er min løsning. Den er afprøvet og virker.
<%
Set JMail = Server.CreateObject("JMail.SMTPMail")
Response.Expires = 0
'Her bliver variabler til inputene fra formen defineret
Dim strName, strAddresse, strPostnummer, strBy, strTlf, strEmail, strbem, strxxx1, strxxxx2, strxxx3, strxxx3, strxxx4,strxxx5, strxxx6, xxx7, xxx8
If Request.ServerVariables("CONTENT_LENGTH") <> 0 Then
strName = Trim(Request.Form("navn"))
strAddresse = Trim(Request.Form("addresse"))
strPostnummer = Trim(Request.Form("postnummer"))
strBy = Trim(Request.Form("by"))
strTlf = Trim(Request.Form("tlf"))
strEmail = Trim(Request.Form("email"))
strbem = Trim(Request.Form("bem"))
strxxx1 = Trim(Request.Form("xxx1"))
strxxx2 = Trim(Request.Form("xxx2"))
strxxx3 = Trim(Request.Form("xxx3"))
strxxx4 = Trim(Request.Form("xxx4"))
strxxx5 = Trim(Request.Form("xxx5"))
strxxx6 = Trim(Request.Form("xxx6"))
strxxx7 = Trim(Request.Form("xxx7"))
strxxx8 = Trim(Request.Form("xxx8"))
JMail.ServerAddress = "xxx.xxxx.dk"
JMail.sender = "xxx@xxx.dk"
JMail.subject = "Forespørgsel fra
www.xxxx.dk" JMail.AddRecipient "xxx@xxxx.dk"
JMail.AddRecipientCC "xxxe@xxxx.dk"
'Her bliver e-mailen til et "ENTER" bliver angivet med: "& VbCrLF"
JMail.Body = "Mail fra formularen på yachtsejlerskolens website.: " & VbCrLf
JMail.Body = JMail.Body & strName & VbCrLf
JMail.Body = JMail.Body & strAddresse & VbCrLf
JMail.Body = JMail.Body & strPostnummer& " " & strBy & VbCrLf
JMail.Body = JMail.Body & "Telefon nummer: " & strTlf & VbCrLf
JMail.Body = JMail.Body & "e-mail: " & strEmail & VbCrLf & VbCrLf
JMail.Body = JMail.Body & "Bemærkninger:" & strbem & VbCrLf
JMail.Body = JMail.Body & "xxx1:" & strxxx1 & VbCrLf
JMail.Body = JMail.Body & "xxx2:" & strxxx2 & VbCrLf
JMail.Body = JMail.Body & "xxx3:" & strxxx3 & VbCrLf
JMail.Body = JMail.Body & "xxx4:" & strxxx4 & VbCrLf
JMail.Body = JMail.Body & "xxx5:" & strxxx5 & VbCrLf
JMail.Body = JMail.Body & "xxx6:" & strxxx6 & VbCrLf
JMail.Body = JMail.Body & "xxx7:" & strxxx7 & VbCrLf
JMail.Body = JMail.Body & "xxx8:" & strxxx8 & VbCrLf
JMail.Body = JMail.Body & strCv
'Her bliver form-mailens prioritet bestemt
' 1 - højeste (Haster / Vigtigt)
' 3 - normal
' 5 - lavest
JMail.Priority = 3
JMail.Execute
%>
<HTML>
<HEAD>
<TITLE>xxx</TITLE>
<STYLE TYPE="text/css">
<!--
BODY {
font-family: Arial; font-size: 9pt; font-style: normal;
}
Table {
font-family: Arial; font-size: 9pt; font-style: normal;
}
Td {
font-family: Arial; font-size: 9pt; font-style: normal;
}
Tr {
font-family: Arial; font-size: 9pt; font-style: normal;
}
SELECT {
font-family: Arial; font-size: 10pt; font-style: normal;
}
INPUT {
font-family: Arial; font-size: 10pt; font-style: normal;
}
INPUT.submit {
font-family: Arial; font-size: 10pt; font-style: normal; TEXT-DECORATION: none;
}
INPUT.reset {
font-family: Arial; font-size: 10pt; font-style: normal; TEXT-DECORATION: none;
}
TEXTAREA {
font-family: Arial; font-size: 10pt; font-style: normal;
}
-->
</STYLE>
</HEAD>
<BODY>
<TABLE WIDTH=400 HEIGHT=100 BORDER=0 ALIGN="CENTER" CELLPADDING=0 CELLSPACING=0 RULES="NONE" FRAME="VOID">
<TR>
<TD WIDTH=100% HEIGHT=15 ALIGN="CENTER" VALIGN="TOP">
<CENTER>
Tak for din henvendelse. Vi vender hurtigst muligt tilbage.
</CENTER>
</TD>
</TR>
</TABLE>
</BODY>
</HTML>
<%
Else
%>
<HTML>
<HEAD>
<TITLE>Henvendelse fra xxx website.</TITLE>
<STYLE TYPE="text/css">
<!--
BODY {
font-family: Arial; font-size: 9pt; font-style: normal;
}
Table {
font-family: Arial; font-size: 9pt; font-style: normal;
}
Td {
font-family: Arial; font-size: 9pt; font-style: normal;
}
Tr {
font-family: Arial; font-size: 9pt; font-style: normal;
}
SELECT {
font-family: Arial; font-size: 10pt; font-style: normal;
}
INPUT {
font-family: Arial; font-size: 10pt; font-style: normal;
}
INPUT.submit {
font-family: Arial; font-size: 10pt; font-style: normal; TEXT-DECORATION: none;
}
INPUT.reset {
font-family: Arial; font-size: 10pt; font-style: normal; TEXT-DECORATION: none;
}
TEXTAREA {
font-family: Arial; font-size: 10pt; font-style: normal;
}
-->
</STYLE>
<!-- Følgende script tjekker om alle felterne i form-mailen er udfyldt. -->
<SCRIPT LANGUAGE="JavaScript" TYPE="text/javascript">
function validate(form1) {
//Navn-feltet
if (form1.navn.value == "") {
alert("Husk at angive dit navn!");
document.form1.navn.focus();
return false;
}
else {
//Addresse-feltet
if (form1.addresse.value == "") {
alert("Husk at angive din addresse!");
document.form1.addresse.focus();
return false;
}
else {
//Pstnummer-feltet
if (form1.postnummer.value == "") {
alert("Husk at angive dit postnummer!");
document.form1.postnummer.focus();
return false;
}
else {
//By-feltet
if (form1.by.value == "") {
alert("Husk at angive hvilken by du bor i!");
document.form1.by.focus();
return false;
}
else {
//Telefonnummer-feltet
if (form1.tlf.value == "") {
alert("Husk at angive et !");
document.form1.tlf.focus();
return false;
}
else {
//e-mail-feltet
if (document.form1.email.value.indexOf("@")==-1 || document.form1.email.value.indexOf(".")==-1) {
alert("Du har ikke udfyldt e-mail feltet korrekt");
document.form1.email.focus();
return false;
}
}
}
}
}
}
return true;
}
//Følgende sørger for cursoren står i første felt (navn)
function start() {
document.form1.navn.focus();
return false;
}
</SCRIPT>
</HEAD>
<BODY BGCOLOR="#FFFFFF" TEXT="#000000" LINK="#FF3399" VLINK="#3366FF" ALINK="#FF0000" SCROLL=AUTO LEFTMARGIN=0 MARGINWIDTH=0 TOPMARGIN=0 MARGINHEIGHT=0 ONLOAD="return start()">
<TABLE WIDTH=400 HEIGHT=450 BORDER=0 ALIGN="CENTER" CELLPADDING=0 CELLSPACING=0 RULES="NONE" FRAME="VOID">
<TR>
<TD WIDTH=100% HEIGHT=15 ALIGN="CENTER" VALIGN="TOP">
<CENTER>
...Jeg ønsker yderligerer information:...
</CENTER>
</TD>
</TR>
<TR>
<HR WIDTH=80% SIZE=1>
</TR>
<TR>
<TD ALIGN="CENTER" VALIGN="TOP">
<FORM NAME="form1" ACTION="jmail.asp" METHOD=POST ONSUBMIT="return validate(this)">
<TABLE WIDTH=650 HEIGHT=70% BORDER=0 ALIGN="CENTER" CELLPADDING=0 CELLSPACING=0>
<tr>
<td width=91> </td>
<td width=559 colspan="2" ><b></b></td>
<tr><td width="91"> </td><td colspan="2" width="559"> </td></tr>
<tr>
<td width=91 rowspan="4" valign="top" align="right">Sæt kryds:</td>
<td width=229><input TYPE="checkbox" NAME="xxx1" VALUE="Ja">Vedrørende xxx1.<br>
</td>
<td width=330>
<input TYPE="checkbox" NAME="xxx2" VALUE="Ja">Vedrørende xxx2.<br>
</td>
</tr>
<tr>
<td width=229><input TYPE="checkbox" NAME="xxx3" VALUE=": Ja">Vedrørende xxx3.<br>
</td>
<td width=330><input TYPE="checkbox" NAME="xxx4" VALUE="Ja">Vedrørende xxx4.<br>
</td>
</tr>
<tr>
<td width=229><input TYPE="checkbox" NAME="xxx5" VALUE=": Ja">Vedrørende xxx5.<br>
</td>
<td width=330><input TYPE="checkbox" NAME="xxx6" VALUE="Ja">Vedrørende xxx6.<br>
</td>
</tr>
<tr>
<td width=229><input TYPE="checkbox" NAME="xxx7" VALUE="Ja">Vedrørende xxx7.<br>
</td>
<td width=330><input TYPE="checkbox" NAME="xxx8" VALUE="Ja">Vedrørende xxx8.<br>
</td>
</tr>
<tr><td width="91"> </td></tr>
<TR>
<TD WIDTH=91 ALIGN="LEFT" VALIGN="BOTTOM">Navn:</TD>
<TD WIDTH=229 ALIGN="RIGHT" VALIGN="BOTTOM">
<p align="left"><INPUT TYPE="text" NAME="navn" SIZE=25 MAXLENGTH=100></TD>
</TR>
<TR>
<TD WIDTH=91 ALIGN="LEFT" VALIGN="BOTTOM">Addresse:</TD>
<TD WIDTH=229 ALIGN="RIGHT" VALIGN="BOTTOM">
<p align="left"><INPUT TYPE="text" NAME="addresse" SIZE=25 MAXLENGTH=100></TD>
</TR>
<TR>
<TD WIDTH=91 ALIGN="LEFT" VALIGN="BOTTOM">Postnummer:</TD>
<TD WIDTH=229 ALIGN="LEFT" VALIGN="BOTTOM"><INPUT TYPE="text" NAME="postnummer" SIZE=4 MAXLENGTH=4></TD>
</TR>
<TR>
<TD WIDTH=91 ALIGN="LEFT" VALIGN="BOTTOM">By:</TD>
<TD WIDTH=229 ALIGN="RIGHT" VALIGN="BOTTOM">
<p align="left"><INPUT TYPE="text" NAME="by" SIZE=25 MAXLENGTH=100></TD>
</TR>
<TR>
<TD WIDTH=91 ALIGN="LEFT" VALIGN="BOTTOM">Telefonnummer:</TD>
<TD WIDTH=229 ALIGN="LEFT" VALIGN="BOTTOM"><INPUT TYPE="text" NAME="tlf" SIZE=8 MAXLENGTH=8></TD>
</TR>
<TR>
<TD WIDTH=91 ALIGN="LEFT" VALIGN="BOTTOM">e-mail:</TD>
<TD WIDTH=229 ALIGN="RIGHT" VALIGN="BOTTOM">
<p align="left"><INPUT TYPE="text" NAME="email" SIZE=25 MAXLENGTH=100></TD>
</TR>
<TR>
<TD WIDTH=91 ALIGN="LEFT" VALIGN="top">Bemærkninger:</TD>
<TD WIDTH=229 ALIGN="RIGHT" VALIGN="BOTTOM">
<p align="left"><textarea rows="5" name="bem" cols="31"></textarea></TD>
</TR>
<TR>
<TD VALIGN="BOTTOM" COLSPAN=2 width="320"><BR>
<CENTER>
<INPUT TYPE="submit" NAME="submit" VALUE=" Indsend ">
<INPUT TYPE="reset" NAME="reset" VALUE=" Nulstil " name="Reset" onclick="java script:document.form1.navn.focus();">
</CENTER></TD>
</TR>
</TABLE>
</FORM>
</TD>
</TR>
</TABLE>
</BODY>
</HTML>
<% End If %>