Fra CDONTS.NewMail til CDO.Message
Hej jeg har et lille problem...Jeg brugte før som sender:
Dim myMail
Set myMail = CreateObject("CDONTS.NewMail")
myMail.From = "email@server.dk"
myMail.To = "email@server.dk"
Mymail.Subject = "message"
myMail.BodyFormat = 1
myMail.MailFormat = 0
MyMail.body = Tekst
myMail.Send
Set myMail = Nothing
Nu har jegfået at vide jeg skal bruge
objMessage = CreateObject("CDO.Message")
objMessage.Subject = Request.Form("subject")
objMessage.Sender = Request.Form("From")
objMessage.To = Request.Form("To")
objMessage.TextBody = Request.Form("message")
objMessage.Send
Men sender og to laver fejl når jeg bruger resuest.form, klart nok, da de jo skal være faste.
Når jeg så skriver
objMessage.Sender = "email@server.dk"
objMessage.To = "email@server.dk"
Sker der intet, nogen der kan hjælpe mig med hvad jeg skal gøre for at få lortet til at virke?
