Någon som kan hjälpa mig med felsökning?
Mailen anländer, och sist i mail-body-texten står det ett =
Katarina

<%
Set objMail = Server.CreateObject( "CDONTS.NewMail" )
objMail.To = Request.Form("to")
objMail.From = "vbscript@vbscript.dk"
objMail.Subject = Request.Form("subj")
objMail.Body = Request.Form("body")
objMail.Host = "smtp1.b-one.nu"
objMail.Send
Set objMail = Nothing
%>

Gör så här (inledningsvis)

response.write Request.Form("body")

och kolla så att det inte är ett "=" med i värdet som postas. Är det det? Hur ser Formuläret ut som postar mailet till ovan utskrivna kod.

Har haft samma problem...
Men har löst det med denna kod:<code>
<%
Set CDONTS = CreateObject("CDONTS.NewMail")
CDONTS.From = "vbscript@vbscript.dk"
CDONTS.To = "" & Request.Form("to") & ""
CDONTS.Subject = "" & Request.Form("subj") & ""
CDONTS.Body = "" & Request.Form("body") & ""
CDONTS.BodyFormat = 0
CDONTS.Importance = 2
CDONTS.Host = "smtp1.b-one.net"
CDONTS.Send
Set CDONTS = Nothing
%>
</code>
Jag använder också B-One så jag vet att koden funkar. :)

Sorry men = är kvar.
Katarina

Gav ingen lösning
Så här ser formuläret ut:
<form name="email" method="post" action="maila.asp">
<p>
<input name="to" type="text" value="din mail">
<font color="#FF0000">*</font>M&aring;ste anges<br>
<input name="subj" type="text" value="Fråga till VBScriptDK">
<br>
<textarea name="body" cols="80" rows="20" wrap="VIRTUAL"></textarea>
<br>
<input type="submit" name="Submit" value="Skicka">
</p>
</form>

Testa att göra så här då:<code>
<%
Set CDONTS = CreateObject("CDONTS.NewMail")
CDONTS.From = "vbscript@vbscript.dk"
CDONTS.To = "" & Request.Form("to") & ""
CDONTS.Subject = "" & Request.Form("subj") & ""
CDONTS.Body = "<font style=""font-family: verdana;font-size:10px;"">" & Request.Form("body") & "</font>"
CDONTS.BodyFormat = 0
CDONTS.Importance = 2
CDONTS.Host = "smtp1.b-one.net"
CDONTS.Send
Set CDONTS = Nothing
%>
</code>
Då har du html före och efter och det kan kanske hjälpa.

Ledsen men = är kvar.
Katarina

Ja du... Jag har denna kod till min funktion som ska skicka ut glömt lösenord:
<code>
<%
If Request.Querystring("action") = "LostPw" Then
strSQL = "SELECT *** FROM *** WHERE ***='" & Request.Form("email") & "'"
Set RecSet = Server.CreateObject("ADODB.Recordset")
RecSet.Open strSQL, Conn

If RecSet.EOF Then
Session("ErrorMsg") = "L&#246;senordet finns inte i databasen."
Response.Redirect "forgotpw.asp?action=msg"
Else
Set CDONTS = CreateObject("CDONTS.NewMail")
CDONTS.From = "lostpw@teambd.net"
CDONTS.To = "" & Request.Form("email") & ""
CDONTS.Subject = "Team Norrbotten - Ditt Lösenord"
CDONTS.Body = "<font style=""font-family: verdana;font-size:10px;""><b>L&#246;senord:</b> " & RecSet("***") & "</font>"
CDONTS.BodyFormat = 0
CDONTS.Importance = 2
CDONTS.Host = "smtp1.b-one.net"
CDONTS.Send
Set CDONTS = Nothing

Session("ErrorMsg") = "Ditt l&#246;senord är skickat."
Response.Redirect "forgotpw.asp?action=msg"
End If
RecSet.Close
Set RecSet = Nothing
End If
%>
</code>

och detta formulär:
<code>
<form onSubmit="checkEmail()" action="?action=LostPw" method="post" name="ForgotPasswordForm">
<FIELDSET style="width: 100%; text-align: center; padding: 3px;">
<LEGEND>Gl&#246;mt L&#246;senordet</LEGEND>
<% If Request.Querystring("action") = "msg" Then
Response.Write Session("ErrorMsg")
Session("ErrorMsg") = ""
Else %>
<table border=0 cellspacing=6 cellpadding=0 width=100%>
<tr>
<td><nobr>E-post:</nobr></td>
</tr>
<tr>
<td><input type="text" name="email" style="width:150px;" value=""></td>
</tr>
<tr>
<td colspan="2" style="text-align: right;"><input type="submit" value="Skicka" style="width:60px;"> <input type="reset" value="Rensa" name="clear"></td>
</tr>
</table>
<% End If %>
</FIELDSET>
</form>
</code>

Med denna kod så har jag blivit av med = tecknet..
Hade nämligen det problemet själv förut. Men den koden funkar iaf för mig.

Om den inte funkar så vet jag inte vad du kan göra.