|
 
 
  | Wäre auch dankbar für Tipps zum Email mit Anhang.  
Das habe ich und das funktioniert:  
  
Private Sub EMAIL_Click()  
  
DoCmd.SendObject , , acFormatHTML, "an", "cc", , "betreff:", _  
                     "email text!  " & Chr$(13) & Chr$(13) & _  
                     Chr$(13) & Chr$(13) & _  
                     "email text:  " & Chr$(13) & Chr$(13) & _  
                     Chr$(13) & Chr$(13) & _  
                     "formularfeld:" & " " & Me.formularinhalt & Chr$(13) & Chr$(13) & _  
                     "formularfeld2:" & " " & Me.formularinhalt2 & Chr$(13) & Chr$(13) & _  
                     "formularfeld3:" & " " & Me.formularinhalt3 & Chr$(13) & Chr$(13) & _  
                     "formularfeld4:" & " " & Me.formularinhalt4 & Chr$(13) & Chr$(13) & _  
                     "formularfeld5:" & " " & Me.formularinhalt5 & Chr$(13) & Chr$(13) & _  
Chr$(13) & Chr$(13) & _  
                     "emailtext!  " & Chr$(13) & Chr$(13) & _  
                     Chr$(13) & Chr$(13) & _  
                     "Freundliche Grüsse" & " " & Me.Name & Chr$(13) & Chr$(13) & _  
Err_EMAIL_Click:  
Exit Sub  
  
End Sub  
  
Wie bringe ich es noch hin, dass ich den Anhang - welchen ich im Formular hinzufügen konnte, auch noch in die Mail kriege? |  |
 
  |