Markus: String formatieren...

Hi Leute.

Versende über ein Acces-Formular E-Mails indem ich den "Body" Bereich des Mails(Nachricht) mit der Nachricht vordefiniert habe..

das sieht so aus:

Private Sub Senden_Click()
Dim a As Variant, b As Variant
a = Me![Mail]
b = "Sehr geehrte Damen u Herren" & vbCrLf & "Text Text..."
If IsNull(a) Then
MsgBox "Keine E-Mail Adresse vorhanden!"
Else
DoCmd.SendObject , "", "", a, "", "", "", b, True, """"
End If

Möchte jetzt gern den Text den ich unter "b" eingegeben habe etwas formatieren zb: fett, Schrift größer, od zentriert, od Hyperlink usw...

Wie kann ich das realisieren???

Die Mails werden mit Outlook-Express versendet.

Wer kann mir da helfen?

Wäre über eine Hilfe sehr dankbar!

MFG

Markus

  1. Hallo Markus,

    ich habe zwar keinen Dunst von Access, aber wenn du etwas formatieren möchtest, wäre HTML eine Alternative.

    Genauer gesagt, wenn du dein Mail als HTML-Mail rausgehen lässt, kannst du dieses dann auch mit HTML-Befehlen formatieren.

    fett = <b>Text</b> usw.

    Ich hoffe, dass das eine Alternative für dich ist.

    lg,
    Innuendo

    Hi Leute.

    Versende über ein Acces-Formular E-Mails indem ich den "Body" Bereich des Mails(Nachricht) mit der Nachricht vordefiniert habe..

    das sieht so aus:

    Private Sub Senden_Click()
    Dim a As Variant, b As Variant
    a = Me![Mail]
    b = "Sehr geehrte Damen u Herren" & vbCrLf & "Text Text..."
    If IsNull(a) Then
    MsgBox "Keine E-Mail Adresse vorhanden!"
    Else
    DoCmd.SendObject , "", "", a, "", "", "", b, True, """"
    End If

    Möchte jetzt gern den Text den ich unter "b" eingegeben habe etwas formatieren zb: fett, Schrift größer, od zentriert, od Hyperlink usw...

    Wie kann ich das realisieren???

    Die Mails werden mit Outlook-Express versendet.

    Wer kann mir da helfen?

    Wäre über eine Hilfe sehr dankbar!

    MFG

    Markus

    1. Hi Innuendo..

      Danke für deine schnelle Antwort..

      fett = <b>Text</b> usw.

      Hab das auch schon probiert...

      b = "Sehr geehrte Damen u Herren" & vbCrLf

      Aber wenn ich das so mache:

      b= "Sehr geehrte <b>Damen u Herren</b>"..

      wird das 1 zu 1 im Mailtext übergeben....

      Vl muß ich das irgendwie anders einbauen...

      Wer kann mir da helfen?

      Danke

      MFG

      Markus