• Lunes 23 de Diciembre de 2024, 09:32

Autor Tema:  Enviar Mensajes En Asp Al Correo  (Leído 2025 veces)

Ric@rdo

  • Nuevo Miembro
  • *
  • Mensajes: 3
    • Ver Perfil
Enviar Mensajes En Asp Al Correo
« en: Jueves 24 de Agosto de 2006, 17:42 »
0
Hola a todos soy novato en asp y estoy tratando de modificar una pagina..q es parecida a un foro...la idea esq necesito q cuando envio el mensajea la vex tambien envie un correo electronico de esta forma habre dado un posteo y a la vez le habre mandado un mensaje a su correo electronico..q objetos puedo usar..para poder invertigar...y deseo tambien conectarme a una base de datos access he estado intentando con el ODBC a una BD acces pero el codigo de coneccin creo no lo estoy haciendo bien haber si me pudieran dar un ejemplo de comoconectarme..plz..agradecere su aporte de antemano..

giannigor

  • Nuevo Miembro
  • *
  • Mensajes: 3
    • Ver Perfil
Re: Enviar Mensajes En Asp Al Correo
« Respuesta #1 en: Lunes 4 de Septiembre de 2006, 15:02 »
0
Hola Ric@ardo: la conexión con access la he realizado de la siguiente manera:

Dim x
Set x     = Server.CreateObject("ADODB.Connection")
x.Open     "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=\Carpeta_en_que_se_encuentran_las_BDD\"

espero te sirva

xcx

  • Miembro MUY activo
  • ***
  • Mensajes: 175
  • Nacionalidad: cl
    • Ver Perfil
    • Fotos y captura
Re: Enviar Mensajes En Asp Al Correo
« Respuesta #2 en: Jueves 14 de Septiembre de 2006, 15:40 »
0
aspmail, es muy bueno para manejar la parte de correos.

Mollense

  • Miembro de PLATA
  • *****
  • Mensajes: 1755
  • Nacionalidad: ar
    • Ver Perfil
    • http://solocodigo.com/
Re: Enviar Mensajes En Asp Al Correo
« Respuesta #3 en: Lunes 23 de Octubre de 2006, 20:25 »
0
Yo he utilizado CDONTS para el envío de correos así:

Código: Text
  1. <%
  2.   on error resume next  
  3.  
  4.   dirFrom="Favio@TuDominio.com"
  5.   dirTo="Favio.Maffeis@Gmail.com"
  6.   asunto="Prueba de CDONTS"
  7.   cuerpo="Me gusta mucho programar"
  8.  
  9.  
  10.   Set Mail=CreateObject("CDONTS.NewMail")
  11.   Mail.From=dirFrom
  12.   Mail.To =dirTo
  13.   'Mail.BCc="dir3@Serv3.xxx, dir6@Serv6.xxx,..."
  14.   Mail.Subject=asunto
  15.   Mail.Body=cuerpo
  16.   'Mail.BodyFormat=1                    'Texto(0) o HTML(1)
  17.   'Mail.ContentBase=URL                  'URL de donde se tomarán recursos
  18.   'Mail.ContentLocation=URL                'Nombre del recurso
  19.   'Mail.Importance=3                    'Prioridad del Mensaje
  20.   'Mail.MailFormat=1                    'Codificación: MIME(0) o Texto simple(1)
  21.   'Mail.Value=CadenaEncabezado              'Agrega encabezados al mensaje
  22.   'Version=Mail.Version                  'Versión del objeto CDOMTS
  23.   'Mail.AttachFile(Origen,NombArch,Codificacion)      'Adjunta un Archivo
  24.   'Mail.AttachURL(Origen,Location,Base,Codificacion)    'Adjunta un recurso
  25.   Mail.Send                        'Envía un E-Mail
  26.   'Mail.Send(From,To,Subject,Body,Importance)        'Envía un E-Mail
  27.   Set Mail=Nothing                    'Siempre liberar el Objeto
  28. %>
  29.  

Las líneas comentadas no las he usado pero las incluyo para que sepas que existen

 :hola:
"Los que renuncian son más numerosos que los que fracasan" H.F.
"No se cómo sería la III Guerra Mundial, pero la cuarta sería con piedras" A.E.
"Quién no fía no es de fiar..."


...no te quedes mirando.