es posible pasar codigo html y asp a traves de aspEmail? o la aventura de crear un Ne

[potenkin]

hola,
alguien sabe si es posible pasar código html y asp a través de aspEmail?

Me explico:
Quiero montar un newsletter que me permita enviar un boletín con varias noticias, a una lista de cuentas de correo.

Se me ha ocurrido hacer lo siguiente:

1.- crear un sistema de noticias dinàmico, con una base de datos, en la que se pueden craer, por un lado "boletines", y por otro noticias, despues se asignan las noticias a un boletin determinado, y tenemos por ejemplo el Boletín 1, al que le hemos asignado 4 noticias.

2.- enviarlo a una lista de direcciones con aspEmail.


¿Que problema me encuentro?
el boletín lleva html y también asp, ya que es una plantilla en la que se muestra:

- el titulo (extraido de un Recordset)
- las noticias, (también extraidas de un Recordset) se muestran filtradas las que pertenecen a ese boletín, y despues hay un Repeat, para mostrar todas las que correspondan.


Os haceis una idea del código que tengo como resultado? (si quereis puedo incluirlo)


Pues bien, el siguiente paso es enviarlo a una lista de direcciones utilizando aspEmail, y aqui es donde estoy dandome cabezazos desde hace 10 días.

Alguien sabe si es posible hacer esto? como hacerlo? o alguna otra alternativa para crear un Newsletter que permita añadir noticias de forma dinámica (con base de datos Acces)


salud y muchas gracias

[Myakire]

Diez días buscando como mandar html con ASPMail ?

Revisaste la API? ahí dice que para ello solo basta con colocar la propiedad ContentType con un valor igual a "text/html"

Un ejemplo, otro ejemplo

Sobre lo del sistema de noticias .... no alcancé a detectar cuál es la duda exacta y específica que tienes al respecto

[leoaraguas]

Hola, tengo ese sistema hecho. te cuento que para simplificarme el trabajo use un metodo un tanto peculear...

1 - genere la plantilla asp del newsletter.
2 - arme un modulo de envio que hace lo siguiente:
A) Solicita que selecciones un id de newsletter:
B) ese id lo utiliza para llamar al asp cargarlo (mediante XMLHTTP)

Ej:
Supongamos que de un Listbox le digo que el news es el numero 25... entonces..

Código:

<%
dim xml, cadena
'Lo que sigue esto es para que no te de Timeout si demora en generar el asp
Server.ScriptTimeout =9999 
Response.Buffer = True
'creo el componente 
Set xml = Server.CreateObject("Microsoft.XMLHTTP")
'Indico que tiene que leer
xml.Open "GET", "http://desarrollo/news/mail.asp?id=25", False
'Leo la pagina
xml.Send
'almaceno el resultado (todo el "HTML" de la page) en la variable Cadena
cadena = CSTR(xml.responseText)
' aca definis las propiedades de tu componente de correo... aspmail en tu caso
' utilizando la variable cadena para el cuerpo del mail.
'Si haces un Response.Write cadena vas a entender mejor cual es su valor
%> 

Bueno... espero que te sirva el dato.

Saludos.

[potenkin]

gracias a los 2 por contestar

leoaraguas, como has montodo las tablas de la base de datos?

yo de la siguiente forma:

tabla news (para las noticias)
- id (autonumerico)
- nombre
- entradilla
- texto
- newsletter
- fecha

para el newsletter
- id
- newsletter
- fecha

y relaciono los campos newsletter de las 2 tablas, para relacionarlo, pero claro, el campo de relación es tetxo y no un número, y es el que me aparece en la direccion.

salut

[leoaraguas]

cualquiera de las dos esta bien... solo que a largo plazo te puede traer problemitas el tema de los id de newsletter.

yo lo haria de la siguiente manera:

tabla news (para las noticias)
- id (autonumerico)
- nombre
- entradilla
- texto
- idNewsletter
- fecha
-volanta<--- te lo sugiero... es piola para ordenar... la volanta seria como un titulo descriptivo de la noticia... normalmente va en el mismo cuerpo que la "entradilla" (abstract o bajada para nosotros) pero en Negrita o Bold.

