CDOSYS e messaggio inesistente

[Nemesis19]

salve a tutti. praticamente ho il problema che invio una mail mediante CDOSYS a due destinatari il destinatario principale e una copia carbone a chi tramite il sito ha inviato la mail.

non capisco perché ma il messaggio non arriva benché io non riesca a riscontrare errore anche perché l'invio avviene tutto funziona ok.

vi posto il codice che uso nella pagina "invio_mail.asp":

<%
Sub Invio()
Dim Mail
set Mail = server.CreateObject("CDO.Message")
With Mail
.From = request.form("mail")
.To = "slamdunk2fic@hotmail.com"
.Cc = request.form("mail")
.Subject = "Richiesta informazioni Slam Dunk 2"
.TEXTBody = messaggio
.Send
end With
set Mail=nothing
End Sub
%>

<%
if request.form("nome")="" or request.form("mail")="" or Instr(request.form("mail"), "@") = 0 or request.form("mess")="" then
Session("dati") = "no"
Response.Redirect "index.asp?sd2=Contact.htm"
else
call main()
end if%>

<%
Sub main()
dim messaggio
messaggio="Salve, mi chiamo "& request.form("nome") &" e invio questa mail per richiederti alcune informazioni:"
messaggio= messaggio & vbCrLf
messaggio= messaggio & request.form("mess")
call Invio()
Session("inviato") = "si"
Response.Redirect "index.asp?sd2=Contact.htm"
end sub
%>


Il codice mi sembra ok, magari datemi la vostra opinione!!!
grazie a tutti

[orcim]

metti qualche response.write e controlla che i valori dal form arrivino correttamente.