CDONTS Hvad gør jeg forkert?
HejsaJeg har prøvet at lave et Jmail script om til CDONTS.
Når jeg klikker "send" modtager jeg kun beskeden "e-mail:"
Så der må være noget galt med den måde at den "inkludere" teksten..
håber der er en ekspert der kan hjælpe.
<%
Dim objCDO, strBeskriv, str1, str2, str3, strnavn, strfirma, strvej, strPostnr, strTlf, strFax, strEmail
If Request.ServerVariables("CONTENT_LENGTH") <> 0 Then
strBeskriv = Trim(Request.Form("Beskriv"))
str1 = Trim(Request.Form("1"))
str2 = Trim(Request.Form("2"))
str3 = Trim(Request.Form("3"))
strNavn = Trim(Request.Form("Navn"))
strFirma = Trim(Request.Form("Firma"))
strVej = Trim(Request.Form("Vej"))
strPostnr = Trim(Request.Form("Postnr"))
strTlf = Trim(Request.Form("Tlf"))
strFax = Trim(Request.Form("Fax"))
strEmail = Trim(Request.Form("Email"))
' CDONTS.NewMail objektet
Set objCDO = Server.CreateObject("CDONTS.NewMail")
' Her s?ttes afsender adresse
objCDO.From = "form@fuge-madsen.dk"
' Her s?ttes modtager adresse
objCDO.To = "lars@one2one.dk"
' Her s?ttes overskriften p? mailen
objCDO.Subject = "E-mail fra hjemmeside"
' Her s?ttes selve teksten til mailen
objCDO.Body = "Dette er en testmail afsendt fra www.html.dk."
objCDO.Body = "Beskrivelse: " & strBeskriv
objCDO.Body = "Check 1: " & str1
objCDO.Body = "Check 2: " & str2
objCDO.Body = "Check 3: " & str3
objCDO.Body = "Navn: " & strNavn
objCDO.Body = "Firma: " & strFirma
objCDO.Body = "Vej: " & strVej
objCDO.Body = "Postnr: " & strPostnr
objCDO.Body = "Tlf: " & strTlf
objCDO.Body = "Fax: " & strFax
objCDO.Body = "E-mail: " & strEmail
'send mail
objCDO.Send
' Fjern objekt igen
Set objCDO = Nothing
%>
Tak for din mail, vi vil kontakte dig hurtigst muligt.
<% Else %>
<html>
<head>
<meta http-equiv="content-type" content="text/html;charset=iso-8859-1">
<meta name="generator" content="GoLive CyberStudio 3">
<title>Kontakt</title>
</head>
<body bgcolor="white" link="#8b0000" alink="black" vlink="gray">
<div align="left">
<font face="Arial,Helvetica,Geneva,Swiss,SunSans-Regular"><br>
<table border="0" cellpadding="0" cellspacing="0" frame width="760">
<tr height="700">
<td width="350" height="700" valign="top">
<center>
<img height="162" width="255" src="billeder/logo.gif"><br>
<font face="Arial,Helvetica,Geneva,Swiss,SunSans-Regular" size="1">Kragsbjergvænget 3 . 5000 Odense C <br>
Tlf. 66 12 34 17 . Fax 65 91 34 17<br>
www.fuge-madsen.dk<br>
Email.<a href="mailto:post@fuge-madsen.dk"> post@fuge-madsen.dk</a></font><a href="mailto:post@fuge-madsen.dk"><br>
</a></center>
</td>
<td width="410" height="700" valign="top"><font face="Arial,Helvetica,Geneva,Swiss,SunSans-Regular"><b>Kontakt Fuge-Madsen<br>
<br>
</b></font>
<form action="test.asp" method="post">
<font face="Arial,Helvetica" size="2" color="#00009c"><b><br>
</b></font><font color="black" size="2" face="Arial,Helvetica,Geneva,Swiss,SunSans-Regular"><input type="checkbox" value="Jeg har et fuge arbejde og vil gerne have et tilbud" name="Kryds:Tilbud">Jeg har et fugearbejde og vil gerne have et tilbud<br>
<br>
<textarea name="beskriv" cols="25" rows="14">Beskriv fugearbejde her:</textarea><br>
<br>
<input type="checkbox" value="Jeg vil gerne kontaktes angående kvalitetssikring " name="1">Jeg vil gerne kontaktes angående kvalitetssikring<br>
<input type="checkbox" value="Jeg vil gerne kontaktes angående materialevalg " name="2">Jeg vil gerne kontaktes angående materialevalg<br>
<input type="checkbox" value="Jeg vil gerne kontaktes" name="3">Jeg vil gerne kontaktes<br>
<br>
</font><font face="Arial,Helvetica" size="2" color="black">Navn:<br>
<input type="text" size="50" name="navn"><br>
Firma:<br>
<input type="text" size="50" name="firma"><br>
Vej / Gade:<br>
<input type="text" size="50" name="vej"><br>
Postnr, / By:<br>
<input type="text" size="50" name="postnr"><br>
Tlf.:<br>
<input type="text" size="50" name="Tlf"><br>
Fax:<br>
<input type="text" size="50" name="Fax"><br>
E-mail: <br>
<input type="text" size="50" name="Email"><br>
<br>
</font><font color="#00009c"><kbd><input type="submit" value="Send"><input type="reset" value="Forfra"></kbd></font></td>
</tr>
</table></font></div>
</form>
</body>
</html>
<% End If %>