para el newsletter
- id
-titulo
- fecha

Saludos.!

[potenkin]

hola,
al final lo tengo casi hecho, envio la dirección de la plantilla y le añado el id del newsletter, que he enviado como una variable. Todo esto lo recogeré y enviaré a través de aspEmail, de la siguiente forma:

Mail.IsHTML = True

Mail.Body = "<body bgcolor='#FFFFFF' leftmargin='0' topmargin='0' marginwidth='0' marginheight='0'><a href='http://www.dominio.com/newsletter/plantilla.asp?idnewsletter=" & Request("Body") & "'></a></body>"

en: "& Request("Body") &" recojo la variable "id" de un formulario. Consigo hacer un envio como el siguiente al grupo de correos:

http://www.dominio.com/newsletter/pl...idnewsletter=4

en el programa de correo electrónico, recibo la dirección http, pero no la página directamente (que es lo que querria), que se viera directamente la página html en el programa de correo

como hacerlo?


salut

[leoaraguas]

Recorda lo que te puse en el mensaje anterior...

el body tiene que ser la plantilla completa... vos estas poniendo un link... es decir.. cambia por esto:

Código:

<%
dim xml, cadena
'Lo que sigue esto es para que no te de Timeout si demora en generar el asp
Server.ScriptTimeout =9999 
Response.Buffer = True
'creo el componente 
Set xml = Server.CreateObject("Microsoft.XMLHTTP")
'Indico que tiene que leer
xml.Open "GET", "http://www.dominio.com/newsletter/plantilla.asp?idnewsletter=" & Request.form("idNews"), False
'Leo la pagina
xml.Send
'almaceno el resultado (todo el "HTML" de la page) en la variable cadena
cadena = CSTR(xml.responseText)
' aca definis las propiedades de tu componente de correo... aspmail en tu caso
' utilizando la variable cadena para el cuerpo del mail.
'Si haces un Response.Write cadena vas a entender mejor cual es su valor
Mail.Body = cadena
%> 

Si tenes duda pasame el codigo y te lo modifico.
PD: SACALE TODOS LOS DATOS PERSONALES

[potenkin]

ok, muchas gracias
consigo enviar toda la plantilla, pero en el programa de correo recibo el html, y veo el html como texto, pero no se vé la página correctamente ¿¿??

supongo que es algo relacionado con la plantilla, que es una página asp, que procesa el asp y envia el html...

como lo has solucionado?

[potenkin]

me faltaba incluir:

Mail.IsHTML = True

ahora se envia correctamente como html, pero el newsletter que se recibe por e.mail no respeta las acentos y comillas ¿¿??

adjunto el codigo
----------------------
<%
strHost = "smtp.dominio.com"
If Request("Send") <> "" Then
Set Mail = Server.CreateObject("Persits.MailSender")
Mail.Host = strHost
Mail.Port = 25
Mail.Username = "usuario"
Mail.Password = "clave"
Mail.From = Request("From")
Mail.FromName = Request("FromName")
Mail.AddBcc Request("To")
Mail.Subject = Request("Subject")
dim xml, cadena
Server.ScriptTimeout =9999
Response.Buffer = True
Mail.IsHTML = True
Set xml = Server.CreateObject("Microsoft.XMLHTTP")
xml.Open "POST", "http://www.dominio.com/newscomers/control/plantilla.asp?idnewsletter=" & Request.form("Body"), False
xml.Send
cadena = CSTR(xml.responseText)
Mail.Body = cadena
strErr = ""
bSuccess = False
On Error Resume Next ' catch errors
Mail.SendToQueue ' send message
If Err <> 0 Then ' error occurred
strErr = Err.Description
else
bSuccess = True
End If
End If
%>
----------------------

sabeis como solucionarlo?


salut

[leoaraguas]

Fijate la codificacion que estas utilizando en la planilla.

[potenkin]

al comenzar la página, esta:

<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>


utilizando el GET ma pasa lo mismo

[potenkin]

me respondo a mi mismo (por si aguien lo puede necesitar)

solucionado utilizando

<% Response.Charset = "iso-8859-1" %> en la plantilla


salud y gracias