PDA

Vollständige Version anzeigen : ASP XP Mail


SNowack
12.12.2002, 19:08
Hallo zusammen,

wer kennt sich mit o.a. Komponente aus ? Versuche ich Mails mit folgender Syntax zu generieren:


Set Mailer = Server.CreateObject("SMTPsvg.Mailer")
Mailer.FromName = "Absender"
Mailer.FromAddress = "info@Absender.de"
Mailer.RemoteHost = "Mail.Server.de"
Mailer.ClearAllRecipients
Mailer.Recipient "SNowack@NTC-Hameln.com" '("AnEMail")
Mailer.Subject = "TestBetreff" '("Betreff")
Mailer.ClearBodyText
Mailer.BodyText = "Mein Text"

If Mailer.******** Then
******** = True
m_errortext = "Die eMail wurde erfolgreich versendet."
Else
******** = False
m_errortext = Mailer.Response
End if

Set Mailer = Nothing

erhalte ich diese Fehlermeldung:

Serverobjekt- Fehler 'ASP 0177 : 800401f3'

Server.CreateObject-Fehler

/kontakt/E_Mail_senden.asp, line 127

Ungültige ProgID Weitere Informationen zu dieser Meldung finden Sie auf der Microsoft-Onlinesupportsite: <a href="http://www.microsoft.com/contentredirect.asp." target="_blank">http://www.microsoft.com/contentredirect.asp.</a>

Laut Aussage des Hosters soll es aber funktionieren. Es scheint also ein Fehler in der Syntax vorzuliegen.

Wer kenn sich damit aus ?

Mit besten Dank im Voraus

SNowack
12.12.2002, 22:14
Alles klar,

nach ein Bischen Probieren und Forschen habe ich es rausbekommen. Für alle die es interessiert:


'---Versand über ASP-XP-Mail ------
Dim oMail
Set oMail = Server.CreateObject("ASPXP.Mail")
oMail.Host = "mail.XYZ.de"
oMail.Subject = "Betreff "
oMail.PlainBody = "Text" oMail.FromName = "vonAlias "
oMail.FromAddress = "vonEMail"
oMail.ToList.Add "AnEMail@Domain.de", "anAlias "

oMail.Send

Set oMail = Nothing
'-------------------------------