Hallo Legolas41,
Habe ein Problem mit folgendem Script:
Dim myMail
Set myMail = CreateObject("CDONTS.NewMail")
HTML = "<!DOCTYPE HTML PUBLIC ""-//IETF//DTD HTML//EN"">" & NL
HTML = HTML & "<html>"
HTML = HTML & "<body>"
HTML = HTML & "<p>e-mail mit anhang!</p>"
HTML = HTML & "</body>"
HTML = HTML & "</html>"
myMail.AttachFile "c:\test.txt", "test.txt", 1
myMail.From = "test@test.de"
myMail.To = "test@test.de"
myMail.Subject = "Beispiel"
myMail.BodyFormat = 0
myMail.MailFormat = 0
myMail.Body = HTML
myMail.Send
Ich habe dein Skript ausprobiert bei mir funktioniert es einwandfrei.
Ich bekomme folgende Fehlermeldung:
Kompilierungsfehler in Microsoft VBScript- Fehler '800a03ea'
Syntaxfehler
/iisHelp/common/500-100.asp, line 160
elseIf (objASPError.Description > "") Then
^
Fehler '80004005'
Unbekannter Fehler
/homepage/deutsch/service/datei.asp, line 21
Line 21 ist diese hier:
myMail.AttachFile "c:\test.txt", "test.txt", 1
Diese Fehlermeldung habe ich bekommen, wenn die Datei C:\text.txt nicht existiert. Vielleicht existiert sie ja bei dir nicht oder in einem anderen Verzeichnis?
Ich versteh das nicht. Die Syntax stimmt doch? Und die Datei ist auch vorhanden.
Die Syntax ist meines Erachtens ok.
Grüße
Stefan