taipan

Gente, Taí o log.asp. Espero que seja possível solucionar este "mistério". Obrigado a vocês dois. <!--#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 %>

A todos que responderam o meu muito obrigado! Vou tentar estas leituras.

Sou novato no assunto Tableless (muito novato!). Solicito a quem puder ajudar a indicação de alguma literatura bem básica. agradeço de antemão! -------------------- presidente prudente maçonaria prudente

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 abaix 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 alguém aqui possa me orientar para que consiga uma solução. Obrigado a quem der palpites! ------------------------ presidente prudente maçonaria prudente