enviar pdf adjunto por correo electrónico pero renombrado
Publicado por Javier (71 intervenciones) el 31/05/2017 17:14:22
Muy buenas foreros mediante el siguiente código que os pongo puedo enviar un e-mail adjuntando uno de mis informes de la base de datos en formato PDF os pongo a continuación el código:
el pdf se envía correctamente, pero claro al cliente le llega como fichero pdf adjunto el nombre del informe en este caso el pdf se llama "PAGO NOVIEMBRE 2", mi duda viene en que tengo que hacer para renombrar este archivo para que le aparezca otra cosa por ejemplo llamar al fichero "mes noviembre"
saludos
1
2
3
4
5
6
7
8
9
Dim nombreInforme As String
Dim destinatario As String
Dim asunto As String
Dim cuerpo As String
nombreInforme = "PAGO NOVIEMBRE 2"
destinatario = Me.CORREO_ELECTRÓNICO.Value
asunto = "RECIBO DE PAGO DEL MES DE NOVIEMBRE DE " & Me.NOMBRE_Y_APELLIDOS
cuerpo = "Le adjuntamos el recibo de pago del mes de noviembre, vea el PDF adjunto. Gracias"
DoCmd.SendObject acSendReport, nombreInforme, "PDF", destinatario, , , asunto, cuerpo, False
el pdf se envía correctamente, pero claro al cliente le llega como fichero pdf adjunto el nombre del informe en este caso el pdf se llama "PAGO NOVIEMBRE 2", mi duda viene en que tengo que hacer para renombrar este archivo para que le aparezca otra cosa por ejemplo llamar al fichero "mes noviembre"
saludos
Valora esta pregunta
0