Foros del Web - Ver Mensaje Individual

Shilfild · #3 (**permalink**) 26/04/2007, 02:31

Lo que me has comentado fui probandolo ayer recordando algo de C, pero me sigue dando el mismo error, pongo el código completo con la parte donde falla destacada, por si veis algo raro.... que ya no sé qué puede ser...

Código:

<%@ language="JScript" %>


<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<title>Untitled Document</title>
<!-- Hay que cambiar esto por el diseño de la propia página -->
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<link href="../Intranet/web/intranet.css" rel="stylesheet" type="text/css">
<link href="../Intranet/web/scroll.css" rel="stylesheet" type="text/css">
</head>

<body>
<!-- #INCLUDE file="ADOJAVAS.inc" -->
<%
	cone=Server.CreateObject("ADODB.Connection");
	cone.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ="+Server.MapPath("portaljoven.mdb"));
	rstIntranet=new ActiveXObject("ADODB.RecordSet");
	intra2=new ActiveXObject("ADODB.RecordSet");
	intra3=new ActiveXObject("ADODB.RecordSet");
	sentencia="Select * from destacados order by id_destacado desc";
	rstIntranet.Open(sentencia,cone,adOpenStatic,adCmdTable);
	rstIntranet.movelast;
	rstIntranet.movefirst;
	
	%>

	<table border=0>
	<%
	contador=0;
	while (!rstIntranet.eof & contador<=4){
		%><tr>
			<% 
varmax="Select max(id_destacado)-contador from destacados";
intra2.Open(varmax,cone,adOpenStatic,adCmdTable);
vartabla="Select tipo_nombre from tipos where id_tipo=(select destacados_tipo from destacados where id_destacado=varmax)";
intra3.Open(vartabla,cone,adOpenStatic,adCmdTable);
 Switch(vartabla){
	Case "comics":
        select2="Select comic_titulo,comic_imagen from comics where id_comic=varmax";
intra4.Open(vartabla,cone,adOpenStatic,adCmdTable);
Response.write("<img src='"+rstIntranet("comic_imagen")+"'>");			
Response.write("<a href='desarrollo_comics.asp?Id="+rstIntranet("id_comic")+"' class='desarrollo' target='_parent'>"+rstIntranet("comic_titulo")+"</a>")<br><br>
break; 
				%>
					
			<%> } <%>	
		</tr>			
		<%rstIntranet.Movenext;
		contador=contador + 1;
	}
	%>
</table>
<%rstIntranet.close;
cone.close;
intra2.close;
intra3.close;%>
</body>
</html>

El error:
Error de compilación de Microsoft JScript (0x800A03EC)
Se esperaba ';'
/portal_joven/listado_destacados.asp, línea 40, columna 16

Línea 40: Switch(vartabla){