Access - Como enviar 1 e-mail directamente

 
Vista:

Como enviar 1 e-mail directamente

Publicado por josepf (54 intervenciones) el 12/05/2010 10:19:46
Buenas Compañeros!

Necesito hacer un aplicativo que envie e-mails con fichero sin tener montado outlook, sin servidor de correo. He visto aplicaciones corriendo que lo hacen.
Alguien sabe como hacerlo?

Gracias

1 Saludo
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Como enviar 1 e-mail directamente

Publicado por Jefferson (135 intervenciones) el 12/05/2010 17:46:27
Hola Josepf

Prueba con esto

http://sites.google.com/site/jjjt1973/Home/enviar-correo-usando-cdo-de-una-forma-mas-sencilla

http://sites.google.com/site/jjjt1973/Home/enviar-correo-usando-cdo-de-microsoft

http://sites.google.com/site/jjjt1973/Home/enviar-correo-masivo

http://sites.google.com/site/jjjt1973/Home/envia-pagina-web-en-el-cuerpo-del-correo

Desde Venezuela
Jefferson
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
sin imagen de perfil

RE:Como enviar 1 e-mail directamente

Publicado por pequeno_gigante (10 intervenciones) el 12/05/2010 23:57:37
esto lo uso para mandar reportes por correo, y lo activo desde una barra de herramientas

Function Enviar()
On Error GoTo Enviar_Err

Dim report_name As Report

**esto que sigue para decirle que es el reporte que se ve en la pantalla****

Set report_name = Screen.ActiveReport

DoCmd.SendObject acReport, report_name.name, "FormatoSnapshot(*.snp)", "", "", "", report_name.name, report_name.name, True, ""

Enviar_Exit:
Exit Function

Enviar_Err:
msgbox Error$
Resume Enviar_Exit

End Function

** espero que te sirva..... saludos desde Cuba
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar