Ciao a tutti

Hanno sostituito sul server il cdonts con cdosys.
Non so neanche da che parte girarmi.
Ho provato a pasticciare, ma non ne sono venuta a capo.


Questo e' la vecchia form:


<%@Language=VBScript%>
<%option explicit%>
<%dim OggettoMail, strBody
set OggettoMail = Server.CreateObject("CDONTS.NewMail")
StrBody = "<HTML><HEAD><TITLE>EMAIL</TITLE>"
StrBody = StrBody + "<style type='text/css'>"
StrBody = StrBody + ".bordo1 {"
StrBody = StrBody + "border-top: none 0px none;"
StrBody = StrBody + "border-right: none 0px none;"
StrBody = StrBody + "border-bottom: none 0px none;"
StrBody = StrBody + "border-left: solid 2px black;"
StrBody = StrBody + "}"
StrBody = StrBody + "</style>"
StrBody = StrBody + "</HEAD><BODY>"
StrBody = StrBody + "<table width=100% height=100><tr><td class='bordo1'></td><td>"
StrBody = StrBody + "[b]<table width=80% cellspacing=0 cellpadding=1><tr><td bgcolor=f3f3f3><FONT FACE=VERDANA SIZE=1 color=333333>Da: <font face=verdana size=2 color=000000>" & Request.Form("cognome") & " </font></td></tr></table>"
StrBody = StrBody + " [b]<table width=80% cellspacing=0 cellpadding=1><tr><td bgcolor=f3f3f3><FONT FACE=VERDANA SIZE=1 color=333333> <font face=verdana size=1 color=000000>"& Request.Form("mail") &"</font></td></tr></table>"
StrBody = StrBody + " <FONT FACE=VERDANA SIZE=1 color=333333>Versione del sito:</font> <font face=verdana size=1 color=000000>Italiano</font>

"
StrBody = StrBody + "<FONT FACE=ARIAL SIZE=2 COLOR=FFFFFF>Dati:</FONT>


"
StrBody = StrBody + "<FONT FACE=VERDANA SIZE=1>Nome:</FONT> <FONT FACE=VERDANA SIZE=1 COLOR=FF0000>" & Request.Form("nome") & "</FONT>
"
StrBody = StrBody + "<FONT FACE=VERDANA SIZE=1>Cognome:</FONT> <FONT FACE=VERDANA SIZE=1 COLOR=FF0000>" & Request.Form("cognome") & "</FONT>
"
StrBody = StrBody + "<FONT FACE=VERDANA SIZE=1>E-mail:</FONT> <FONT FACE=VERDANA SIZE=1 COLOR=FF0000>" & Request.Form("mail") & "</FONT>
"
StrBody = StrBody + "<FONT FACE=VERDANA SIZE=1>Note:</FONT> <FONT FACE=VERDANA SIZE=1 COLOR=FF0000>" & Request.Form("note") & "</FONT>
"
StrBody = StrBody + "</td></tr></table>"
StrBody = StrBody + "</BODY></HTML>"
OggettoMail.From = Request.Form("mail")
OggettoMail.To = "pippo@nomesito.it"
OggettoMail.Subject = "Dati"
OggettoMail.BodyFormat=0
OggettoMail.MailFormat=0
OggettoMail.Body = strBody
OggettoMail.Send
set OggettoMail = Nothing%>

Qualcuno che ne sa, mi puo' aiutare ???