% strSubject = "Una Descarga de Tzapinco No. 246" strBody = "
" strBody = strBody & "Se ha realizado una descarga de Tzapinco No. 246" strBody = strBody & "" Set objCDOMail = Server.CreateObject("CDONTS.NewMail") objCDOMail.Host = "mail.texcocoe.com.mx" objCDOMail.From = "descarga@texcocoe.com.mx" objCDOMail.To = "arte@texcocoe.com.mx" objCDOMail.Subject = strSubject objCDOMail.BodyFormat=0 objCDOMail.Body = strBody objCDOMail.Send Set objCDOMail = Nothing Response.redirect("Publicaciones/Tzapinco_246.exe") %>