ændring af skrift-type og underline i email

du kan da bare sætte noget css på din skrift der hvor du vil ha det
og husk at sætte din mail komponent til at acceptere html

set msg = Server.CreateOBject( "JMail.Message" )
msg.ContentType = "text/html"

body = body & "<u><span style=""font-family:verdana; font-size: 9px;"">Hvordan finder vi fejlen.:</span></u>" & vbCrlf

ok, det prøver jeg.

vraa >> body = body & "<span style=""font-family: verdana, tahoma, arial; font-size: 9px; text-decoration: underline;"">Hvordan finder vi fejlen.:</span>" & vbCrlf

Ja.

eller hvis du kun vil bruge css

body = body & "<span style='font-family:verdana; font-size: 9px; text-decoration: underline;'>Hvordan finder vi fejlen.:</span>" & vbCrlf

heh

æææ <<vraa>> den skriver følgende i mailen...


<u><span style="font-family:verdana; font-size: 9px;">Hvordan finder vi fejlen.:</span></u>

det er rigtig mm12010 :-)

prøv mm12010's forslag:

body = body & "<span style=""font-family: verdana, tahoma, arial; font-size: 9px; text-decoration: underline;"">Hvordan finder vi fejlen.:</span>" & vbCrlf

Den skriver.:

<span style="font-family: verdana, tahoma, arial; font-size: 9px; text-decoration: underline;">Hvordan finder vi fejlen.:</span>

hehe

du skal huske at sætte:

objMailer.ContentType = "text/html"

hvilket mail-komponent bruger du?

jeg bruger JMail. Er det som dette...??

set msg = Server.CreateOBject( "JMail.Message" )
msg.ContentType = "text/html"
JMail.ServerAddress = "mail.dotk.dk"
    JMail.Priority = 0
    JMail.Sender = Request("Email")
    JMail.AddRecipient "webmaster@dotk.dk"
    JMail.AddRecipient Request("Email")
    JMail.Subject = "Tilmelding af Mail"
    JMail.Body = body
    JMail.Priority = 3
    JMail.Execute
    Set JMail = Nothing

jeg bruger JMail. Er det som dette...??

set JMail = Server.CreateOBject( "JMail.Message" )
JMail.ContentType = "text/html"
JMail.ServerAddress = "mail.dotk.dk"
JMail.Sender = Request("Email")
JMail.AddRecipient "webmaster@dotk.dk"
JMail.AddRecipient Request("Email")
JMail.Subject = "Tilmelding af Mail"
JMail.Body = body
JMail.Priority = 3
JMail.Execute
Set JMail = Nothing

Nu får jeg denne fejl....

Microsoft VBScript runtime error '800a01b6'

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

/rma/tak.asp, line 34

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

rettes til:

set JMail = Server.CreateObject("JMail.SMTPMail")

prøv sådan her
IF not msg.Send("mail.domæne.com") THEN
  response.write "mangler info til at afsende emails"
ELSE
Response.write "Message sent succesfully!"
END IF

ja så var den der, men nu er der et andet problem, den skriver det hele ud i en køre, i stedet for at opdele det..

mm12010 -- det komemr jo ligsom anpå om han bruger JMail.Message eller JMail.SMTPMail ik
----------
sådan plejer jeg at gøre det ...

set JMail = Server.CreateOBject( "JMail.Message" )
JMail.ContentType = "text/html"
JMail.From = "mail@mail.dk"
JMail.AddRecipient "webmaster@dotk.dk"
JMail.AddRecipient Request("Email")
JMail.Subject = "Tilmelding af Mail"
JMail.Body = body
JMail.Priority = 3
IF not JMail.Send("mail.domæne.com") THEN
  response.write "mangler info til at afsende emails"
ELSE
  Response.write "Message sent succesfully!"
END IF
Set JMail = Nothing

jeg sender lige det hele...

<%

'Mail til A-Team-Data & Bruger
   
    body = body & "Fakturanr.:" &" "& request("Faktura") & vbCrlf & vbCrlf
    body = body & request("Navn") & vbCrlf
    body = body & request("Adresse") & vbCrlf
    body = body & request("Postnr") &" "& request("By") & vbCrlf
    body = body & "Tlfnr.:" &" "& request("Tlfnr") & vbCrlf & vbCrlf
    body = body & request("Email") & vbCrlf & vbCrlf
    body = body & "Beskrivelse af fejl.:" & vbCrlf
    body = body & request("Fejlbeskrivelse") & vbCrlf & vbCrlf
    body = body & "<span style=""font-family: verdana, tahoma, arial; font-size: 9px; text-decoration: underline;"">Hvordan finder vi fejlen.:</span>" & vbCrlf
    body = body & request("Fejl") & vbCrlf & vbCrlf
    body = body & "Hvordan har du konstateret fejlen" & vbCrlf
    body = body & request("Konstaterefejl") & vbCrlf & vbCrlf
    body = body & "Produkt.:" &" "& request("Varebeskrivelse") &" "& request("Varenr") & vbCrlf 
   
   
'Selve mail delen

    set JMail = Server.CreateObject("JMail.SMTPMail")
JMail.ContentType = "text/html"
JMail.ServerAddress = "mail.dotk.dk"
JMail.Sender = Request("Email")
JMail.AddRecipient "webmaster@dotk.dk"
JMail.AddRecipient Request("Email")
JMail.Subject = "Tilmelding af Mail"
JMail.Body = body
JMail.Priority = 3
JMail.Execute
Set JMail = Nothing
   
%>

body = body & "Fakturanr.:" &" "& request("Faktura") & "<br><br>"
    body = body & request("Navn") & "<br>"
    body = body & request("Adresse") & "<br>"
    body = body & request("Postnr") &" "& request("By") & "<br>"
    body = body & "Tlfnr.:" &" "& request("Tlfnr") & "<br><br>"
    body = body & request("Email") "<br><br>"
    body = body & "Beskrivelse af fejl.:" & "<br>"
    body = body & request("Fejlbeskrivelse") & "<br><br>"
    body = body & "<span style=""font-family: verdana, tahoma, arial; font-size: 9px; text-decoration: underline;"">Hvordan finder vi fejlen.:</span><br>"
    body = body & request("Fejl") & "<br><br>"
    body = body & "Hvordan har du konstateret fejlen" & "<br>"
    body = body & request("Konstaterefejl") & "<br><br>"
    body = body & "Produkt.:" &" "& request("Varebeskrivelse") &" "& request("Varenr") & "<br>"

det var lige det der skulle til.. Point til mm12010

mccannon >> klart! :o) men hvis den melder den fejl må det jo betyde at det er JMail.SMTPMail

Takker :o)

hvis du lige vil lavet et svar mm12010

del dem mellem mccannon og mig

Takker for hjælpen

ja ok, det nåede jeg ikke. Men på den anden side, da jeg prøvede sidst fik jeg en skideballe for det.

hehe :o) - ok

men det kan være han kan hjælpe med dette. Hvordan laver jeg en mail adresse aktiv i mailen.

body = body & request("Email") "<br><br>"

body = body & "<a href=""mailto:" & request("Email") & "">" & request("Email") & "</a><br><br>"