Ciao ragazzi ho fatto unamiling list, ma quando mi devo mandare la mail mi esce questo :


Microsoft VBScript runtime error '800a01a8'

Object required: 'mail'

/gestione_mailinglist/send2.asp, line 94

Questa e lariga incriminata

Set mail.Obj = Nothing

Che errore e?

Case "CDOSYS"
Do While Not RS.eof
Set mailObj = Server.CreateObject("CDO.Message")
If (Request("Format") = "Text") Then
mailObj.TextBody = Request("Body")
Else
mailObj.HtmlBody = Request("Body")
End If
mailObj.From = RSBODY("From_Email")
mailObj.To = RS("Email")
mailObj.Subject = Request("Subject")
mailObj.TextBody = Request("Body")
mailObj.Fields("urn:schemas:httpmail:importance").Value = 2
mailObj.Fields.Update()
mailObj.Send
Set mail.Obj = Nothing

Loop

Che devo fare esattamente dove dovrei agire?