mailer funktion sender kun udsnit at min tekst

Jeg har denne mailer, der henter noget fra en for. Det der kommer fra formen er ok men maileren tager kun det første men, så hvis jeg har et langt brev der skal sendes kommer det sidste ikke med. Mit script ser sådan ud:

--------------

strTitle=Request.Form("title")
strBesked=Request.Form("besked")


Dim Mailer
Set Mailer = Server.CreateObject("SMTPsvg.Mailer")
Mailer.ContentType = "text/html"
Mailer.FromName = "HMC Nyhedsbrev"
Mailer.FromAddress = "herning@menighedscenter.dk"

Mailer.RemoteHost = "mail.sonofon.dk"
   
Mailer.AddRecipient "andreas@vejnoe.dk", "andreas@vejnoe.dk"
       
Mailer.Subject = "" & strTitle
       
Mailer.BodyText = "" & strBesked

if Mailer.SendMail then
Response.Write "Mailen er afsendt til &quot;" + objRec("strEmail").Value + "&quot;<br>"
else
Response.Write "Der skete en fejl &quot;" + objRec("strEmail").Value + "&quot;:" + Mailer.Response
end if
       
' Fjern objekt igen
Set Mailer = Nothing
objRec.Movenext