Segue abaixo código de toda a página. A parte em vermelho é a tabela onde ocorre o erro.
<%
Option Explicit
Dim email, optica, odesp, odcil, odeixo, odadicao, odlonge, odalt, oeesp, oecil, oeeixo, ponte, aha, dm, ve, tipolente,material, coloracao, tonalidade, tratamento, armacao, observacao, para, EnviarMail, MsgBody
email = Request.form("email")
optica = Request.form("optica")
odesp = Request.form("odesp")
odcil = request.form("odcil")
odeixo = request.form("odeixo")
odadicao = request.form("odadicao")
odlonge = request.form("odlonge")
odalt = request.form("odalt")
oeesp = request.form("oeesp")
oecil = request.form("oecil")
oeeixo = request.form("oeeixo")
ponte = request.form("ponte")
aha = request.form("aha")
dm = request.form("dm")
ve = request.form("ve")
tipolente = request.form("tipolente")
material = request.form("material")
coloracao = request.form("coloracao")
tonalidade = request.form("tonalidade")
tratamento = request.form("tratamento")
armacao = request.form("armacao")
observacao = request.form("observacao")
para = "sandino.sa@terra.com.br"
Set EnviarMail = Server.CreateObject("CDONTS.NewMail")
EnviarMail.To = para
EnviarMail.From = email
EnviarMail.Subject = "SITE MONDADORI - TESTE DE PEDIDO"
MsgBody = "<html>"_
&"<head>"_
&"<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />"_
&"<title>PEDIDO</title>"_
&"<style type="text/css">"_
&"<!--"_
&".style1 {color: #FF0000}"_
&"-->"_
&"</style>"_
&"</head>"_
&"<body>"_
&"<div>"_
&" <table cellspacing="1" cellpadding="0" border="1">"_
&" <tbody>"_
&" <tr>"_
&" <td valign="top" colspan="4"><p class="style1">"&email&"</p></td>"_
&" <td valign="top" colspan="16"><p> <span class="style1">"&optica&"</span></p></td>"_
&" </tr>"_
&" <tr>"_
&" <td valign="top" colspan="2"><p><strong>OD</strong></p></td>"_
&" <td valign="top" colspan="3"><p>"&odesp&"</p></td>"_
&" <td valign="top" width="7"><p><strong>CIL</strong></p></td>"_
&" <td valign="top" colspan="3"><p>"&odcil&"</p></td>"_
&" <td valign="top" colspan="2"><p align="center"><strong>EIXO</strong></p></td>"_
&" <td valign="top" width="28"><p>"&odeixo&"</p></td>"_
&" <td valign="top" colspan="3"><p align="center"><strong>ADIÇÃO</strong></p></td>"_
&" <td valign="top" colspan="5"><p>"&odadicao&"</p></td>"_
&" </tr>"_
&" <tr>"_
&" <td valign="top" colspan="2"><p><strong>OE</strong></p></td>"_
&" <td valign="top" colspan="3"><p>"&oeesp&"</p></td>"_
&" <td valign="top" width="7"><p><strong>CIL</strong></p></td>"_
&" <td valign="top" colspan="3"><p>"&oecil&"</p></td>"_
&" <td valign="top" colspan="2"><p align="center"><strong>EIXO</strong></p></td>"_
&" <td valign="top" width="28"><p>"&oeeixo&"</p></td>"_
&" <td valign="top" colspan="2"><p align="center"><strong>DP</strong></p></td>"_
&" <td valign="top" colspan="1"><p>"&odlonge&";</p></td>"_
&" <td valign="top" colspan="2"><p align="center"><strong>ALT</strong></p></td>"_
&" <td valign="top" colspan="5"><p>"&adalt&"</p></td>"_
&" </tr>"_
&" <tr>"_
&" <td valign="top" colspan="4"><p align="center"><strong>LENTE</strong></p></td>"_
&" <td valign="top" colspan="17"><p>"&tipolente&"</p></td>"_
&" </tr>"_
&" <tr>"_
&" <td valign="top" colspan="4"><p align="center"><strong>MATERIAL</strong></p></td>"_
&" <td valign="top" colspan="8"><p>"&material&"</p></td>"_
&" <td valign="top" colspan="2"><p><strong>COR</strong></p></td>"_
&" <td valign="top" colspan="8"><p>"&coloracao&"</p></td>"_
&" </tr>"_
&" <tr>"_
&" <td valign="top" colspan="6"><p align="center"><strong>TRATAMENTO</strong></p></td>"_
&" <td valign="top" colspan="15"><p>"&tratamento&"</p></td>"_
&" </tr>"_
&" <tr>"_
&" <td valign="top" width="16"><p><strong>P</strong></p></td>"_
&" <td valign="top" colspan="2"><p>"&ponte&"</p></td>"_
&" <td valign="top" colspan="2"><p><strong>H</strong></p></td>"_
&" <td valign="top" colspan="2"><p>"&aha&"</p></td>"_
&" <td valign="top" width="11"><p><strong>V</strong></p></td>"_
&" <td valign="top" colspan="2"><p>"&ve&"</p></td>"_
&" <td valign="top" colspan="2"><p><strong>DM</strong></p></td>"_
&" <td valign="top" colspan="2"><p>"&dm&"</p></td>"_
&" <td valign="top" colspan="4"><p><strong>ARMAÇÃO</strong></p></td>"_
&" <td valign="top" colspan="2"><p>"&armacao&"</p></td>"_
&" </tr>"_
&" <tr>"_
&" <td valign="top" colspan="3"><p><strong>OBS.</strong></p></td>"_
&" <td valign="top" colspan="17"><p>"&observacao&"</p></td>"_
&" </tr>"_
&" <tr height="0">"_
&" <td width="16"></td>"_
&" <td width="0"></td>"_
&" <td width="52"></td>"_
&" <td width="8"></td>"_
&" <td width="11"></td>"_
&" <td width="7"></td>"_
&" <td width="18"></td>"_
&" <td width="11"></td>"_
&" <td width="11"></td>"_
&" <td width="29"></td>"_
&" <td width="23"></td>"_
&" <td width="28"></td>"_
&" <td width="20"></td>"_
&" <td width="18"></td>"_
&" <td width="44"></td>"_
&" <td width="14"></td>"_
&" <td width="23"></td>"_
&" <td width="13"></td>"_
&" <td width="52"></td>"_
&" <td width="22"></td>"_
&" </tr>"_
&" </tbody>"_
&" </table>"_
&"</div>"_
&"</body>"_
&"</html>"
EnviarMail.Body = MsgBody
EnviarMail.Importance = 1
EnviarMail.BodyFormat = 0
EnviarMail.MailFormat = 0
EnviarMail.Send
Set EnviarMail = Nothing
%>
O erro apresentado é o seguinte:
Microsoft VBScript compilation error '800a0401'
Expected end of statement
/exepedido.asp, line 37
&"<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />"_
--------------------^
Acredito que seja um pequeno problema em relação ao código ASP + HMTL
Aguardo ajuda!
Abração!
