Questo è un post da forum ASP. Comunque l'errore può essere quì:

Setmail=Server.CreateObject("CDONTS.NewMail")

devi staccare mail da set

Set mail=Server.CreateObject("CDONTS.NewMail")

Inoltre la variabile mail chiamala in un altro modo, tipo mailobj, strmail cose del genere. Nella pagina send.asp poi elimina tutti i tag HTML che non ti servono a niente.