Si se puede me gustaria ver un ejemplo, o un tutorial.....

| ||||
Este es el codigo q deberia funcionar bien pero me da un error q no he detectado, por q, he puesto casi la misma pregunta abajo, si a ti te funziona bien, si sabes cual es el error, me avisas ok <% Dim omail Set omail = Server.CreateObject("CDONTS.NewMail") omail.From = "[email protected]" omail.To = "[email protected]" omail.Subject = "El Asunto del Mensaje" omail.AttachFile "c:\carpeta\archivo.ext", "Nombre de Archivo" omail.Body ="Aqui el cuerpo del mensaje" omail.Send Set omail = Nothing %> el error es este: Server object error 'ASP 0177 : 800401f3' Server.CreateObject Failed /intranetnew/scarica.asp, line 3 Invalid class string
__________________ Solo mi fido del tempo, le parole ed i fatti per prendere le decisioni più importanti della mia vita. // Solo confio en el tiempo, las palabras y los hechos para tomar las decisiones mas importantes de mi vida. Jonatan Lavado |
| |||
si te funciona cdonts ya es mucho... de todas formas intenta usar jmail, que hay una version gratis en www.dimac.net. una vez lo tengas instalado escribe un codigo parecido a este: Set msg = Server.CreateObject( "JMail.Message" ) msg.Logging = true msg.silent = true msg.From = "[email protected]" msg.AddRecipient "[email protected]" msg.AddRecipient "[email protected]" msg.Subject = "Asunto" msg.Body = "Carreta" msg.AddAttachment "C:\MiArchivo1.ext" msg.AddAttachment "C:\MiArchivo2.ext" If Not msg.Send("ip_servidor") Then Response.write "<pre>" & msg.log & "</pre>" Else Response.write "Mensaje enviado exitosamente!!!" End If Set msg = nothing |