Usamos cookies para medir audiência e melhorar sua experiência. Você pode aceitar ou recusar a qualquer momento. Veja sobre o iMasters.
Pessoal, estou com problemas na migração de um site. Estou migrando de um servidor com Win 2000 IIS 5.0 para um Win 2003 com IIS 6.0.
A página funciona perfeitamente no servidor com Win 2000, mas quando eu coloco no servidor com Win 2003 ele dá o seguinte erro:
Erro de compilação do Microsoft VBScript erro '800a03f6'
'End' esperado
/erro.htm, line 188
Como pode dar esse tipo se a página roda perfeitamente no primeiro servidor!?
Todas as configurações do IIS 6.0 estão iguais às do IIS 5.0.
E todas as outras páginas do site eu acesso sem problemas, é só na Default.asp que dá o erro.
Por favor me ajudem! http://forum.imasters.com.br/public/style_emoticons/default/thumbsup.gif
Segue o código:
<%Session.LCID=1036%><%Response.CacheControl = "no-cache"Response.AddHeader "pragma", "no-cache"Response.Expires = -1000ip = Request.ServerVariables("Remote_ADDR")On Error Resume Nextset cn = Server.CreateObject("ADODB.Connection")cn.provider="microsoft.jet.oledb.4.0"cn.connectionstring="..\DB\clipping.mdb"cn.openset cni = Server.CreateObject("ADODB.Connection")cni.provider="microsoft.jet.oledb.4.0"cni.connectionstring="..\DB\site.mdb"cni.openset rip = Server.CreateObject("ADODB.Recordset")sql = "INSERT INTO contador (data,ip) VALUES ('"& Date() &"','"& ip &"')" rip.open sql, cni, 3, 3set rip = Nothingset rm = Server.CreateObject("ADODB.Recordset")sql = " SELECT MAX(numero)as numero FROM clipping WHERE entrada=true"rm.open sql, cn, 3, 3numero = rm("numero")ultimo = numerorm.closeset rm = Nothingset rs = Server.CreateObject("ADODB.Recordset")sql = "SELECT titulo,texto,id_noticias, ementa FROM noticias WHERE tipo_noticia='PES' and numero=" & numerors.open sql, cn, 3, 3set rag = Server.CreateObject("ADODB.Recordset")sql = "SELECT Top 2 agenda.informacoes, agenda.datas FROM agenda WHERE (((agenda.ano)>=Year(Now())) AND (([agenda]![mes]+Left([agenda]![datas],2))>=Format(Date(),'mm')+Format(Date(),'dd'))) ORDER BY [agenda]![mes]+Left([agenda]![datas],2);"rag.open sql, cni, 3, 3set rsa = Server.CreateObject("ADODB.Recordset")sql = "SELECT logomarca,id_materia,ementa FROM Acontece_ies WHERE home_page=True "rsa.open sql, cni, 3, 3set rst = Server.CreateObject("ADODB.Recordset")sql = "SELECT titulo,id_noticias,numero FROM noticias WHERE secao='Noticias' and numero=" & numerorst.open sql, cn, 3, 3while rs.EOF rs.close numero = numero -1 sql = "SELECT titulo,texto,id_noticias FROM noticias WHERE tipo_noticia='PES' and numero=" & numero rs.open sql, cn, 3, 3wendif err.number<>0 then server.transfer("erro.htm")elsesession("m")="t" ' expandir todos os menus%><html><head><title>FUNADESP</title><meta name="generator" content="Namo WebEditor v5.0(Trial)"><link href="style.css" rel="stylesheet" type="text/css"><script type="text/javascript"><!--var p=1;var titulos = new Array();var mark = new Array();<% i=0while not rst.EOF %>titulos[<%=i%>]='<%=rst("titulo")%>'mark[<%=i%>]=<%=rst("id_noticias")%><%i=i+1rst.movenextwend%>function noticias(){n = document.getElementById("clipping");n.innerHTML=titulos[p];n.href="[http://www.funadesp.org.br/clipping/edicao.asp?numero="++"#"+mark[p];p=p+1;if](http://www.funadesp.org.br/clipping/edicao.asp?numero=) (p>=titulos.length) p=0;}function inicializa(){setInterval('noticias()',5000);}--></script> <style><!--a:link.noticia { font-family:Verdana,sans-serif; font-style:normal; font-weight:bold; font-size:11pt; color:rgb(0,102,51); text-decoration:none; }a:active.noticia { font-family:Verdana,sans-serif; font-style:normal; font-weight:bold; font-size:11pt; color:rgb(0,102,51); text-decoration:none; }a:visited.noticia { font-family:Verdana,sans-serif; font-style:normal; font-weight:bold; font-size:11pt; color:rgb(0,102,51); text-decoration:none; }a:hover.noticia { font-family:Verdana,sans-serif; font-style:normal; font-weight:bold; font-size:11pt; color:rgb(0,102,51); text-decoration:underline; }--></style></head><body leftmargin="8" marginwidth="3" topmargin="8" marginheight="3" bgcolor="#F2F2F2"><table width="760" border="0" align="center" bgcolor="white"> <tr> <td height="524" width="977" valign="top" > <table width="100%" border="0" background="images/faixa_logo.jpg" style="background-repeat:no-repeat; margin-top:5pt;"> <tr> <td width="742" height="76"> <p align="right"><img src="images/menu/menu.gif" width="454" height="56" border="0" usemap="#ImageMap1"> </td> </tr> </table> <table border="0" width="100%"> <tr> <td width="192" valign="top"> <p style="margin-top:7;"><%Server.Execute "menu.asp"%> </td> <td width="780" valign="top"> <table border="0" align="center" cellspacing="0" width="100%"> <tr bgcolor="#ffffff"> <td width="100%" height="291" style="padding-top:8;" align="left" valign="top"><table width="100%" border="1" align="center" cellpadding="4" cellspacing="0" bordercolor="#999999" background="images/fundo_tabela_e.gif" style="background-repeat:repeat-x;" darkbordercolor="#666666" lightbordercolor="#ffffff"> <tr> <td width="100%" height="611" bordercolor="#FFFFFF"> <table width="100%" border="0" cellpadding="7"> <tr> <td height="46"><b><font color="#000000"><span class="corpo">Novidades: </span></font></b> </td> </tr> </table> <table width="100%" border="0" cellpadding="0" cellspacing="0" style="margin-top:0; margin-bottom:0;"> <tr> <td width="100%" height="387"> <p class="corpo_centro"><strong> NOTA DE ESCLARECIMENTO<br> <a href="[http://www.funadesp.org.br/gestao/NOTA_ESCLARECIMENTO.asp">veja](http://www.funadesp.org.br/gestao/NOTA_ESCLARECIMENTO.asp) aqui</a> <br> <br>IV Encontro Nacional de Graduação das IES Particulares aconteceu nos dias 18, 19 e 20 de abril, no Rio de Janeiro.<br> <a href="[http://www.funadesp.org.br/eventos/graduacao/IV_encontro_informe.asp">Veja](http://www.funadesp.org.br/eventos/graduacao/IV_encontro_informe.asp) aqui informe sobre o evento.</a><br> <a href="[http://www.funadesp.org.br/graduacao/Fotos_IV_encontro.asp">Veja](http://www.funadesp.org.br/graduacao/Fotos_IV_encontro.asp) aqui as fotos o evento.</a> <br> <br> Avaliação de Desempenho Institucional da Funadesp<br> <a href="[http://www.funadesp.org.br/avaliacao_2005/">Preencha](http://www.funadesp.org.br/avaliacao_2005/) aqui o questionário</a>. Sua opinião é muito importante.<br> <br> Prêmio Funadesp: Estudos para Desenvolvimento do Ensino Superior Particular <br> <a href="downloads/PREMIO_ESTUDOS.pdf" target="_blank">Faça o download do Regulamento</a><br> <a href="downloads/Edital_Premio_Estudos.pdf" target="_blank">Veja o Edital do Prêmio</a><br> Inscrições encerradas<br> <br> Reforma da Educação Superior<br> <a href="downloads/reforma2_300505.pdf" target="_blank">Veja segunda versão do anteprojeto de lei</a> <br> <br> Prêmio Funadesp de Iniciação Científica.<br> <a href="premio/nacional_ic/Resultado_premio_ic.asp">Veja aqui o resultado </a><br> <br> Instruções para o envio dos resultados relevantes de projetos de pesquisa apoiados pelo Programa de Bolsas da Funadesp.<br> <a href="Programas_bolsas/Envio_resultados.asp">Faça o download das instruções</a><br> </strong> </p> </td> </tr> <tr> <td width="100%"> <table width="100%" height="89" border="0" style="margin-top:4;"> <tr> <td width="574" height="85"> <p class="corpo_centro" style="margin-top:4; margin-bottom:6;" align="left"><img src="images/foruns_color.gif" width="26" height="18" border="0"> <a href="../foruns/geral/forum_provao.asp">Participe do Fórum de Discussão:</a> <strong><B>Dê aqui sua opinião sobre o Anteprojeto da Lei Orgânica da Educação Superior (Reforma Universitária), apresentado, pelo Ministério da Educação, à sociedade civil, em dezembro de 2004.</B><br> </strong></p></td> </tr> </table></td> </tr> <tr> <td width="100%" height="73" valign="top"> <table style="margin-top:4; margin-bottom:0;" border="0" width="85%"> <tr> <td width="126" height="65"> <p style="margin-top:0; margin-bottom:0;" align="right"><img src="images/gestaoIES_peq.jpg" width="117" height="38" border="0"></p> <p style="margin-top:0; margin-bottom:0;" align="right"><a href="clipping/edicao.asp?numero=<%=ultimo%>"><span class="corpo_centro"><%=ultimo%>ª Edição</span></a></p></td> <td width="358"> <p class="corpo_centro" style="margin-top:4; margin-bottom:6;" align="left"> <%rst.MoveFirst%> <a id="clipping" class='noticia' href='clipping/edicao.asp?numero=<%=rst("numero")%>#<%=rst("id_noticias")%>'><%=rst("titulo")%></a></p></td> </tr> </table></td> </tr> </table></td> </tr> </table> <table width="100%" border="1" cellspacing="0" cellpadding="4" align="center" background="images/fundo_tabela_e.gif" bordercolor="#999999" darkbordercolor="#666666" lightbordercolor="#ffffff"> <tr> <td width="100%" bordercolor="#FFFFFF" height="170"> <table width="75%" border="0" cellpadding="4"> <tr> <td><b><span class="corpo">Agenda Funadesp 2005 - <a href="agenda/agenda.asp?m=8">Confira!</a><font color="#003E16"><span class="corpo"></span></font></span></b></td> </tr> </table> <table style="margin-top:0; margin-bottom:0;" border="0" width="100%" cellpadding="0" cellspacing="0"> <%while not rag.EOF %> <tr> <td width="100%" height="60" > <p class="corpo_centro" style="text-align:left;"><b><%=rag("datas")%></b><br> <br> <%=rag("informacoes")%></p> </td> </tr><%rag.movenextwend%> <tr> <td width="100%" height="37"> <p class="corpo" style="margin-top:4; margin-bottom:4;"> </p> </td> </tr> </table> </td> </tr> </table> <b><span class="corpo"><a href="mapa_site.asp"><img src="images/branco.gif" width="5" height="2" border="0"></a></span></b><table width="100%" border="1" cellspacing="0" cellpadding="10" align="center" background="images/fundo_tabela_e.gif" bordercolor="#999999" darkbordercolor="#666666" lightbordercolor="#ffffff" style="background-repeat:repeat-x;"> <tr> <td width="100%" bordercolor="#FFFFFF" height="136"> <p class="texto"><b><span class="corpo">Políticas de Educação Superior:</span><font color="#003E16"><span class="corpo"><br> </span></font></b> <table style="margin-top:0; margin-bottom:0;" border="0" width="100%" cellpadding="0" cellspacing="0"> <% i = 0 while not rs.EOF AND i<3%> <tr> <td width="100%" height="63" valign="top" > <p class="corpo_centro" style="margin-top:4;"><a href="home_politicas/pes.asp?id=<%=rs("id_noticias")%>"><%=rs("titulo")%></a>: <%if rs("ementa")<>"" then response.write replace(rs("ementa"), "<br>",vbcrlf ) end if%><br> </p> </td> </tr> <% i=i+1 rs.movenext wend %> </table> </td> </tr> </table> <table width="100%" border="1" cellspacing="0" cellpadding="10" align="center" background="images/fundo_tabela_e.gif" bordercolor="#999999" darkbordercolor="#666666" lightbordercolor="#ffffff" style="background-repeat:repeat-x;"> <tr> <td width="100%" bordercolor="#FFFFFF"> <p class="texto"><b><span class="corpo">Acontece nas IES:</span><font color="#003E16"><span class="corpo"><br> </span></font></b> <table style="margin-top:0; margin-bottom:0;" border="0" width="100%" cellpadding="0" cellspacing="0"> <% while not rsa.EOF %> <tr> <td width="103" height="83"> <p align="center"><img src="home_acontece_ies/<%=rsa("logomarca")%>" border="0"></p> </td> <td width="100%" height="83"> <p class="corpo_centro"><%if rsa("ementa")<>"" then response.write replace(rsa("ementa"), "<br>",vbcrlf ) end if%> <a href='home_acontece_ies/acontece_ies.asp?id_materia=<%=rsa("id_materia")%>'>Leia mais</a><br> </p> </td> </tr> <% rsa.movenext wend %> </table> </td> </tr> </table></td> </tr> <tr> <td width="100%" style="background-repeat:no-repeat; border-top-color:rgb(0,0,0); border-right-color:rgb(0,0,0); border-bottom-color:rgb(0,0,0);" height="26"> <p align="center" style="margin-top:0; margin-bottom:0;"><span class="utilitario"><font color="#666666">FUNADESP - Fundação Nacional de Desenvolvimento do Ensino Superior Particular</font></span></p> <p style="margin-top:0; margin-bottom:0;" align="center"><span class="utilitario"><font color="#666666">Endereço: SCS Quadra 07 Bloco "A" Sala 726 Torre do Pátio Brasil Shopping. Cep: 70300-911</font></span></p> <p style="margin-top:0; margin-bottom:0;" align="center"><span class="utilitario"><font color="#666666">E-mail: </font><a href="menu/faleconosco.asp"><font color="#666666">funadesp@funadesp.org.br</font></a><font color="#666666"> - Telefone: (61) 3222171 - Brasília/DF</font></span></p> </td> </tr> </table> </td> </tr> </table> </td> </tr></table><map name="ImageMap1"><area shape="rect" coords="2, 2, 57, 54" href="[http://www.funadesp.org.br/"](http://www.funadesp.org.br/) target="_self"><area shape="rect" coords="67, 2, 121, 55" href="[http://www.funadesp.org.br/site/contato.asp"](http://www.funadesp.org.br/site/contato.asp) target="_self"><area shape="rect" coords="136, 2, 189, 55" href="[http://www.funadesp.org.br/ponto_vista/ponto.asp"](http://www.funadesp.org.br/ponto_vista/ponto.asp) target="_self"><area shape="rect" coords="197, 2, 255, 55" href="[http://www.funadesp.org.br/foruns/geral/forum_provao.asp"](http://www.funadesp.org.br/foruns/geral/forum_provao.asp) target="_self"><area shape="rect" coords="269, 2, 325, 55" href="javascript:alert('Imprime páginas internas do site')" target="_self"><area shape="rect" coords="339, 2, 385, 55" href="[http://www.funadesp.org.br/site/busca.asp">Carregando comentários...