problemer med nyhedsbrev i asp
Hej exp'erJeg har et problem med mit nyhedsbrev....
Jeg kan godt indsætte følgende kode:
(og så selv copy paste "indhold" ind i mit tekst fielt i mit admin modul)
NB = "<!DOCTYPE HTML Public ""-//W3C//DTD HTML 4.0 Transitional//EN"">"
NB = NB & "<html>"
NB = NB & "<head>"
NB = NB & "<title>Nyhedsbrev - Albertslundapotek.dk</title>"
NB = NB & "<head>"
NB = NB & "<body bgcolor=#ffffff>"
NB = NB & "<font face=arial, Helvetica, sans-serif>"
NB = NB & indhold
NB = NB & "</font>"
NB = NB & "</body>"
NB = NB & "</html>"
Men når jeg gør det på denne måde går det galt fordi jeg ikke kan bruge " midt i en sætning;:
<% stat = ""
stat = request("status")
if len(stat) > 0 then
hentMail = "Select navn, email from nyhedsbrev"
set objNB=my_conn.execute(hentMail)
indhold = trim(request.form("indhold"))
While Not objNB.EOF
fornavn = objNB("navn")
email = objNB("email")
NB = "<!DOCTYPE HTML Public ""-//W3C//DTD HTML 4.0 Transitional//EN"">"
NB = NB & "<html>"
NB = NB & "<head>"
NB = NB & "<title>Nyhedsbrev - Albertslundapotek.dk</title>"
NB = NB & "<head>"
NB = NB & "<body bgcolor=#ffffff>"
NB = NB & "<font face=arial, Helvetica, sans-serif>"
NB = NB & "<table width='400' border='0'>"
NB = NB & "<tr>"
NB = NB & "<td height='134'>"
NB = NB & "<table width="400" border="0">"
NB = NB & "<tr>"
NB = NB & "<td width="372"><p align="center"><img src="nyhedsbrev_logo.jpg" width="307" height="68">"
NB = NB & "<br>"
NB = NB & "<img src="nyhedsbrev_streg.jpg" width="390" height="16">"
NB = NB & "</p>"
NB = NB & "<p>"
NB = NB & "Til " & fornavn & "<br><br>"
NB = NB & "</p>"
NB = NB & indhold
NB = NB & "<br><br><i>Hvis du ikke ønsker at modtage Nyhedsbrevet mere, kan du framelde det under punktet Nyhedsbrev på Albertslundapotek.dk</i>"
NB = NB & "</td>"
NB = NB & "</font>"
NB = NB & "</body>"
NB = NB & "</html>"
Set objMail = Server.CreateObject("JMail.message")
objMail.From = "apoteket@albertslundapotek.dk"
objMail.AddRecipient email
objMail.Subject = "Nyhedsbrev fra Albertslundapotek.dk"
objMail.HTMLBody = NB
objMail.Send("mail.albertslundapotek.dk")
Set objMail = Nothing
objNB.movenext
Wend
Response.write "Nyhedsbrevet er sendt"
end if
%>
Men jeg kan heller ikke udskifte " med ' meidt i sætningen... Hvad kan jeg så brug for et tegn?
