Avatar billede mcfly.asp Nybegynder
03. marts 2002 - 15:36 Der er 6 kommentarer og
2 løsninger

cdonts mail

Hvordan kan det være at jeg ikke kan få afsendt en mail med følgende kode(eks.øverst). Der kommer ingen fejl, men jeg modtager ikke mailen. Og at jeg med koden nedenunder godt kan afsende og modtage.

Eneste forskel er:  BodyFormat = CdoBodyFormatHTML

Hvordan skal jeg skrive det hvis jeg vil have det i HTML format men samtidig gerne vil have variablerne med i mailen.

Jeg har prøvet at lægge variablerne over forinden eks:
name=Request.QueryString("name"), men det er vist ikke det der er problemet.

<%
dim objMail
dim HTML

Set objMail = CreateObject("CDONTS.Newmail")
objMail.Mailformat = cdoMailFormatMIME
objMail.BodyFormat = CdoBodyFormatHTML
objMail.Importance = 1
objMail.From = "fra@fra.dk"
objMail.To = "modtager@modtager.dk"
objMail.Subject = "subject"
HTML = HTML & "<html>"
HTML = HTML & "<body>"
HTML = HTML & "New entry" & vbCrLf
HTML = HTML & "Name: " & Request.QueryString("Firstname") & "<br>" & vbCrLf
HTML = HTML & "Address: " & Request.QueryString("Address") & "<br>" & vbCrLf
HTML = HTML & "Zipcode: " & Request.QueryString("Zipcode") & "<br>" & vbCrLf
HTML = HTML & "</body>"
HTML = HTML & "</html>"

objMail.Body = HTML
objMail.Send
Set objMail = Nothing
%>
**********************
Men jeg kan sende en mail med følgende kode
<%
Set objMail = CreateObject("CDONTS.Newmail")
objMail.Mailformat = cdoMailFormatMIME
objMail.From = "fra@fra.dk"
objMail.To = "modtager@modtager.dk"
objMail.Subject = "information"
objMail.Body = "subject" &vbCrlF & "with these information: " & vbCrlF & vbCrLf & vbCrLf & "Firstname: " & Request.QueryString("Firstname") & vbCrLf & "Lastname: " & Request.QueryString("Lastname") & vbCrLf & "Address: " & Request.QueryString("Address") & vbCrlf & "ZipCode: " & Request.QueryString("Zipcode") & vbCrLf & "City: " & Request.QueryString("city") & vbCrLf & "State: " & Request.QueryString("State") & vbCrLf & "Country: " & Request.QueryString("country") & vbCrLf & "Email: " & Request.QueryString("email") & vbCrLf & vbCrLf & "Comments: " & Request.QueryString("comments")
objMail.Send
Set objMail = Nothing
%>
Avatar billede rune_c Nybegynder
03. marts 2002 - 16:46 #1
Prøv med:

<%
dim objMail
dim HTML

Set objMail = CreateObject("CDONTS.Newmail")
objMail.Mailformat = 0
objMail.BodyFormat = 0
objMail.Importance = 1
objMail.From = "fra@fra.dk"
objMail.To = "modtager@modtager.dk"
objMail.Subject = "subject"
HTML = HTML & "<html>"
HTML = HTML & "<body>"
HTML = HTML & "New entry" & vbCrLf
HTML = HTML & "Name: " & Request.QueryString("Firstname") & "<br>" & vbCrLf
HTML = HTML & "Address: " & Request.QueryString("Address") & "<br>" & vbCrLf
HTML = HTML & "Zipcode: " & Request.QueryString("Zipcode") & "<br>" & vbCrLf
HTML = HTML & "</body>"
HTML = HTML & "</html>"

objMail.Body = HTML
objMail.Send
Set objMail = Nothing
%>
Avatar billede rune_c Nybegynder
03. marts 2002 - 16:48 #2
Avatar billede mcfly.asp Nybegynder
03. marts 2002 - 16:57 #3
jeg får ingen mail retur :-(
Avatar billede mcfly.asp Nybegynder
03. marts 2002 - 17:06 #4
Jeg har lige forsøgt med en response.write(HTML) og den giver mig godt nok indholdet af mailen. Jeg begynder at tro, problemet ligger i opsætningen af serveren...men ved det ikke.
Avatar billede rune_c Nybegynder
03. marts 2002 - 21:41 #5
har du ikke mulighed for JMail eller et eller andet bedre komponent
Avatar billede mcfly.asp Nybegynder
03. marts 2002 - 22:04 #6
Hmm...bare jeg havde. Problemet er at jeg ikke rigtigt ved hvad der ligger på den server som jeg skal arbejde på og det eneste som jeg er blevet oplyst er at det skal være cdonts for det understøtter de.
(Hvis jeg skal spørge om noget koster det penge siger de...Desværre er det ikke min beslutning at sitet skulle ligge hvor det ligger)

Men når jeg oploader og prøver får jeg flg. fejl: (iøvrigt med kode eks. nr 2)

Microsoft VBScript runtime error '800a0046'
Permission denied
/biblo/Write.asp, line 77

som lige netop er objMail.Send linien.

Kode eks. nr 2 har jeg oploadet til en anden server hvor det kører fint.

Så fik jeg og vide at formatet til cdonts skulle se således ud:
Set objMail = CreateObject("CDONTS.Newmail")
objMail.Mailformat = cdoMailFormatMIME
objMail.BodyFormat = CdoBodyFormatHTML
objMail.From = afsender
objMail.To = modtager
objMail.Subject = emne
objMail.Body = tekst
objMail.Send
Set objMail = Nothing

men er ikke i stand til at anvende HTML formatet i body, eller aner ikke hvad der er galt.
Avatar billede mcfly.asp Nybegynder
03. marts 2002 - 22:07 #7
men noget kunne tyde på at rettighederne for min anvendelse af cdonts ikke er til stede idet jeg får en Permission denied fejl.
Mærkeligt nok ikke når jeg forsøger at oprette en instans af mail objektet. hmm..
Avatar billede mcfly.asp Nybegynder
04. marts 2002 - 16:11 #8
mere hmmmm...idag er alle mails modtaget. 27 stk ialt. De er åbentbart afsendt fra serveren omkring 01.45 natten til idag. Jeg oprettede mails'ne i tidsrummet fra 13-18. Så man skal åbentbart regne med en hvis responstid.

>> Rune_c da det ikke var løsningen du kom med beholder jeg størstedelen af pointne selv, men du skal have tak fordi du gad give dit bud på problemet. Så til andre interesserede virker alle tre kodeeksempler.
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester