Ir para conteúdo
Fórum Script Brasil
  • 0

Problemas Com If

bolomaster

Perguntado por bolomaster,

 Share

Pergunta

bolomaster

bolomaster

Postado
Postado

Microsoft VBScript compilation error '800a0400'

Expected statement

/cpd/CONTEUDO.ASP, line 78

end if

da essa msg ai já tentei usar select case, e agora to tentando com if

e mesmo assim da dando esta msg

alguém sabe o porque já queimei os miolos

obrigado a todos

<!-- #include file="configuracoes.ini" -->

<html>

<head>

<title><%=titulo%></title>

<meta http-equiv="Content-Type" content="text/html;">

<!--Fireworks MX 2004 Dreamweaver MX 2004 target. Created Tue Sep 05 10:20:30 GMT-0300 (Hora oficial do Brasil) 2006-->

</head>

<body background="imgdef/fundoPag.jpg" leftmargin="0" rightmargin="0" bottommargin="0" topmargin="0">

<div align="center">

<table border="0" cellpadding="0" cellspacing="0" width="760">

<!-- fwtable fwsrc="imagens/conteudo.png" fwbase="conteudo.jpg" fwstyle="Dreamweaver" fwdocid = "97434278" fwnested="0" -->

<tr>

<td><img src="imagens/spacer.gif" width="82" height="1" border="0" alt=""></td>

<td><img src="imagens/spacer.gif" width="85" height="1" border="0" alt=""></td>

<td><img src="imagens/spacer.gif" width="37" height="1" border="0" alt=""></td>

<td><img src="imagens/spacer.gif" width="14" height="1" border="0" alt=""></td>

<td><img src="imagens/spacer.gif" width="27" height="1" border="0" alt=""></td>

<td><img src="imagens/spacer.gif" width="36" height="1" border="0" alt=""></td>

<td><img src="imagens/spacer.gif" width="67" height="1" border="0" alt=""></td>

<td><img src="imagens/spacer.gif" width="138" height="1" border="0" alt=""></td>

<td><img src="imagens/spacer.gif" width="90" height="1" border="0" alt=""></td>

<td><img src="imagens/spacer.gif" width="84" height="1" border="0" alt=""></td>

<td><img src="imagens/spacer.gif" width="95" height="1" border="0" alt=""></td>

<td><img src="imagens/spacer.gif" width="5" height="1" border="0" alt=""></td>

<td><img src="imagens/spacer.gif" width="1" height="1" border="0" alt=""></td>

</tr>

<tr>

<td><a href="default.asp"><img src="imagens/conteudo_r1_c1.jpg" alt="" name="conteudo_r1_c1" width="82" height="159" border="0" usemap="#conteudo_r1_c1Map"></a></td>

<td><a href="default.asp"><img name="conteudo_r1_c2" src="imagens/conteudo_r1_c2.jpg" width="85" height="159" border="0" alt=""></a></td>

<td colspan="4"><a href="default.asp"><img name="conteudo_r1_c3" src="imagens/conteudo_r1_c3.jpg" width="114" height="159" border="0" alt=""></a></td>

<td><a href="default.asp"><img name="conteudo_r1_c7" src="imagens/conteudo_r1_c7.jpg" width="67" height="159" border="0" alt=""></a></td>

<td><a href="default.asp"><img name="conteudo_r1_c8" src="imagens/conteudo_r1_c8.jpg" width="138" height="159" border="0" alt=""></a></td>

<td><a href="default.asp"><img name="conteudo_r1_c9" src="imagens/conteudo_r1_c9.jpg" width="90" height="159" border="0" alt=""></a></td>

<td><a href="default.asp"><img name="conteudo_r1_c10" src="imagens/conteudo_r1_c10.jpg" width="84" height="159" border="0" alt=""></a></td>

<td><a href="default.asp"><img name="conteudo_r1_c11" src="imagens/conteudo_r1_c11.jpg" width="95" height="159" border="0" alt=""></a></td>

<td><img name="conteudo_r1_c12" src="imagens/conteudo_r1_c12.jpg" width="5" height="159" border="0" alt=""></td>

<td><img src="imagens/spacer.gif" width="1" height="159" border="0" alt=""></td>

</tr>

<tr>

<td><img name="conteudo_r2_c1" src="imagens/conteudo_r2_c1.jpg" width="82" height="27" border="0" alt=""></td>

<td><img name="conteudo_r2_c2" src="imagens/conteudo_r2_c2.jpg" width="85" height="27" border="0" alt=""></td>

<td colspan="4"><img name="conteudo_r2_c3" src="imagens/conteudo_r2_c3.jpg" width="114" height="27" border="0" alt=""></td>

<td><img name="conteudo_r2_c7" src="imagens/conteudo_r2_c7.jpg" width="67" height="27" border="0" alt=""></td>

<td><img name="conteudo_r2_c8" src="imagens/conteudo_r2_c8.jpg" width="138" height="27" border="0" alt=""></td>

<td><img name="conteudo_r2_c9" src="imagens/conteudo_r2_c9.jpg" width="90" height="27" border="0" alt=""></td>

<td><img name="conteudo_r2_c10" src="imagens/conteudo_r2_c10.jpg" width="84" height="27" border="0" alt=""></td>

<td><img name="conteudo_r2_c11" src="imagens/conteudo_r2_c11.jpg" width="95" height="27" border="0" alt=""></td>

<td><img name="conteudo_r2_c12" src="imagens/conteudo_r2_c12.jpg" width="5" height="27" border="0" alt=""></td>

<td><img src="imagens/spacer.gif" width="1" height="27" border="0" alt=""></td>

</tr>

<tr>

<td colspan="11" valign="top"><img name="conteudo_r3_c1" src="imagens/conteudo_r3_c1.jpg" width="755" height="12" border="0" alt=""></td>

<td><img name="conteudo_r3_c12" src="imagens/conteudo_r3_c12.jpg" width="5" height="12" border="0" alt=""></td>

<td><img src="imagens/spacer.gif" width="1" height="12" border="0" alt=""></td>

</tr>

<tr>

<td colspan="3" rowspan="2" valign="top" background="imagens/conteudo_r6_c1.jpg"><img name="conteudo_r4_c1" src="imagens/conteudo_r4_c1.jpg" width="204" height="451" border="0" alt=""></td>

<td colspan="2" valign="top"><img name="conteudo_r4_c4" src="imagens/conteudo_r4_c4.jpg" width="41" height="60" border="0" alt=""></td>

<td colspan="6" valign="bottom" background="imagens/conteudo_r4_c6.jpg"><div align="left"></div></td>

<td valign="top"><img name="conteudo_r4_c12" src="imagens/conteudo_r4_c12.jpg" width="5" height="60" border="0" alt=""></td>

<td><img src="imagens/spacer.gif" width="1" height="60" border="0" alt=""></td>

</tr>

<tr>

<td rowspan="2" background="imagens/conteudo_r5_c4.jpg">&nbsp;</td>

<td colspan="7" rowspan="2" background="imagens/conteudo_r5_c5.jpg" valign="top"><div align="center">

<%

cat = request.QueryString("cat")

if cat = "" then

Response.Write "CLIQUE NO MENU POR FAVOR"

end if

%>

<% if cat="machos" then%>

<!-- #include file="machos.asp"-->

<%end if%>

<% if cat="femeas" then%>

<!-- #include file="femeas.asp"-->

<%end if%> </div></td>

<td rowspan="2" background="imagens/conteudo_r5_c12.jpg">&nbsp;</td>

<td><img src="imagens/spacer.gif" width="1" height="391" border="0" alt=""></td>

</tr>

<tr>

<td colspan="3" rowspan="2" background="imagens/conteudo_r6_c1.jpg">&nbsp;</td>

<td><img src="imagens/spacer.gif" width="1" height="29" border="0" alt=""></td>

</tr>

<tr>

<td valign="top"><img name="conteudo_r7_c4" src="imagens/conteudo_r7_c4.jpg" width="14" height="22" border="0" alt=""></td>

<td colspan="7" valign="top"><img src="imagens/conteudo_r7_c5.jpg" alt="" name="conteudo_r7_c5" width="537" height="22" border="0" usemap="#conteudo_r7_c5Map"></td>

<td valign="top" background="imagens/conteudo_r7_c12.jpg">&nbsp;</td>

<td><img src="imagens/spacer.gif" width="1" height="22" border="0" alt=""></td>

</tr>

</table>

</div>

<map name="conteudo_r1_c1Map">

<area shape="rect" coords="2,2,47,38" href="default.asp" alt="Voltar a P&aacute;gina Inicial">

</map>

<map name="conteudo_r7_c5Map">

<area shape="rect" coords="444,1,534,19" href="mailto:rafaelmarciano@oi.com.br" alt="RM Designer -&gt; Criatividade em Busca da Perfei&ccedil;&atilde;o">

</map>

</body>

</html>

Link para o comentário
Compartilhar em outros sites

3 respostass a esta questão

Posts Recomendados

  • 0
.Andreia.

.Andreia.

Postado
Postado 

<%
cat = request.QueryString("cat")
if cat = "" then
Response.Write "CLIQUE NO MENU POR FAVOR"
elseif cat="machos" then
<!-- #include file="machos.asp"-->
<% elseif cat="femeas" then%>
<!-- #include file="femeas.asp"-->
<%end if%>

Se não me engane, não funciona include dentro de IF, mas tenta aí

Link para o comentário
Compartilhar em outros sites
  • 0
bolomaster

bolomaster

Postado
  • Autor
Postado

deu o mesmo erro beleza também tentei com select case

e veja como ficou

<%

cat = request.QueryString("cat")

Select case cat

case ""

Response.Write "CLIQUE NO MENU POR FAVOR"

case "machos"

%>

<!-- #include file="machos.asp"-->

<% case "femeas" %>

<!-- #include file="femeas.asp"-->

<%end select%>

e da sempre o mesmo erro

para ver o link entre em http://www.atenas.edu.br/cpd

e clique na opçao machos no menu, e veja o erro com o select case

Link para o comentário
Compartilhar em outros sites
  • 0
.Andreia.

.Andreia.

Postado
Postado

pra saber se é o include que está interferindo, faz assim:

<%
cat = request.QueryString("cat")
if cat = "" then
 response.write "CLIQUE NO MENU POR FAVOR"
elseif cat="machos" then
 response.write "include macho"
elseif cat="femeas" then
 response.write "include femea"
end if%>

se não deu erro, então são os includes que estão interferindo

Link para o comentário
Compartilhar em outros sites

Participe da discussão

Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.

×
 Share
Ir para lista de Perguntas


  • Estatísticas dos Fóruns

    • Tópicos
      152,1k
    • Posts
      651,8k
×
×
  • Criar Novo...