C#, WPF, vb.Net, vba, SQL Server, Access Programmierer, Excel, ASP Core MVC Webforms Telefon: 07022/9319004 freib. Software Entwickler   Kontakt
#

Download:

Datei 1: Email_Send4_COM_Control.zip

 

 

ActiveX COM Control in Net-Framework 4 für Office Anwendungen

Mit der Email_Send4 Komponente kann man Emails direkt aus Microsoft Access, Word oder Excel heraus automatisiert senden, ohne dass man eine Bestätigung von Outlook drücken müsste.

 

Hier ein Beispiel in MS Acess 2016

 

Verweise auf .tlb

Die Email_Send komponente muss in vba (Alt-F11) unter Menü->Extras->Verweise mit Durchsuchen auf den lokalen Pfad der Datei Email_Send4.tlb eingebunden werden

 

 

 

Download, Benötigte Dateien

Für die Email_Send Komponente benötigt man die Datei Email_Send4.dll. Diese kann man hier herunterladen und auf einem lokalen Pfad speichern.

Zudem befinden sich im Download die register bat und unregister.bat Dateien zum Anmelden als ActiveX Control im Computer, damit die Komponente auch in Access und Excel gesehen werden kann.

 

 

Makro Code

Hier folgt als Beispiel der vba Makro Code, mit welchem das Email Senden in Microsoft Access ausgeführt wird.

Die Funktion funktioniert auch in MS Excel, Word und Powerpoint

Option Compare Database

Option Explicit On

 

Private Sub btnSend_Click()

    '---------------< btnSend_Click() >----------------

    fx_Email_Senden()

    '---------------</ btnSend_Click() >----------------

End Sub

 

 

Private Sub fx_Email_Senden()

    '-------------< fx_Email_Senden() >-------------

    '--< Email einstellen >--

    Dim objEmail As Email_Send4.Email_Send4

    Set objEmail = New Email_Send4.Email_Send4

   

    Dim sAddress_TO As String, sSubject As String, sText As String

    Dim sAddress_FROM As String, sPassword As String, SMTP_Address As String, sPort As String, Enable_SSL As Boolean

    sAddress_FROM = tbxEmail_From

    sPassword = tbxPassword

    SMTP_Address = tbxDomain

 

    sAddress_TO = tbxEmail_To

    Enable_SSL = True

    sPort = tbxPort

    sSubject = tbx_Subject

    sText = tbxText

 

    '< SEND >

    '*send with Email_Send4.dll Control

    objEmail.Send_Email sAddress_TO, "", sAddress_FROM, sPassword, SMTP_Address, sPort, Enable_SSL, sSubject, sText

    '</ SEND >

   

    '--< Email einstellen >--

   

    '< Abschluss >

    Set objEmail = Nothing

    '</ Abschluss >

   

    MsgBox "send"

    '----</ mit Outlook senden >----

    '-------------</ fx_Email_Senden() >-------------

End Sub

 

 

 

Komponente registrieren.

Email_Send4.dll

Damit die Email_Send4.dll als ActiveX COM Control in Microsoft Office erkannt wird, muss man die Datei Register.bat als Administrator ausführe.

 

Register.bat anpassen

In der Register.bat wird die .NET Registrierung mit regasm.exe ausgeführt. Man muss den folgenden Pfad anpassen wo die aktuelle Komponente installiert werden soll.

 

C:\Windows\Microsoft.NET\Framework\v4.0.30319\regasm.exe "C:\_Daten\Desktop\Demo\Access\2017-10-27 Email_Send4\Email_Send4.dll" /tlb /codebase

pause

 

 

Unregister.bat

Zum Deinstallieren muss man ebenfalls die Unregister.bat als Administrator ausführen.

Auch hier muss der Dateipfad zur aktuellen Email_Send4.dll angepasst werden

C:\Windows\Microsoft.NET\Framework\v4.0.30319\regasm.exe /u "C:\_Daten\Desktop\Demo\Access\2017-10-27 Email_Send4\Email_Send4.dll"

pause

 

Mobile
»
ActiveX COM Control: Email Client für Office Anwendungen
»
Projektvorlage für ein ActiveX Control
»
Email Send Control für Office Anwendungen
»
COM: Run-time error 2147024894 80070002 automation error The system can not find the specified file
»
COM Fehler: DllRegisterServer-Einstiegspunkt Fehlermeldung beim Registrieren einer ActiveX COM DLL
»
Vorlage Code: Eigenes ActiveX Control erstellen in Visual Studio 2017 und Office 2016 365
»
Winform, WPF: Einen Mail Client als SendMail Client in Net erstellen
»
Office Studio: Erstellen von eigenen COM Controls für MS Office Anwendungen
»
Fehler: The assembly could not be converted to a type library. Type library exporter encountered an error while processing

.

Jobs, Projekte, Angebote für Freiberufler, Selbstständig an Raimund.Popp@Microsoft-Programmierer.de