L'errore è il seguente (ho messo anche i numeri di riga del debug):

Microsoft VBScript runtime error '800a01a8'

Object required: ''

/inviofile/inviofile.asp, line 153


152 Dim objCDO
153 emailCliente = Request((rsLogin.Fields.Item("Email").Value))
154 NomeCliente = Request((rsLogin.Fields.Item("Cliente").Value))
154 Set objCDO = Server.CreateObject("CDONTS.NewMail")
156 objCDO.From = "xxxxxxxx.net"
157 objCDO.To = "xxxxxxxxxx@tiscali.it"
158 objCDO.Subject = " Conferna Invio Lavoro a: xxxxxxxxx.net "
159 objCDO.Body = " Grazie " & NomeCliente & " per esserti rivolto a 160 noi" & ", " & VbCrLf &_
161 " Data dell'invio: " & Request("DataFile") & " " & VbCrLf &_
162 " Identificativo Invio: " & Request("IdFile") & " "
163 objCDO.Send()
164 Set objCDO = Nothing