Envio De Email Programado Con Asp

[Coke2002]

Saludos a todos,

Estoy realizando una aplicación de mail list en la cual los mensajes deben enviarse especificando la hora y fecha en que seran entregados.
Ya tengo la aplicacion casi completa pero no se como hacer para que los emails(guardados en un BD de access) puedan ser enviados a determinada fecha y hora.
Cualquier idea es bienvenida....

[aviana]

te escribo para preguntarte si tu sabes mandar correos cuando se pincha un enlace. Salu2

[ToKaTa]

en asp, si lo que necesitas es enviar un correo puedes usar por ejemplo este script:

<pre>
&lt;%
Mensaje = &quot;Esto es una prueba&quot;
EmailA = &quot;[email protected]&quot;

Set Mail = Server.CreateObject(&quot;Persits.MailSender&quot; )
Mail.Host = &quot;mail.-----.net&quot; 'Aqui ira tu servidor, donde tienes alojadas las paginas asp
Mail.From = &quot;[email protected]&quot;
Mail.FromName = &quot;Nombre del que lo envia&quot;
Mail.AddAddress EmailA
Mail.Priority = &quot;3&quot;

Mail.Subject = &quot;Prueba de envio de correo con asp&quot;
Mail.IsHTML = True

Mail.Body = Mensaje

On Error Resume Next

Mail.Send

If Err &lt;&gt; 0 Then
Response.Write &quot;Hubo un error de tipo:&quot; &amp; Err.Description
End If
%&gt;
</pre>

Puedes hacer que al pulsar el enlace se abra una ventana, que se mande el mensaje y que se cierre la ventana, to de golpe. Vamos..por dar una idea...



ToKaTa.

[Coke2002]

Hola a todos... resolvi el problema de los mails enviados a determinada hora mediante un script en el servidor pero ahora tengo un pequeño problema con los email que envio(en formato HTML) porque cuando llegan las imagenes que estan dentro del mail HTML que han sido añadidas como attach no las muestra ....

Alli esta el codigo de envio del mail en formato HTML, si alguien sabe lo que esta mal....aviseme
<pre>
strTo = &quot;[email protected]&quot;
strSubject = &quot;ALGUN ASUNTO &quot;
strBody = &quot;&lt;html&gt;&lt;body&gt;&lt;b&gt;&lt;i&gt;&q uot;
strBody = strBody &amp; &quot;EMAIL&quot; &amp; &quot;&lt;br&gt;&lt;br&gt;&quot;
strBody = strBody &amp; &quot;&lt;img border=&quot;&quot;0&quot;&quot; src=&quot;&quot;imagen.gif&quot;&quot;&gt;&quot;
strBody = strBody &amp; &quot;Nombre: &lt;br&gt;&quot;
strBody = strBody &amp; &quot;Empresa:&lt;br&gt;&quot;
strBody = strBody &amp; &quot;Sugerencias:&lt;br&gt;&quot;
strBody = strBody &amp; &quot;&lt;/i&gt;&lt;/b&gt;&lt;/body&gt;&lt;/html&gt;&quot;
Set objCDOMail = CreateObject(&quot;CDONTS.NewMail&quot;)
objCDOMail.From = &quot;[email protected]&quot;
objCDOMail.To = strTo
objCDOMail.Subject = strSubject
objCDOMail.BodyFormat=0
objCDOMail.MailFormat=0
objCDOMail.AttachFile &quot;C:\imagen.gif&quot;,&quot;imagen.gif&quot ;
objCDOMail.Body = strBody
objCDOMail.Send
Set objCDOMail = Nothing
</pre>