E-Mail Formatierung

[Raphael Dumont]

Hallo!

Ich habe fogende Situation. Ich möchte automatisch eine Bestätigungsemail verschicken lassen. Der Versand an sich funktioniert auch wunderbar. Allerdings bekomme ich die Formatierung nicht richtig hin.

Ich habe bisher nur Erfahrung bei HTML E-Mail Versand. Aber diese Mal muss ich auf normale Text-Mails zurückgreifen.

Wenn ich die E-Mail versenden lasse, werden nach ein paar Wörtern schon Zeilenbrüche ausgeführt, die ich nicht veranlasst habe. Außerdem sendet er keine Ös, Äs, Üs. Diese Buchstaben werden in Html Code umgewandelt verschickt.

hier mein verwendeter Code:

strBody = "Hallo "&strName&vbCrLf&vbCrLf 'Hier wird ein Absatz eingefügt.
strBody = strBody & "Text bla bla blubb"
        body = strBody
        header = "Ihre Bestellung bei Ascaron am "&Date()&" um "&Time

ok = SendEmail(strEMail, sender, header, body)

function SendEmail(absender, empfaenger, ueberschrift, nachricht)
        ' SMTP-Server:
        set objMail = Server.CreateObject("CDONTS.Newmail")
        ' integrierte Fehlerbehandlung abschalten:
        on error resume next
        ' Mail senden:
        objMail.send absender, "[e-mail]", header, body
        ' Fehler auswerten:
        if err.number<>0 then
                SendEmail = false
        else
                SendEmail = true
        end if
        ' Objekt wieder freigeben:
        set objMail = Nothing
end function

kennt sich jemand damit aus?

greetings
raphael

[wurmi]

hi raphael!

vielleicht hilft die Angabe von:

Const cstCdoBodyFormatHTML = 0
Const cstCdoBodyFormatText  = 1

objNewMail.MailFormat = cstCdoMailFormatText
objNewMail.BodyFormat = cstCdoBodyFormatText

http://www.aspheute.com/artikel/20000515.htm

ciao,
wurmi

(ps.: wann kommt anstoss4? ;))

[Raphael Dumont]

hi wurmi!

danke für die hilfe...

funktioniert jetzt alles so wie ich es haben wollte.

liebe grüße
raphael

ps.: über a4 darf ich kein statement abgeben :-)