Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

taipan

Link quebrado que não é quebrado?!

Recommended Posts

Tenho um site em Asp, confeccionado por um WebDesign "profissional". Ocorre um problema com ele. Embora os engenhos de busca consigam indexar todo o conteúdo do site, ao se clicar nos links obtidos nas buscas obtem-se aquela mensagem: "A página não pode ser exibida". Veja o exemplo do link abaixo:

 

http://www.lucrativa.com.br/index.asp?id=11768

 

Acontece que trafegando por dentro do site é possível chegar a esta mesma página sem problemas.

 

Já reclamei com o desenvolvedor, há mais de um mês. Acho que ele não sabe como resolver.

 

Espero que alguem aqui possa me orientar para que consiga uma solução.

 

Obrigado a quem der palpites! http://forum.imasters.com.br/public/style_emoticons/default/joia.gif

 

 

 

--------------------

presidente prudente

maçonaria

prudente

Compartilhar este post


Link para o post
Compartilhar em outros sites

Ele está trazendo um Registro que nam existe!

 

você deve validar antes de mostrar o registro na tela!

Posta a linha 17 para que possomos ver!

 

No caso é algo assim:

ASP

[*]

 

[*]if SeuRecordSet.eof true then

 

[*]Response.write("Nada")

 

[*]Else

 

[*]Seu Conteudo.........

 

[*]End if

Compartilhar este post


Link para o post
Compartilhar em outros sites

Ele está trazendo um Registro que nam existe!

 

você deve validar antes de mostrar o registro na tela!

Posta a linha 17 para que possomos ver!

 

No caso é algo assim:

ASP

[*]if SeuRecordSet.eof true then<br />Response.write("Nada")<br />Else<br />Seu Conteudo.........<br />End if

<{POST_SNAPBACK}>

Amigo sou totalmente leigo e como leigo estou perdido. Onde devo procurar tal coisa?

 

Por favor me dê uma Luz.

Compartilhar este post


Link para o post
Compartilhar em outros sites

Vai aí o código todo da log.asp:

 

ASP

[*]<!--#include file="conexao.asp"-->

 

[*]<%

 

[*]id request.QueryString("id")

 

[*]pagina request.ServerVariables("URL")

 

[*]

 

[*]'vDateTime Day(Date) & "/" & Month (Date) & "/" & Year (date) & " " & Time

 

[*]vDateTime = Now

 

[*]

 

[*]if id "" then

 

[*] ip request.ServerVariables("REMOTE_ADDR")

 

[*] conexao.execute("insert into acessos (ip_ace) values ('"&ip&"') ")

 

[*] set rsID conexao.execute("select top 1 cod_ace from acessos where ip_ace = '"&ip&"' order by cod_ace desc")

 

[*] id rsID("cod_ace")

 

[*] conexao.execute("insert into paginas (cod_ace, nome_pag, in_pag) values ("&id&", '"&pagina&"', '"&vDateTime&"')")

 

[*]else

 

[*] set rsCod conexao.execute("select top 1 cod_pag, in_pag from paginas where cod_ace = "&id&" order by cod_pag desc")

 

[*] cod rsCod("cod_pag")

 

[*] segundos datediff("s"rsCod("in_pag"), now)

 

[*]

 

[*]

 

[*] conexao.execute("update paginas set time_pag = "&segundos&" where cod_pag ="&cod)

 

[*] conexao.execute("insert into paginas (cod_ace, nome_pag, in_pag) values ("&id&", '"&pagina&"', '"&vDateTime&"')")

 

[*] Set rsPesq conexao.execute("select * from paginas where cod_pag ="&cod)

 

[*] vPagina = rsPesq ("nome_pag")

 

[*] Set rsPesq conexao.execute("select * from manutencoes where pagina = '"& vPagina & "'")

 

[*] 

 

[*] vPagConf "/perguntasfrequentes-resp.asp"

 

[*] vPagConf2 "/sites/lucrativa/perguntasfrequentes-resp.asp"

 

[*] 

 

[*] vPagSol "/solucoes3.asp"

 

[*] vPagSol2 "/sites/lucrativa/solucoes3.asp"

 

[*]

 

[*] vPergunta = Session ("Pergunta")

 

[*] vSol = Session ("Solucao")

 

[*] 

 

[*]  IF vPagina = vPagConf or vPagina = vPagConf2 THEN 

 

[*] conexao.execute("insert into acessosperguntas (cod_ace, pergunta, in_pag, time_pag) values ("&id&", '"&vpergunta&"', '"&vDateTime&"',"&segundos&")")

 

[*]  END IF 

 

[*]  

 

[*]

 

[*]  

 

[*]  IF vPagina = vPagSol or vPagina = vPagSol2 THEN 

 

[*] conexao.execute("insert into acessossolucoes (cod_ace, pergunta, in_pag, time_pag) values ("&id&", '"&vsol&"', '"&vDateTime&"',"&segundos&")")

 

[*]  END IF

 

[*]  

 

[*]  

 

[*]  IF rsPesq.EOF TRUE THEN 

 

[*] vNum = 1

 

[*] conexao.execute("insert into manutencoes (pagina, manutencoes) values ('"&vPagina&"', "&vNum&")")

 

[*]  ELSE  

 

[*]  vNum = rsPesq ("manutencoes") + 1

 

[*]  conexao.execute("update manutencoes set manutencoes = "&vnum&" where pagina ='"&vPagina&"'")

 

[*]  END IF 

 

[*]  

 

[*]end if

 

[*]'conexao.close

 

[*]%>

Compartilhar este post


Link para o post
Compartilhar em outros sites

Solução rápida:Edita a página "index.asp" e retira a linha:<!--#include file="log.asp"-->Aí testa e vê se funciona....

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.