Dim Message As New CDO.Message
With Message
.To = "expéditeu"
.Subject = "Envoi Etat"
.TextBody = "Bonne jounnée"
.AddAttachment ("C:\Etat1.htm")
.Send
End With
Set Message = Nothing
Mon problème est comment faire pour l'état réçu au format HTML par courrier
électronique contienne la totalité que lorsque l'état dans Access fait plus
d'une page.
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
3stone
Salut,
"Luis" | Avec CDO j'envoi automatiquement un état la formule est celle-ci: | | DoCmd.OutputTo acOutputReport, "Etat1", acFormatHTML, "C:Etat1.htm" | | Dim Message As New CDO.Message | With Message | .To = "expéditeu" | .Subject = "Envoi Etat" | .TextBody = "Bonne jounnée" | .AddAttachment ("C:Etat1.htm") | .Send | End With | Set Message = Nothing | | Mon problème est comment faire pour l'état réçu au format HTML par courrier | électronique contienne la totalité que lorsque l'état dans Access fait plus | d'une page.
Je ne sais pas si cela te convient, mais tu peux incorporer un état HTML dans le message du mail... http://www.3stone.be/access/articles.php?lng=fr&pg
"Luis"
| Avec CDO j'envoi automatiquement un état la formule est celle-ci:
|
| DoCmd.OutputTo acOutputReport, "Etat1", acFormatHTML, "C:Etat1.htm"
|
| Dim Message As New CDO.Message
| With Message
| .To = "expéditeu"
| .Subject = "Envoi Etat"
| .TextBody = "Bonne jounnée"
| .AddAttachment ("C:Etat1.htm")
| .Send
| End With
| Set Message = Nothing
|
| Mon problème est comment faire pour l'état réçu au format HTML par courrier
| électronique contienne la totalité que lorsque l'état dans Access fait plus
| d'une page.
Je ne sais pas si cela te convient, mais tu peux incorporer un état HTML
dans le message du mail...
http://www.3stone.be/access/articles.php?lng=fr&pg
"Luis" | Avec CDO j'envoi automatiquement un état la formule est celle-ci: | | DoCmd.OutputTo acOutputReport, "Etat1", acFormatHTML, "C:Etat1.htm" | | Dim Message As New CDO.Message | With Message | .To = "expéditeu" | .Subject = "Envoi Etat" | .TextBody = "Bonne jounnée" | .AddAttachment ("C:Etat1.htm") | .Send | End With | Set Message = Nothing | | Mon problème est comment faire pour l'état réçu au format HTML par courrier | électronique contienne la totalité que lorsque l'état dans Access fait plus | d'une page.
Je ne sais pas si cela te convient, mais tu peux incorporer un état HTML dans le message du mail... http://www.3stone.be/access/articles.php?lng=fr&pg
Bonjour, Je te remercie. Mais malgré que la référence "Microsoft CDO for Windows 2000 Library" est cochée j'ai le message 'Attention quelqu'un essai d'envoyer un message...' Et d'autre part le courrier arrive vide. Que faut-il modifier pour que ces deux choses changent? Merci pour tout Luis
Salut,
"Luis" | Avec CDO j'envoi automatiquement un état la formule est celle-ci: | | DoCmd.OutputTo acOutputReport, "Etat1", acFormatHTML, "C:Etat1.htm" | | Dim Message As New CDO.Message | With Message | .To = "expéditeu" | .Subject = "Envoi Etat" | .TextBody = "Bonne jounnée" | .AddAttachment ("C:Etat1.htm") | .Send | End With | Set Message = Nothing | | Mon problème est comment faire pour l'état réçu au format HTML par courrier | électronique contienne la totalité que lorsque l'état dans Access fait plus | d'une page.
Je ne sais pas si cela te convient, mais tu peux incorporer un état HTML dans le message du mail... http://www.3stone.be/access/articles.php?lng=fr&pg
Bonjour,
Je te remercie.
Mais malgré que la référence "Microsoft CDO for Windows 2000 Library" est
cochée j'ai le message 'Attention quelqu'un essai d'envoyer un message...'
Et d'autre part le courrier arrive vide.
Que faut-il modifier pour que ces deux choses changent?
Merci pour tout
Luis
Salut,
"Luis"
| Avec CDO j'envoi automatiquement un état la formule est celle-ci:
|
| DoCmd.OutputTo acOutputReport, "Etat1", acFormatHTML, "C:Etat1.htm"
|
| Dim Message As New CDO.Message
| With Message
| .To = "expéditeu"
| .Subject = "Envoi Etat"
| .TextBody = "Bonne jounnée"
| .AddAttachment ("C:Etat1.htm")
| .Send
| End With
| Set Message = Nothing
|
| Mon problème est comment faire pour l'état réçu au format HTML par courrier
| électronique contienne la totalité que lorsque l'état dans Access fait plus
| d'une page.
Je ne sais pas si cela te convient, mais tu peux incorporer un état HTML
dans le message du mail...
http://www.3stone.be/access/articles.php?lng=fr&pg
Bonjour, Je te remercie. Mais malgré que la référence "Microsoft CDO for Windows 2000 Library" est cochée j'ai le message 'Attention quelqu'un essai d'envoyer un message...' Et d'autre part le courrier arrive vide. Que faut-il modifier pour que ces deux choses changent? Merci pour tout Luis
Salut,
"Luis" | Avec CDO j'envoi automatiquement un état la formule est celle-ci: | | DoCmd.OutputTo acOutputReport, "Etat1", acFormatHTML, "C:Etat1.htm" | | Dim Message As New CDO.Message | With Message | .To = "expéditeu" | .Subject = "Envoi Etat" | .TextBody = "Bonne jounnée" | .AddAttachment ("C:Etat1.htm") | .Send | End With | Set Message = Nothing | | Mon problème est comment faire pour l'état réçu au format HTML par courrier | électronique contienne la totalité que lorsque l'état dans Access fait plus | d'une page.
Je ne sais pas si cela te convient, mais tu peux incorporer un état HTML dans le message du mail... http://www.3stone.be/access/articles.php?lng=fr&pg
"Luis" | Mais malgré que la référence "Microsoft CDO for Windows 2000 Library" est | cochée j'ai le message 'Attention quelqu'un essai d'envoyer un message...'
La fonction indiquée utilise Outlook et non CDO ! ce qui est clairement indiqué...
Pour CDO, je prépare cela ASAP
| | Et d'autre part le courrier arrive vide. |
Un backslash "" s'était fait bouffer dans la ligne :
LeFichier = CurDir & "" & NomEtat & ".htm"
Corrige cela ou récupère la version en ligne que j'ai corrigée.
"Luis"
| Mais malgré que la référence "Microsoft CDO for Windows 2000 Library" est
| cochée j'ai le message 'Attention quelqu'un essai d'envoyer un message...'
La fonction indiquée utilise Outlook et non CDO !
ce qui est clairement indiqué...
Pour CDO, je prépare cela ASAP
|
| Et d'autre part le courrier arrive vide.
|
Un backslash "" s'était fait bouffer dans la ligne :
LeFichier = CurDir & "" & NomEtat & ".htm"
Corrige cela ou récupère la version en ligne que j'ai corrigée.
"Luis" | Mais malgré que la référence "Microsoft CDO for Windows 2000 Library" est | cochée j'ai le message 'Attention quelqu'un essai d'envoyer un message...'
La fonction indiquée utilise Outlook et non CDO ! ce qui est clairement indiqué...
Pour CDO, je prépare cela ASAP
| | Et d'autre part le courrier arrive vide. |
Un backslash "" s'était fait bouffer dans la ligne :
LeFichier = CurDir & "" & NomEtat & ".htm"
Corrige cela ou récupère la version en ligne que j'ai corrigée.
Super, C'est top en attendant la version CDO. Merci pour tout. Luis
Salut,
"Luis" | Mais malgré que la référence "Microsoft CDO for Windows 2000 Library" est | cochée j'ai le message 'Attention quelqu'un essai d'envoyer un message...'
La fonction indiquée utilise Outlook et non CDO ! ce qui est clairement indiqué...
Pour CDO, je prépare cela ASAP
| | Et d'autre part le courrier arrive vide. |
Un backslash "" s'était fait bouffer dans la ligne :
LeFichier = CurDir & "" & NomEtat & ".htm"
Corrige cela ou récupère la version en ligne que j'ai corrigée.
Super,
C'est top en attendant la version CDO.
Merci pour tout.
Luis
Salut,
"Luis"
| Mais malgré que la référence "Microsoft CDO for Windows 2000 Library" est
| cochée j'ai le message 'Attention quelqu'un essai d'envoyer un message...'
La fonction indiquée utilise Outlook et non CDO !
ce qui est clairement indiqué...
Pour CDO, je prépare cela ASAP
|
| Et d'autre part le courrier arrive vide.
|
Un backslash "" s'était fait bouffer dans la ligne :
LeFichier = CurDir & "" & NomEtat & ".htm"
Corrige cela ou récupère la version en ligne que j'ai corrigée.
Super, C'est top en attendant la version CDO. Merci pour tout. Luis
Salut,
"Luis" | Mais malgré que la référence "Microsoft CDO for Windows 2000 Library" est | cochée j'ai le message 'Attention quelqu'un essai d'envoyer un message...'
La fonction indiquée utilise Outlook et non CDO ! ce qui est clairement indiqué...
Pour CDO, je prépare cela ASAP
| | Et d'autre part le courrier arrive vide. |
Un backslash "" s'était fait bouffer dans la ligne :
LeFichier = CurDir & "" & NomEtat & ".htm"
Corrige cela ou récupère la version en ligne que j'ai corrigée.