CDOSYS con errore ma funzionante...

[g.kama]

Salve a tutti. Ho un filmato flash con una serie di campi di input. Dopo la compilazione dei campi di input e alla pressione di un tasto, i dati vengono inviati ad una pagina asp che esegue tutto ciò che gli è richiesto. Si tratta di un piccolo back end per l'invio di email e funziona in tutto e per tutto, fatto con CDOSYS su win 2003 server su Aruba. La cosa strana è che se richiamo la pagina da browser, mi segnala questo errore:

CDO.Message.1 error '8004020c'

At least one recipient is required, but none were found.

/email.asp, line 11

Posto lo script e segnalo la linea incriminata in rosso:

<%
Dim MiaMail
Set MiaMail = Server.CreateObject ("CDO.Message")
MiaMail.From = "miamail@miamail.it"
MiaMail.To = Request.Form ("email")
MiaMail.Cc = Request.Form ("altri")
MiaMail.Bcc = Request.Form ("nascosto")
MiaMail.Subject = Request.Form ("oggetto")
MiaMail.HTMLBody = Request.Form ("messaggio")
MiaMail.Fields.Update()
MiaMail.Send()
Set MiaMail = Nothing
%>

Anche se funziona, il fatto che dia errore è un pò strano, se qualcuno gentilmente volesse farmi capire il perché, così magari ci scappa che imparo qualcosa di asp...

Grazie

[Roby_72]

"recipient" è il destinatario... quindi qualcuno di quelli che hai messo non esiste...

Roby

[g.kama]

Scusa... ma detto così non ho capito proprio niente di quello che vuoi dirmi...

[Roby_72]

Questi sono i destinatari:

MiaMail.From = "miamail@miamail.it"
MiaMail.To = Request.Form ("email")
MiaMail.Cc = Request.Form ("altri")
MiaMail.Bcc = Request.Form ("nascosto")

Contengono tutti qualcosa?

Roby

[g.kama]

Questi sono i destinatari:

MiaMail.From = "miamail@miamail.it"
MiaMail.To = Request.Form ("email")
MiaMail.Cc = Request.Form ("altri")
MiaMail.Bcc = Request.Form ("nascosto")

Contengono tutti qualcosa?

Il primo è il mittente ed è una variabile fissa, gli altri possono contenere tutti qualcosa o qualcuno niente a seconda delle esigenze. adesso ho capito cosa vuoi dire, ma perché il problema mi si presenta quando io richiamo la pagina da browser prima ancora di effettuare qualsiasi sessione da flash?

Nel caso come faccio d a dirgli di stare "buono" anche se non riempio alcuni campi?

Grazie
Kama

[Roby_72]

MiaMail.From = "miamail@miamail.it" 
if len(Request.Form ("email")) > 0 then
MiaMail.To = Request.Form ("email") 
end if
if len(Request.Form ("altri")) > 0 then
MiaMail.Cc = Request.Form ("altri") 
end if
if len(Request.Form ("nascosto")) > 0 then
MiaMail.Bcc = Request.Form ("nascosto") 
end if

Roby

[g.kama]

OK grazie! Ovviamente devo apportare la modifica anche agli altri request form... giusto? Cioé subject e htmlbody...