Frågan#1
Tjenare,
Nedan ser ni delar av det nyhetsbrevet jag använder mig av.
Den koden som är fetstil är där själva texten hamnar som man skrivit i textfältet "message"
När man fyller i själva texten i "message" formuläret och skickat iväg det så vill jag att den lägger in <br> där man tryckt på "enter/radbrytning" i textfältet.
subject = Request.Form("subject")
message = Request.Form("message")
sql_select = "select email from users"
data_source = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & _
Server.MapPath("mail.mdb")
If Len(message) Then
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sql_select, data_source
While Not rs.EOF
Set mail = Server.CreateObject("CDONTS.NewMail")
mail.Importance = 1
mail.From = "Kundnamn"
mail.To = rs("email")
mail.Subject = subject
strMsg = "" & _
"<body bgcolor=""#ffffff"" text=""#000000"" link=""#FF0000"" vlink=""#FF0000"" alink=""#999999"" leftmargin=""10"" topmargin=""10"" marginwidth=""10"" marginheight=""0"">" & _
"<div align=""center""><br>" & _
"<table width=""500"" border=""1"" bgcolor=""#ffffff"" cellpadding=""0"" cellspacing=""0"" bordercolor=""#000000"" align=""center"">" & _
"<tr>" & _
"<td>" & _
"<img src=""http://www.uppdaterad.com/nyhetsbrev/test2.jpg""><br><br><br>" & _
"<font color=""#FFFFFF"" face=""Verdana, Arial, Helvetica, sans-serif"" size=""2""><b><font color=""#000000"" face=""Arial, Helvetica, sans-serif"">"[b]&message&[/b]" " & _
"</font></b></font></td>" & _
"</td>" & _
"</tr>" & _
"</table>" & _
"<br>" & _
"</body>" & _
"</html>"