Problem med AspMail

Hej jeg er næsten færdig med en webshop, dog volder det mig nogle problemer med at få afsendt en mail afsted, med info om transanktionen.

Selve den kilde kode jeg har vedlagt, er som sådan ikke færdig med indholdet til selve teksten i mailen.

Jeg får denne fejl fra serveren:Fejltype:
Serverobjekt, ASP 0177 (0x800401F3)
Ugyldig klassestreng
/sadu/indsend1.asp, line 26


Her kildekoden:<%
FOR i = 0 TO Session("nextvare")
    IF Session("varenavn" & i)  <> "" THEN
    Totalpris = Totalpris + (CInt(Session("varestk" & i)) * FormatCurrency(Session("varepris" & i)))
    IF FormatCurrency(Session("varefragtpris" & i)) > FormatCurrency(Fragtpris) THEN
      Fragtpris = FormatCurrency(Session("varefragtpris" & i))
    END IF

OrderMailText = OrderMailText  & Session("varenavn" & i) 
    IF NOT  Session("varefritekst" & i) = "ingen" THEN    
OrderMailText = OrderMailText  &  Session("varefritekst" & i)

ELSE OrderMailText = OrderMailText  & " " END IF
    IF NOT Session("varefarve" & i) = "ingen" THEN
OrderMailText = OrderMailText  & Session("varefarve" & i)

Else
OrderMailText = OrderMailText & " "
END IF

OrderMailText = OrderMailText  & session("varestk" & i)  & " : " &  FormatCurrency(Session("varepris" & i)) & " : " &  FormatCurrency((CInt(Session("varestk" & i)) * FormatCurrency(Session("varepris" & i))))
END IF
NEXT


Set msg = Server.CreateObject("SMTPsvg.Mailer")
msg.RemoteHost = "pasmtp.tele.dk"
msg.CharSet = 2
msg.EncodeHeader "8bit"


msg.FromName = "webshop"
msg.FromAddress = "Anders@And.dk"
msg.AddRecipient session("fornavn"), session("email")
msg.Subject = "Webshop"
msg.BodyText = OrderMailText

if not msg.SendMail then
Response.Write "Mailen kunne ikke afsendes grundet:<br>"
Response.Write msg.Response
else
Response.Write "Mailen er korrekt afsendt."
end if

Set msg = nothing
%>