Erro com Select Case para Include...

[WLJ 0]

Alguém sabe o q pode estar errado? Tá fod#$%$@

 

   	<%    	Dim cat, acao    	    	cat= Request.QueryString("cat")    	acao= Request.QueryString("acao")    	    	Select Case cat      Case ""%>    	      	<!--#include file="estatisticas.asp"-->      <%Case "livros"%>      	<!--#include file="livros.asp"-->      <%Case "compras"%>      	<!--#include file="compras.asp"-->      <%Case "generos"%>      	<!--#include file="generos.asp"-->      <%Case "clientes"%>      	<!--#include file="clientes.asp"-->      <%Case "news"%>      	<!--#include file="news.asp"-->    	<%End Select%>

Erro:

 

Microsoft VBScript compilation error '800a0400' Expected statement /loja/admin/main.asp, line 37 Case "compras"^

[WebASP 0]

<% Dim cat, acao cat= Request.QueryString("cat") acao= Request.QueryString("acao") Select Case cat Case "livros" %><!--#include file="livros.asp"--><% Case "compras" %><!--#include file="compras.asp"--><% Case "generos" %><!--#include file="generos.asp"--><% Case "clientes" %><!--#include file="clientes.asp"--><% Case "news" %><!--#include file="news.asp"--><% Case Else %><!--#include file="estatisticas.asp"--><% End Select%>

[WLJ 0]

<% Dim cat, acao cat= Request.QueryString("cat") acao= Request.QueryString("acao") Select Case cat Case "livros" %><!--#include file="livros.asp"--><% Case "compras" %><!--#include file="compras.asp"--><% Case "generos" %><!--#include file="generos.asp"--><% Case "clientes" %><!--#include file="clientes.asp"--><% Case "news" %><!--#include file="news.asp"--><% Case Else %><!--#include file="estatisticas.asp"--><% End Select%>

O que é isso? Não entendi! :huh: