Supportnet / Forum / Datenbanken

hi habe ein textfeld, in dem in textform eine mailadresse steht. (das feld steht nicht auf hyperlink auch nicht in der tabelle. das soll nach möglichkeit auch so bleiben). ich möchte, dass, wenn man auf das textfeld klickt, das übliche passiert. outlook geht auf und die mailadresse steht in der adressleiste einer neuen email. habe versucht, dass mit einem Klick-Ereignis zu koppeln: Private Sub txt_email_Click() txt_email = "mailto:" & txt_email Application.FollowHyperlink Me.txt_email End Sub Dummerweise meckert er rum. Was ist falsch? wie gesagt, ich möchte den text des feldes txt_email als adresse für die mail verwenden. gruß und danke

Versuch´s doch mal so:

Dim xbetreff As String
Dim xtext As String
Dim xan As String
xbetreff = "timetable from " & Date
xtext = "give your attention for the new timetable"
xan = DLookup("ArztMail", "Daten")
On Error Resume Next
DoCmd.SendObject acSendReport, "repBehandlungen", acFormatRTF, _
xan, , , xbetreff, xtext, True
On Error GoTo 0

Gruß
Teddy

• Fehler beim versenden von E-Mails mit Incredimail!!
• fotos/ Filme per E- Mail versenden
• klich auf textfeld E-Mail verschicken