Pilote Outlook à partir d'une application Winform en VB.NET
4 réponses
F.Vandenbriele
Bonjour,
j'arrive effectivement à envoyer des e-mails via Outlook depuis mon
application mais le problème est que Outlook m'affiche systématiquement une
boîte de dialogue indiquant d'une application essaie d'envoyer un message et
qu'il s'agit peut-être d'un virus. Si on répond oui à la boite de dialogue le
message est bien intégré et prêt à être envoyé.
Si quelqu'un sait comment enlever cette boîte de dialogue
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
MyriamB
Ca peut peut etre vous aider : Dim email As New Mail.MailMessage() Dim pj As New Mail.MailAttachment(Chemin_Dossier_Lettre() & "Reponse_Allo_Mairie_" & tableau(0, 5) & ".doc") email.To = email_Secretariat() email.From = "Technicien_Allo_Mairie" email.Body = "Le Technicien vient de cloturer une intervention. Vous trouverez ci-joint la lettre qui doit etre envoyée au contribuable qui avait fait la demande d'intervention. " & _ Chr(10) & "Avant l'impression et l'envoi vérifier le contenu de la lettre" & _ Chr(10) & Chr(10) & Chr(10) & "Ce message est envoyé par un robot, ne pas repondre à ce message !"
email.Subject = "Allô Mairie : Lettre de cloture d'intervention" email.Attachments.Add(pj) Mail.SmtpMail.SmtpServer = IP_Serveur_Message() Mail.SmtpMail.Send(email) End Sub
"F.Vandenbriele" a écrit :
Bonjour,
j'arrive effectivement à envoyer des e-mails via Outlook depuis mon application mais le problème est que Outlook m'affiche systématiquement une boîte de dialogue indiquant d'une application essaie d'envoyer un message et qu'il s'agit peut-être d'un virus. Si on répond oui à la boite de dialogue le message est bien intégré et prêt à être envoyé.
Si quelqu'un sait comment enlever cette boîte de dialogue
Merci d'avance
Ca peut peut etre vous aider :
Dim email As New Mail.MailMessage()
Dim pj As New Mail.MailAttachment(Chemin_Dossier_Lettre() &
"Reponse_Allo_Mairie_" & tableau(0, 5) & ".doc")
email.To = email_Secretariat()
email.From = "Technicien_Allo_Mairie"
email.Body = "Le Technicien vient de cloturer une
intervention. Vous trouverez ci-joint la lettre qui doit etre envoyée au
contribuable qui avait fait la demande d'intervention. " & _
Chr(10) & "Avant l'impression et l'envoi vérifier le contenu
de la lettre" & _
Chr(10) & Chr(10) & Chr(10) & "Ce message est envoyé par un
robot, ne pas repondre à ce message !"
email.Subject = "Allô Mairie : Lettre de cloture d'intervention"
email.Attachments.Add(pj)
Mail.SmtpMail.SmtpServer = IP_Serveur_Message()
Mail.SmtpMail.Send(email)
End Sub
"F.Vandenbriele" a écrit :
Bonjour,
j'arrive effectivement à envoyer des e-mails via Outlook depuis mon
application mais le problème est que Outlook m'affiche systématiquement une
boîte de dialogue indiquant d'une application essaie d'envoyer un message et
qu'il s'agit peut-être d'un virus. Si on répond oui à la boite de dialogue le
message est bien intégré et prêt à être envoyé.
Si quelqu'un sait comment enlever cette boîte de dialogue
Ca peut peut etre vous aider : Dim email As New Mail.MailMessage() Dim pj As New Mail.MailAttachment(Chemin_Dossier_Lettre() & "Reponse_Allo_Mairie_" & tableau(0, 5) & ".doc") email.To = email_Secretariat() email.From = "Technicien_Allo_Mairie" email.Body = "Le Technicien vient de cloturer une intervention. Vous trouverez ci-joint la lettre qui doit etre envoyée au contribuable qui avait fait la demande d'intervention. " & _ Chr(10) & "Avant l'impression et l'envoi vérifier le contenu de la lettre" & _ Chr(10) & Chr(10) & Chr(10) & "Ce message est envoyé par un robot, ne pas repondre à ce message !"
email.Subject = "Allô Mairie : Lettre de cloture d'intervention" email.Attachments.Add(pj) Mail.SmtpMail.SmtpServer = IP_Serveur_Message() Mail.SmtpMail.Send(email) End Sub
"F.Vandenbriele" a écrit :
Bonjour,
j'arrive effectivement à envoyer des e-mails via Outlook depuis mon application mais le problème est que Outlook m'affiche systématiquement une boîte de dialogue indiquant d'une application essaie d'envoyer un message et qu'il s'agit peut-être d'un virus. Si on répond oui à la boite de dialogue le message est bien intégré et prêt à être envoyé.
Si quelqu'un sait comment enlever cette boîte de dialogue
Merci d'avance
F.Vandenbriele
Merci pour votre réponse
Effectivement je vais m'orienter vers cette solution. Le seul inconvénient est qu'il n'y a pas de trace du mail dans Outlook, je vais mettre l'expéditeur en copie.
Je suis très intéressé par l'exemple que vous avez fourni car il me semble de l'on travaille dans le même domaine (enfin je pense) car je travaille avec des sociétés HLM et notamment sur leurs rapports avec les fournisseurs.
Nous avons réalisé une application extranet fournisseur pour un Opac et je termine actuellement le développement d'une solution de gestion d'intervention pour un fournisseur.
Vous travaillez dans quel secteur d'activité ?
Merci pour votre réponse
Effectivement je vais m'orienter vers cette solution. Le seul inconvénient
est qu'il n'y a pas de trace du mail dans Outlook, je vais mettre
l'expéditeur en copie.
Je suis très intéressé par l'exemple que vous avez fourni car il me semble
de l'on travaille dans le même domaine (enfin je pense) car je travaille avec
des sociétés HLM et notamment sur leurs rapports avec les fournisseurs.
Nous avons réalisé une application extranet fournisseur pour un Opac et je
termine actuellement le développement d'une solution de gestion
d'intervention pour un fournisseur.
Effectivement je vais m'orienter vers cette solution. Le seul inconvénient est qu'il n'y a pas de trace du mail dans Outlook, je vais mettre l'expéditeur en copie.
Je suis très intéressé par l'exemple que vous avez fourni car il me semble de l'on travaille dans le même domaine (enfin je pense) car je travaille avec des sociétés HLM et notamment sur leurs rapports avec les fournisseurs.
Nous avons réalisé une application extranet fournisseur pour un Opac et je termine actuellement le développement d'une solution de gestion d'intervention pour un fournisseur.
Vous travaillez dans quel secteur d'activité ?
Isabelle Prawitz
Bonjour ! Le message est normal ! Maintenant, SI Outlook fonctionne DÉJÀ quand l'appli pose la question, il y a moyen de ne pas avoir ce message : Au lieu d'utiliser CreateObject("Outlook.Application"), utilise GetObject(,"Outlook.Application") Puis fais attention à l'ordre de tes déclarations :
Dim appO as Outlook.Application set appO= GetObject(,"Outlook.Application") Dim monMess as Outlook.MailItem etc...
A+ Isa
"F.Vandenbriele" a écrit dans le message de news:
Bonjour,
j'arrive effectivement à envoyer des e-mails via Outlook depuis mon application mais le problème est que Outlook m'affiche systématiquement une boîte de dialogue indiquant d'une application essaie d'envoyer un message et qu'il s'agit peut-être d'un virus. Si on répond oui à la boite de dialogue le message est bien intégré et prêt à être envoyé.
Si quelqu'un sait comment enlever cette boîte de dialogue
Merci d'avance
Bonjour !
Le message est normal !
Maintenant, SI Outlook fonctionne DÉJÀ quand l'appli pose la question, il y a moyen de ne pas avoir ce message :
Au lieu d'utiliser CreateObject("Outlook.Application"), utilise GetObject(,"Outlook.Application")
Puis fais attention à l'ordre de tes déclarations :
Dim appO as Outlook.Application
set appO= GetObject(,"Outlook.Application")
Dim monMess as Outlook.MailItem
etc...
A+
Isa
"F.Vandenbriele" <FVandenbriele@discussions.microsoft.com> a écrit dans le message de
news:AD4732D3-336B-4FFE-8D67-F352F1129FD8@microsoft.com...
Bonjour,
j'arrive effectivement à envoyer des e-mails via Outlook depuis mon
application mais le problème est que Outlook m'affiche systématiquement une
boîte de dialogue indiquant d'une application essaie d'envoyer un message et
qu'il s'agit peut-être d'un virus. Si on répond oui à la boite de dialogue le
message est bien intégré et prêt à être envoyé.
Si quelqu'un sait comment enlever cette boîte de dialogue
Bonjour ! Le message est normal ! Maintenant, SI Outlook fonctionne DÉJÀ quand l'appli pose la question, il y a moyen de ne pas avoir ce message : Au lieu d'utiliser CreateObject("Outlook.Application"), utilise GetObject(,"Outlook.Application") Puis fais attention à l'ordre de tes déclarations :
Dim appO as Outlook.Application set appO= GetObject(,"Outlook.Application") Dim monMess as Outlook.MailItem etc...
A+ Isa
"F.Vandenbriele" a écrit dans le message de news:
Bonjour,
j'arrive effectivement à envoyer des e-mails via Outlook depuis mon application mais le problème est que Outlook m'affiche systématiquement une boîte de dialogue indiquant d'une application essaie d'envoyer un message et qu'il s'agit peut-être d'un virus. Si on répond oui à la boite de dialogue le message est bien intégré et prêt à être envoyé.
Si quelqu'un sait comment enlever cette boîte de dialogue
Merci d'avance
MyriamB
Bonsoir, je travaille pour une mairie, ce code conserne une application intranet de gestion d'intervention suite a une demande telephonique d'un contribuable. Entre autre il permet suite a la cloture de la demande de générer la lettre de cloture et de la transmettre au secretariat chargé de l'edition et de l'envoie
Bonne soirée
"F.Vandenbriele" a écrit :
Merci pour votre réponse
Effectivement je vais m'orienter vers cette solution. Le seul inconvénient est qu'il n'y a pas de trace du mail dans Outlook, je vais mettre l'expéditeur en copie.
Je suis très intéressé par l'exemple que vous avez fourni car il me semble de l'on travaille dans le même domaine (enfin je pense) car je travaille avec des sociétés HLM et notamment sur leurs rapports avec les fournisseurs.
Nous avons réalisé une application extranet fournisseur pour un Opac et je termine actuellement le développement d'une solution de gestion d'intervention pour un fournisseur.
Vous travaillez dans quel secteur d'activité ?
Bonsoir,
je travaille pour une mairie,
ce code conserne une application intranet de gestion d'intervention suite a
une demande telephonique d'un contribuable. Entre autre il permet suite a la
cloture de la demande de générer la lettre de cloture et de la transmettre au
secretariat chargé de l'edition et de l'envoie
Bonne soirée
"F.Vandenbriele" a écrit :
Merci pour votre réponse
Effectivement je vais m'orienter vers cette solution. Le seul inconvénient
est qu'il n'y a pas de trace du mail dans Outlook, je vais mettre
l'expéditeur en copie.
Je suis très intéressé par l'exemple que vous avez fourni car il me semble
de l'on travaille dans le même domaine (enfin je pense) car je travaille avec
des sociétés HLM et notamment sur leurs rapports avec les fournisseurs.
Nous avons réalisé une application extranet fournisseur pour un Opac et je
termine actuellement le développement d'une solution de gestion
d'intervention pour un fournisseur.
Bonsoir, je travaille pour une mairie, ce code conserne une application intranet de gestion d'intervention suite a une demande telephonique d'un contribuable. Entre autre il permet suite a la cloture de la demande de générer la lettre de cloture et de la transmettre au secretariat chargé de l'edition et de l'envoie
Bonne soirée
"F.Vandenbriele" a écrit :
Merci pour votre réponse
Effectivement je vais m'orienter vers cette solution. Le seul inconvénient est qu'il n'y a pas de trace du mail dans Outlook, je vais mettre l'expéditeur en copie.
Je suis très intéressé par l'exemple que vous avez fourni car il me semble de l'on travaille dans le même domaine (enfin je pense) car je travaille avec des sociétés HLM et notamment sur leurs rapports avec les fournisseurs.
Nous avons réalisé une application extranet fournisseur pour un Opac et je termine actuellement le développement d'une solution de gestion d'intervention pour un fournisseur.
