Just nu i M3-nätverket
Gå till innehåll

Länk i mail


MML

Rekommendera Poster

Hur skickar jag ett automail med en länk i?

Har provat med detta nedan men det funkar inte:

 

 

Set NyEpost = Server.CreateObject("CDONTS.NewMail")

NyEpost.To = " "&objRS("mail")&" " '

NyEpost.Importance = 2

NyEpost.From ="info@minmail.se" '

NyEpost.Subject = "Nyheter från mig"

Meddelandet = Meddelandet & vbCrLf & "Det finns något nytt."&vbCrLf&""

Meddelandet = Meddelandet & vbCrLf & "<a href='www.adress.se'>Se dessa nyheter här</a> ."&vbCrLf&""

NyEpost.Body = Meddelandet

NyEpost.Send

 

 

Länk till kommentar
Dela på andra webbplatser

Vissa mailklienter länkar automatiskt om du skriver en riktig adress:

http://www.idg.se

Då kan du dock inte länka en textrad, utan måste ändra så det är HTML-format i mailet istället:

 	 	
'Set the e-mail body format (0=HTML 1=Text)
NyEpost.BodyFormat = 0

 

Ta bort dina VbCrLf och byt mot html-radbrytningar

Meddelandet = "<br>Det finns något nytt.<br>" &_
<br><a href='www.adress.se'>Se dessa nyheter här</a> .<br>"
NyEpost.Body = Meddelandet

 

Länk till kommentar
Dela på andra webbplatser

vilken mailklient använder du?

Kan den läsa html och är den inställd på automatiskt format?

 

Visa din asp-kod, inte bara säga att det inte fungerar. Det är inte mycket till hjälp.

 

Länk till kommentar
Dela på andra webbplatser

Detta använder jag:

Set NyEpost = Server.CreateObject("CDONTS.NewMail")
NyEpost.BodyFormat = 0	' ==== (0=HTML 1=Text
NyEpost.To = " "&objRS("mail")&" "  '
NyEpost.Importance = 2
NyEpost.From ="info@minadress.se"  
NyEpost.Subject = "Nyheter från mig"
Meddelandet = Meddelandet & "Det nyhtere.<br>"
Meddelandet = Meddelandet & "<a href='www.adress.se'>Se dessa nyheter här</a> .<br> "
NyEpost.Body = Meddelandet
NyEpost.Send

 

Länk till kommentar
Dela på andra webbplatser

Observera att defaultvärdet för MailFormat-egenskapen är 1 (om inget annat anges). Detta innebär:

The NewMail object is to be in uninterrupted plain text.

 

Kolla på:

http://msdn.microsoft.com/en-us/library/ms527198(EXCHG.10).aspx

samt http://msdn.microsoft.com/en-us/library/ms526401(EXCHG.10).aspx

 

/Cluster

------------------------------------------------------

I do not fear computers. I fear the lack of them

--------> http://eforum.kicks-ass.net <---------

 

Länk till kommentar
Dela på andra webbplatser

Provade detta på en annan server, och funkade det inte, gick ej att använda denna rad

Set myMail = CreateObject("CDONTS.NewMail")

Men denna rad funkar

Set myMail = CreateObject("CDO.NewMail")

Men då funkar det inte med länk i mailet

 

Länk till kommentar
Dela på andra webbplatser

nej servrar kan ha lite olika komponenter. Vissa har äldre, andra har nyare komponenter.

CDO.Message är väl att rekommendera, tycker jag själv.

Du få kolla upp manualen för CDO och CDONTS fungerar inte på samma sätt.

Googla på komponentnamnet får du upp en del exempel.

 

[inlägget ändrat 2008-11-03 22:13:00 av Jonas_Bo]

Länk till kommentar
Dela på andra webbplatser

Jag föredrar precis som Jonas CDO.Message (antingen via CDOSYS eller CDOEX beroende på system).

 

Kolla t.ex:

http://support.microsoft.com/kb/286431

 

Ett exempel utökat med inlinebild:

//eforum.idg.se/viewmsg.asp?EntriesId=893864#895703

 

/Cluster

I do not fear computers. I fear the lack of them

> http://eforum.kicks-ass.net <-

 

 

[inlägget ändrat 2008-11-03 22:34:12 av Cluster]

Länk till kommentar
Dela på andra webbplatser

Arkiverat

Det här ämnet är nu arkiverat och är stängt för ytterligare svar.

×
×
  • Skapa nytt...