CDONTS

Har problem med detta.

"<table border='2' cellspacing='0' cellpadding='0' style='border-collapse: collapse' bordercolor='#967F77' width='100%'>"&_
"<tr><td>"&_
"<table border='0' cellspacing='0' cellpadding='0' style='border-collapse: collapse' bordercolor='#111111' width='100%'>"&_
"<tr bgcolor='#A31418'><td width='200'><p><b><font color='#FFFFFF'>Namn på varan.</td>"&_
"<td width='60'><p align='center'><b><font color='#FFFFFF'>Antal</td>"&_
"</tr>"&_
	pris=0
	x=0
		if Request.Cookies("kopt").HasKeys then
		for each y in Request.Cookies("kopt") &_
			"<tr bgcolor='#F8F4F2'>"&_
			"<td width='200'>"&_
			SQL="SELECT * FROM Webshop where id="&y
			set rs=connect.execute(SQL)&_
			"<p>"&rs("Namn") &" "&rs("pris")&":- </a>"&_
			"</td><td width='60'>"&_
			("<p align='center'>"&request.cookies("kopt")(y)&"</td>")&_
			pris=pris+request.cookies("kopt")(y)*rs("pris")&_
			"</tr>"&_
			next
	"</table></tr></td></table>"&_
end if&_
"<p>Pris: "&pris&" Kronor."_

"Skickas till:<br>"&_
"Förnamn: "&fornamn&"<br>"&_
"Efternamn: "&efternamn&"<br>"&_
"Adress: "&adress&"<br>"&_
"Postnummer: "&postnr&"<br>"&_
"Ort: "&ort&"<br>"&_
"Email: "&email&"<br>"&_
"Telefon dag: "&tfndag&"<br>"&_
"Telefon kväll: "&tfnkvall&"<br>"&_
"Ip adress: "&request.servervariables("remote_addr")&"<br>"
newMailObj.send
set newMailObj = nothing

Grejjen är den att den vägrar acceptera next hur jag än vrider och vänder på det.

Det kanske är så lätt och dumt att det inte går att använda for loop i ett mail?.

Eller så har jag tänkt helt fel.

& använder du för att konkatenera strängar, du kan inte ha det mellan olika statements. Jag har gjort en del ändringar nedan. Testa, och återkom.

[b]strBodyText = [/b]"<table border='2' cellspacing='0' cellpadding='0' style='border-collapse: collapse' bordercolor='#967F77' width='100%'>"&_
"<tr><td>"&_
"<table border='0' cellspacing='0' cellpadding='0' style='border-collapse: collapse' bordercolor='#111111' width='100%'>"&_
"<tr bgcolor='#A31418'><td width='200'><p><b><font color='#FFFFFF'>Namn på varan.</td>"&_
"<td width='60'><p align='center'><b><font color='#FFFFFF'>Antal</td>"&_
"</tr>"
	pris=0
	x=0
		if Request.Cookies("kopt").HasKeys then
		for each y in Request.Cookies("kopt") 
			[b]strBodyText = strBodyText & [/b]"<tr bgcolor='#F8F4F2'>"&_
			"<td width='200'>"&_
			SQL="SELECT * FROM Webshop where id="&y
			set rs=connect.execute(SQL)&_
			"<p>"&rs("Namn") &" "&rs("pris")&":- </a>"&_
			"</td><td width='60'>"&_
			("<p align='center'>"&request.cookies("kopt")(y)&"</td>")&_
			pris=pris+request.cookies("kopt")(y)*rs("pris")&_
			"</tr>"
		next

		strBodyText = strBodyText & "</table></tr></td></table>"
		end if
strBodyText = strBodyText & "<p>Pris: "&pris&" Kronor." &_
"Skickas till:<br>"&_
"Förnamn: "&fornamn&"<br>"&_
"Efternamn: "&efternamn&"<br>"&_
"Adress: "&adress&"<br>"&_
"Postnummer: "&postnr&"<br>"&_
"Ort: "&ort&"<br>"&_
"Email: "&email&"<br>"&_
"Telefon dag: "&tfndag&"<br>"&_
"Telefon kväll: "&tfnkvall&"<br>"&_
"Ip adress: "&request.servervariables("remote_addr")&"<br>"
[b]newMailObj.Body = strBodyText[/b]
newMailObj.send
set newMailObj = nothing

Visa alltid vad du får för felmeddelande. Mycket lättare att hjälpa till då.

Mvh,

