"Sidfot" i mail

Hej

Längst ner i mitt mail VILL jag ha texten:

[i]Detta är ett automatiskt utskick, svar kan [b]EJ[/b] skickas till denna adress[/i]

Hur ska jag ådstakomma det??

Har denna nu:

<font size='-1' face='verdana'><i>Detta är ett automatiskt utskick, svar kan <b>EJ</b> skickas till denna adress</i>

...men då visas htmltaggar o allt, vilket jag inte vill...

HAr FÖR mig att det fanns ngn i Jmail som hetter HTML.Append("koden...") men kommer inte ihåg hur det såg ut.

Tack

Något liknanade kanske

Set jmail = Server.CreateObject("JMail.Message")

jmail.AddRecipient "kungen@slottet.se"
jmail.From = "Micke@A.com"
Jmail.Priority = 1
jmail.Subject = "Massutskick"
jmail.appendHTML"<font size='-1' face='verdana'><i>Detta är ett automatiskt utskick, svar kan <b>EJ</b> skickas till denna adress</i>
"

Men allt annat är klart, själv messet "body", ser ut såhär:

msg.body = avgransare1 & "Hej  " & vbcrlf & vbcrlf & "Meddelande:  " & vbcrlf & meddelande & avgransare & appendHTML("<font size='-1'><i>Det här är ett automatiskt utskick, svar kan <b>EJ</b> skickas till denna adress.</i></font>")

...kan ju tillägga att det inte funkar...

"appendHTML is NOT a vqariable....

Ändra så att mailet inte skickas som text/plain utan som text/html

Hmmm HtmlBody lr ngt tror jag det är

Du måste bestämma dig om det skall vara ett "vanligt" textmeddelande eller om det skall vara html. Du kan inte blanda som du gjort där.

Men var ska jag ändra det då??

Grejjen är det att det är Flashbaserat allt det här, så formateringen av mailet MÅSTE ske i aspfilen, har alltså ingen htmlfil...

Fortsätt mitt exempel och lägg in resten av meddelandet.

jmail.appendHTML"Text"
jmail.appendHTML"Text"
jmail.appendHTML"Mera text"
jmail.appendHTML"Meddelandet kan <b>absolut</b> inte besvaras."
jmail.Send( "epsotserver" )

ok, men jag fattar inte hur jag ska ändra min befintliga kod:

<%
Option Explicit
Dim sender, meddelande, subject, recipient, msg, avgransare, avgransare1, mess

'_________________________________________

sender = Request.Form("sender")
meddelande = Request.Form("meddelande")

'_________________________________________

subject = "Nyhetsbrev från Herrklubben, skickat av" & sender & "."
recipient = "Info@MickeA.com"

'_________________________________________

Server.HTMLEncode("sender")
Server.HTMLEncode("meddelande")

'_________________________________________

avgransare1 = "_______________________________" & vbcrlf & vbcrlf
avgransare = vbcrlf & vbcrlf & "_______________________________" & vbcrlf & vbcrlf

'_________________________________________

set msg = Server.CreateOBject( "JMail.Message" )

msg.From = "NoReply@MickeA.com"
msg.FromName = sender

'_________________________________________

msg.AddRecipient recipient

'strRecipients = "mail1, mail2, mail3"
'arrRecipients = Split(strRecipients,", ")

'For i = 0 To UBound(arrRecipients)
 ' msg.AddRecipient arrRecipients(i)
'Next

'_________________________________________

msg.Subject = subject

mess = avgransare1 & "Hej  " & vbcrlf & vbcrlf & "Meddelande:  " & vbcrlf & meddelande & avgransare & "<font size='-1'><i>Det här är ett automatiskt utskick, svar kan <b>EJ</b> skickas till denna adress.</i></font>"

'_________________________________________

msg.body = appendHTML("mess")

'_________________________________________

if not msg.Send("smtp.mickea.com" ) then
Response.write "&skickat=nej"
else
Response.write "&skickat=ja"
end if
%>

Så här kanske:
Ta bort: msg.body = appendHTML("mess")
Byt till: msg.appendHTML= mess

ska prova, men var ska jag pilla in "body" då?

Body är ju själva meddelandet... ska prova....

Microsoft VBScript runtime error '800a01b6'

Object doesn't support this property or method: 'appendHTML'

/projekt/hklubben/script/nyhets_mail.asp, line 51

Har din ursprungliga kod någonsin fungerat?

Jaja, den funakr schysst, men det är just det här med htmlformateringen som spökar...

Jag har inget tips att ge i denna tråd, men jag måste säga gällande ditt motto, EXAKT så är det :birp
Skulle bara säga det tack och hej för mig

BulletBoyCrime skrev:

Jag har inget tips att ge i denna tråd, men jag måste säga gällande ditt motto, EXAKT så är det :birp
Skulle bara säga det tack och hej för mig

Que??? :q
Blajja får man göra i Caféet ;)

http://www.webforum.nu/showthread.php?s=&postid=405063#post405063

Tack solbulle, nu funakr det, men nu funkar inte recipients istället.

Som sagt:
"Den troliga orsaken till ett problem är lösningen på ett annat problem".

Hur ser den koden ut nu då?

Så här SÅG den ut:

strRecipients = "mail1, mail2, mail3"
arrRecipients = Split(strRecipients,", ")

For i = 0 To UBound(arrRecipients)
   msg.AddRecipient arrRecipients(i)
Next

Men det skickade bara mailet till den första adressen man angav.

Sen gjorde jag en tabell i en db istället, men alla mialadresser.

En kolumn "ID", räknare, sen en "Email", med alla adresser.

Sen:

msg.AddRecipients "" & RecSet("Email") & ""

Varför det är " " har jag ingen aning om, tog det från ett nyhetsbrevexempel från Grruvsjo.com