Programación Web y Scripting > ASP

 Enviar Mensajes En Asp Al Correo

(1/1)

Ric@rdo:
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:
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:
aspmail, es muy bueno para manejar la parte de correos.

Mollense:
Yo he utilizado CDONTS para el envío de correos así:


--- Código: Text ---<%  on error resume next      dirFrom="Favio@TuDominio.com"  dirTo="Favio.Maffeis@Gmail.com"  asunto="Prueba de CDONTS"  cuerpo="Me gusta mucho programar"     Set Mail=CreateObject("CDONTS.NewMail")  Mail.From=dirFrom  Mail.To =dirTo  'Mail.BCc="dir3@Serv3.xxx, dir6@Serv6.xxx,..."  Mail.Subject=asunto  Mail.Body=cuerpo  'Mail.BodyFormat=1                    'Texto(0) o HTML(1)  'Mail.ContentBase=URL                  'URL de donde se tomarán recursos  'Mail.ContentLocation=URL                'Nombre del recurso  'Mail.Importance=3                    'Prioridad del Mensaje  'Mail.MailFormat=1                    'Codificación: MIME(0) o Texto simple(1)  'Mail.Value=CadenaEncabezado              'Agrega encabezados al mensaje  'Version=Mail.Version                  'Versión del objeto CDOMTS  'Mail.AttachFile(Origen,NombArch,Codificacion)      'Adjunta un Archivo  'Mail.AttachURL(Origen,Location,Base,Codificacion)    'Adjunta un recurso  Mail.Send                        'Envía un E-Mail  'Mail.Send(From,To,Subject,Body,Importance)        'Envía un E-Mail  Set Mail=Nothing                    'Siempre liberar el Objeto%> 
Las líneas comentadas no las he usado pero las incluyo para que sepas que existen

 :hola:

Navegación

[0] Índice de Mensajes