Feltyp:
Microsoft JET Database Engine (0x80040E0C)
Det angavs inte någon kommandotext för kommandoobjektet.
/dahlins-motor/privat.asp, line 147

Line 147:
set rs=connect.execute(SQL)&_

Jag har testat sql satsen innan också och den går hur bra som helst. Utanför mailet då d.v.s

Du ska inte ha & eller &_ överallt, utan bara där du konkatenerar strängar.

Så här borde det blocket se ut:

		for each y in Request.Cookies("kopt") 
			strBodyText = strBodyText & "<tr bgcolor='#F8F4F2'>"&_
			"<td width='200'>"
			SQL="SELECT * FROM Webshop where id="&y
			set rs=connect.execute(SQL)
			strBodyText = strBodyText & "<p>"&rs("Namn") &" "&rs("pris")&":- </a>"&_
			"</td><td width='60'>"&_
			("<p align='center'>"&request.cookies("kopt")(y)&"</td>")&_
			pris=pris+request.cookies("kopt")(y)*rs("pris")&_
			"</tr>"
		next

Mvh,

Nu så funkar det, tror jag måste plugga på lite mera på CDONTS.

Förresten, varför står det nu FALSKT i mailet överst.
Ovanför priset.

Jag måste vara helt talanglös..
Har fortfarande problem.

set newMailObj =  server.createObject("CDONTS.NewMail")
newMailObj.BodyFormat = 0
newMailObj.MailFormat = 0
newMailObj.from = email
newMailObj.to = mail
newMailObj.subject = "ORDER / [url]www.dahlinsmotor.se[/url]"
strBodyText = "Order nummer: <br>"&_
"Skickas till:<br>"&_
"Förnamn: "&fornamn&"<br>"&_
"Efternamn: "&efternamn&"<br>"&_
"Adress: "&adress&"<br>"&_
"Postnummer: "&postnr&"<br>"&_
"Ort: "&ort&"<br>"&_
"Email: "&email&"<br>"&_
"Telefon dag: "&tfndag&"<br>"&_
"Telefon kväll: "&tfnkvall&"<br>"&_
"Ip adress: "&request.servervariables("remote_addr")&"<br>"&_
"<table border='2' cellspacing='0' cellpadding='0' bordercolor='#967F77' width='100%'>"&_
"<tr><td>"&_
"<table border='0' cellspacing='0' cellpadding='0' bordercolor='#111111' width='100%'>"&_
"<tr bgcolor='#A31418'><td width='200'><p><b><font color='#FFFFFF'>Namn på varan.</td>"&_
"<td width='60'><p align='center'><b><font color='#FFFFFF'>Antal</td>"&_
"</tr>"

	pris=0
	x=0
		if Request.Cookies("kopt").HasKeys then
				for each y in Request.Cookies("kopt")
				strBodyText = strBodyText & "<tr bgcolor='#F8F4F2'>"&_
				"<td width='200'>"
				SQL="SELECT * FROM Webshop where id="&y
				set rs=connect.execute(SQL)
				strBodyText = strBodyText & "<p>"&rs("Namn") &" "&rs("pris")&":- </a>"&_
				"</td><td width='60'>"&_
				"<p align='center'>"&request.cookies("kopt")(y)&"</td>"&_
				pris=pris+request.cookies("kopt")(y)*rs("pris")&_
				"</tr>"
				next
		pris=cstr(pris)
		end if
		strBodyText = strBodyText & "</table></tr></td></table>"&_
		"<p>Pris: "&pris&" Kronor.<br>"
newMailObj.Body = strBodyText
newMailObj.send
set newMailObj = nothing

Får hela tiden meddelandet FALSKT i mailet.

if Request.Cookies("kopt").HasKeys then
				for each y in Request.Cookies("kopt")
				strBodyText = strBodyText & "<tr bgcolor='#F8F4F2'>"&_
				"<td width='200'>"
				SQL="SELECT * FROM Webshop where id="&y
				set rs=connect.execute(SQL)
				strBodyText = strBodyText & "<p>"&rs("Namn") &" "&rs("pris")&":- </a>"&_
				"</td><td width='60'>"&_
				"<p align='center'>"&request.cookies("kopt")(y)&"</td>"[b]&_[/b]
				pris=pris+request.cookies("kopt")(y)*rs("pris")[b]&_[/b]
				[b]strBodyText = strBodyText & [/b]"</tr>"
				next
		pris=cstr(pris)
		end if

Notera ovan. Du förstår vad du ska ta bort och vad du ska lägga till?

aha det var den där <tr>..
Tack anders.