CDONTS...hjälp

Hej jag använder mig utav en vykortstjänst på min hemsida.

koden till vykortstjänster ser ut på följande:

set mailer = server.createobject("SMTPsvg.Mailer")
  Mailer.FromName = "Micke & Annas vykorts service"
  Mailer.FromAddress = "vykort@micke-anna.nu"
  Mailer.RemoteHost = "mail.micke-anna.nu"
  Mailer.AddRecipient sNameTo, sEmailTo
  Mailer.Subject = sNameFrom & " har skickat dig ett vykort"

  strMsgHeader = sNameFrom & "(" & sEmailFrom & ")" & " har skickat dig ett vykort!" & vbCrLf 
  strMsgHeader = "För att plocka upp det, gå till följande adress: " & GetPathToPickupScript() & "?cardid=" & IDToSend
  strMsgFooter = vbCrLf & vbCrLf  & "Detta vykort var skickat och gjort med micke & annas vykorts service på adressen: <A HREF="http://www.micke-anna.nu"" TARGET=_blank>http://www.micke-anna.nu"</A> 
  Mailer.BodyText = strMsgHeader & strMsgFooter

  if Mailer.SendMail then
     ' Message sent Ok, redirect to a confirmation page
     Response.Redirect "thanks.asp"
  else
     ' Message send failure
     Response.Write ("Ett fel inträffade.<BR>")
     ' Send error message
     Response.Write ("Felet var " & Mailer.Response)
  end if
%>

hur byter jag ut så att följande fungerar på CDONTS?? det är vad de kör på hotellet jag ligger på.

------------------
Micke & Annas Sajt
micke@micke-anna.nu