Addhandler für SMTPSocket in einem Module?

International Deutsch
1

Ich möchte das Senden einer E-Mail in einem Module verpacken, so dass im Code nur SendMail(Empfaenger, Betreff, Mitteilung) steht.
Das ohne ein Window mit SMTPSocket.

Die Events wollte ich, wie mit Timern üblich, mit Addhandler umlenken. Leider klappt das nicht.

[code]MyTimer = new Timer

AddHandler MyTimer.Action, AddressOf TimerAction

MailSocket = New SMTPSocket

AddHandler MailSocket.Error, AddressOf SMTP_Error
[/code]

MyTimer und MailSocket sind als Properties im Module definiert.
TimerAction und SMTP_Error als Methoden im Module.

Beim Kompilieren kommt für den MailSocket Addhandler immer <<Type mismatch error, Expected delegate Delegate( SMTPSocket ), but got delegate Delegate ( )>>

Ich werde daraus nicht schlau. Die Suche im Forum ergab Subclassing, aber damit komme ich auch nicht weiter.

Wo liegt mein Denkfehler?

Danke im Voraus für Eure Hilfe.

2

This error message means that the SMTP_Message is defined incorrectly. It should look like this:

Sub SMTP_Message(Sender As SMTPSocket)
3

Thanks Andrew!

Sometimes it’s so simple :slight_smile: