0

Segue o código abaixo

Mesmo que os itens do id existam ... passa direto e só mostra o valor da variavel3

O que estou fazendo de errado ?

<%
variavel1 = LCase(Request.ServerVariables("URL")) 
variavel2 = LCase(Request.ServerVariables("QUERY_STRING"))
variavel3 = "SEM TÍTULO AINDA | ConteudoAnimal.com.br"

select case variavel1
  case "/"
    response.write ("Informações e Noticias sobre: cachorros, gatos, cavalos, pássaros, peixes e muito mais")

  case "/default.asp"
    response.write ("Informações e Noticias sobre: cachorros, gatos, cavalos, pássaros, peixes e muito mais")

  case else
    set rs=conn.execute("select title from paginastitulodescricao where lcase(url) like CONCAT("%",variavel2,"%")")

    if not rs.EOF then
      response.write rs("title")
    else
      set rs=conn.execute("select title from paginastitulodescricao where lcase(url) like CONCAT("%",variavel1,"%")")
      response.write rs("title")
   end if

   if rs.EOF then
     response.write variavel3
   end if 

End Select
response.write("| ConteudoAnimal.com.br")
%>

1 Resposta 1

0

O erro ocorre ao tratar o recordset, faltou colocar tambem "& XX &" na querie para chamar o conteúdo da variável

<%'@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ SEU CÓDIGO
variavel1 = LCase(Request.ServerVariables("URL")) 
variavel2 = LCase(Request.ServerVariables("QUERY_STRING")) 
variavel3 = "SEM TÍTULO AINDA | ConteudoAnimal.com.br"

select case variavel1 
    case "/" 
        response.write ("Informações e Noticias sobre: cachorros, gatos, cavalos, pássaros, peixes e muito mais")

    case "/default.asp" 
        response.write ("Informações e Noticias sobre: cachorros, gatos, cavalos, pássaros, peixes e muito mais")

    case else 
        set rs=conn.execute("select title from paginastitulodescricao where lcase(url) like CONCAT("%",variavel2,"%")") 
        if not rs.EOF then 
            response.write rs("title") 
        else 
            set rs=conn.execute("select title from paginastitulodescricao where lcase(url) like CONCAT("%",variavel1,"%")") 
            response.write rs("title") 
        end if 
        if rs.EOF then 
            response.write variavel3 
        end if
End Select 

response.write("| ConteudoAnimal.com.br")

'@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ ERRO

'o select case está correto o erro está no if|else do recordset
' Exemplo
'set rs = conn.execute(sql)
'if not rs.eof then     @@@ recupera tudo que encontrou na querie
'else                   @@@ o else é como "elseif rs.eof then" somente para este caso, logo não se faz necessário
' o erro ocorre exibindo a variavel3, pois por duas vezes é retornado "if rs.eof then", eu refiz teu código verifique se ajuda

variavel1 = LCase(Request.ServerVariables("URL")) 
variavel2 = LCase(Request.ServerVariables("QUERY_STRING")) 
variavel3 = "SEM TÍTULO AINDA | ConteudoAnimal.com.br"

select case variavel1 
    case "/" 
        response.write ("Informações e Noticias sobre: cachorros, gatos, cavalos, pássaros, peixes e muito mais")
    case "/default.asp" 
        response.write ("Informações e Noticias sobre: cachorros, gatos, cavalos, pássaros, peixes e muito mais")
    case else 
        sql = "select title from paginastitulodescricao where lcase(url) like CONCAT('%',"& variavel2 &",'%')"
        set rs=conn.execute(sql) 
        if not rs.EOF then 
            response.write rs("title") 
        else 
            set rs2=conn.execute("select title from paginastitulodescricao where lcase(url) like CONCAT('%',"& variavel1 &",'%')") 
            if not rs2.eof then
                response.write rs2("title") 
            else
                response.write variavel3 
            end if
        end if 
End Select 

response.write("| ConteudoAnimal.com.br")

%>
1
  • obrigado pela atenção ... problema resolvido ! Commented 24/04/2018 às 11:24

Você deve fazer log-in para responder a esta pergunta.

Esta não é a resposta que você está procurando? Pesquise outras perguntas com a tag .