ola amigos delk foro, lo que pasa es que el siguiente codigo para enviar correos antes me funcionaba pero de un momento a otro dejo de funcionar, este mismo codigo lo pruevoen otros servidores y me funciona pero en el servidor donde tengo montado mi web no funciona
Dim objCDOMail
Set objCDOMail = Server.CreateObject("CDONTS.NewMail")
objCDOMail.From = nombre_remitente & "<" & remitente & ">"
objCDOMail.To = para
objCDOMail.Subject = asuntom
objCDOMail.BodyFormat = 0
objCDOMail.MailFormat = 0
objCDOMail.Body = cuerpom
objCDOMail.Importance = 2
objCDOMail.Send
Set objCDOMail = Nothing