- Fórum WMO
- → ecbert's Content
ecbert's Content
There have been 87 items by ecbert (Search limited from 20/04/2023)
#87502 Botão Backward Do Navegador...urgente
Posted by ecbert on 29/04/2003, 09:21 in ASP
Tenho um site que trabalha com login e níveis de acesso. Acontece que existe uma página dentro do site que abre arquivos de um diretório. Depois que dou logout, se eu usar o Back do navegador ...ainda consigo entrar nesses arquivos- o que não poderia ocorrer.
No logout eu deixo a chamada tanto para a intranet quanto para o login.
Existe uma maneira de fazer com que ao clicar no back, o usuário não entre nas páginas em que estava e sim no login ou intranet .....ou seja, limpe todo o conteúdo do site automaticamente?
Preciso disso com certa urgência... Se alguém puder me ajudar, agradeço.
#87532 Botão Backward Do Navegador...urgente
Posted by ecbert on 29/04/2003, 10:17 in ASP
meu logout dá a opção tanto para logar novamente ou voltar para intranet... Mesmo redirecionando para a Intranet (por exemplo) quando dou logout se voltar pelo back....acabo caindo nessa página e ainda consigo abrir os arquivos....
Já coloquei a restrição nela, mas acontece que os pdf que estão sendo abertos vem de um banco .... Não sei se vcs me entenderam...
#87584 Botão Backward Do Navegador...urgente
Posted by ecbert on 29/04/2003, 11:32 in ASP
documento.asp?cod=1
documento.asp?cod=2...etc
e tenho a pagina documento.asp que abre o banco e mostra arquivos de um diretório conforme foram cadastrados com seu nome, código, e path...
Na página documento.asp tenho a restrição
response.expires=0
if session(acesso)=false then
response.redirect("invalido.asp")
Dei logout, e voltei pelo back...caí na mesma página de antes, ou seja: a documento.asp que é montada pela página x...
Então eu posso continuar abrindo os arquivos listados mesmo que não esteja logado. É isso que não posso deixar acontecer porque são arquivos controlados. Já tentei fazer o logout redirecionando de volta para a intranet...mas se eu volto no back e a página estava carregada antes, eu consigo abrir os arquivos. Será que teria alguma coisa a fazer no código que se refere ao banco?
A página X monta o seguinte documento.asp:
<!--#include file="conecta2.inc"-->
<%
AbreConexao
Dim rs 'Recordset
Set rs = Server.CreateObject("ADODB.Recordset")
Set rs = conexao.Execute("SELECT * FROM CnDocumento" _
& " Where DescSubEtapa='" & request.querystring("descsubetapa") & "'" _
& " Order by DescTipoDocumento, IdDocumento")
%>
<%
Do While Not rs.EOF
%>
<%= rs.Fields("iddocumento").Value %>
<%= rs.Fields("descdocumento").Value %>
<a href="<%=rs.Fields("localizacao").Value & "\" & rs.Fields("NomeArquivo").Value%>" target="_blank"><img border="0" src="gifs/ver.gif" alt="Visualizar"></a></font></p>
<%
rs.MoveNext
Loop
%>
<%
rs.Close
Set rs = Nothing
conexao.Close
Set conexao = Nothing
%>
Se puderem me dar outra dica, agradeço de montão...
#88127 Urgente... Proteger Páginas Com Pdf
Posted by ecbert on 30/04/2003, 07:41 in ASP
Esses arquivos são pdf e como tal abrem o acrobat no browser.
Acontece que não consigo proteger esse arquivo, ou seja, coloquei restrições no site todo, mas quando dou logout e volto a essa página eu posso abrir o link para visualização desse pdf normalmente (<%=rs.Fields("localizacao").Value & rs.Fields("NomeArquivo").Value%>)...
O que eu gostaria de saber? Existe uma maneira de colocar a restrição nesse link para o arquivo para que quando o sistema for desligado ela retorne a página como "Você não está logado" ou no meu caso que ele redirecionasse para a página invalido.asp....
Tentei limpar o cache depois do logout, mas não deu certo justamente por causa dessa página do arquivo pdf. Ele redireciona todas as páginas para o invalido.asp, menos a que abre pelo acrobat.
Preciso muito achar uma maneira de proteger esses arquivos, mas não estou sabendo como.
Obrigada desde já.
#88322 Como Fazer Isto?
Posted by ecbert on 30/04/2003, 13:41 in ASP
Vc cria duas páginas ...uma que vai passar e outra que vai receber os parâmetros...
Por exemplo:
página download.asp tem os links:
Freeware, Shareware, etc. Esses links direcionam para uma unica página que irá receber como parâmetro a categoria do download e montar uma lista com os arquivos....
Supondo-se que a página que monta a listagem chame-se montadownload.asp... é mais ou menos assim que fica a chamada na download.asp:
<a href="montadownload.asp?cat="freeware">Freeware<a>
<a href="montadownload.asp?cat="shareware">Shareware<a>
aí na montadownload.asp o código fica mais ou menos assim:
Dim rs 'Recordset
Set rs = Server.CreateObject("ADODB.Recordset")
Set rs = conexao.Execute("SELECT * FROM tabela" _
& " Where cat='" & request.querystring "cat") & "'")
<%
Do While Not rs.EOF
%>
<p><%= rs.Fields("categoria").Value %></P>
<p><%= rs.Fields("nomeArquivo").Value %></P> blá blá blá
<%
rs.MoveNext
Loop
%>
<% rs.Close
Set rs = Nothing
conexao.Close
Set conexao = Nothing
%>
Espero tê-lo ajudado, se é essa a dúvida, já passei apuros pra entender ...
Qualquer coisa estamos aí...
#92906 Erro 80004005
Posted by ecbert on 06/05/2003, 08:47 in ASP
Tenho o arquivo include de conexão que está na raiz... Ele aponta para o banco que está dentro um diretório /banco/bd.mdb...
A página que está dando o erro está num outro diretório e usa o
include virtual="/nomeraiz/conecta.inc" (que aponta para o banco /banco/bd.mdb)
Será que o erro que está dando é por causa dessa estrutura? :light:
Não sei se entenderam...se alguém souber ... valeu!
#93520 O Qe Preciso Ter No Pc Para Programar Um Site Todo
Posted by ecbert on 07/05/2003, 08:04 in ASP
Você pode aprender bastante em sites, baixando códigos prontos, entrando em fóruns, mas a princípio, seria bom vc estudar um pouco do asp e como usar os seus objetos...etc......
Quer uma dica?
No site WebAula tem um curso de asp bem legal, é gratuito e vc pode acessar na hora que puder... Acho que valeu a pena fazê-lo... Por que não tenta?
Qualquer coisa é só chamar.
Até.
#93524 Excluir
Posted by ecbert on 07/05/2003, 08:21 in ASP
É uma tabela montada com os registros da tabela e no canto tem um botão que é para excluir o registro caso o administrador queira.
Alguém poderia me ajudar a montar esse excluir.asp dessa forma?
Quero que esse botão pegue os campos mostrados pelo recordset e os apague da tabela, atualizando a página...
Já tentei fazer, mas deu erro sobre erro sobre erro...e eu tenho um pouco de pressa para terminar esse cadastro.
Obrigada e até...
#94160 Ordenar Artista E Musica Ao Mesmo Tempo
Posted by ecbert on 08/05/2003, 07:27 in ASP
sql = "select * from Letras where " & request.querystring("tipo") & " like '" & request.querystring("palavra") & "%' order by Artista, musica"
...não sei se é música ou letra ou qual o nome desse campo na tabela...
Bom trabalho! :ok:
#94811 Sistema De Autenticação...
Posted by ecbert on 09/05/2003, 08:01 in ASP
Uma idéia seria vc fazer um login com essa autenticação e depois lançar uma página de consulta com os projetos em andamento... O cliente "clica" e é redirecionado para o projeto.
Tente montar a autenticação primeiro... Se não conseguir com os códigos que tem lá post novamente... A gente tenta de outra maneira ok?
Até mais e boa sorte.
#99084 Dúvida Sobre Links
Posted by ecbert on 15/05/2003, 09:31 in ASP
<%= rs.Fields("descatividade").Value %>
Bom até aí tudo bem, ele mostra corretamente....Agora....minha dúvida é que não estou conseguindo fazer um link para a linha acima...
Eu queria fazer com que cada field mostrado linkasse com uma página que é um menu para cada atividade... para isso tentei fazer o seguinte:
<a href= "montamenu.asp?descatividade=<%= rs.Fields("descatividade").Value %>"></a>
só que não mostra mais nada na tela... onde está errado? :light:
Vocês entenderam minha explicação?
Obrigada e até...
#102923 Mostrar Registros De Forma Diferente
Posted by ecbert on 21/05/2003, 07:54 in ASP
Como faço para listar esses equipamentos lado a lado na página colocando a imagem acima e a descrição abaixo ou a imagem e descrição lado a lado...
Tem jeito não tem?
#103463 Alguém Já Viu Um Script Assim?
Posted by ecbert on 22/05/2003, 07:44 in ASP
então vamos ao form DigitaCep.asp:
<html> <head> <title>Pesquisa de revendedores</title> </head> <body> <form method="POST" action="BuscaCep.asp"> <p>Digite seu cep</p> <p> <input type="text" name="txtcep" size="20"> <input type="submit" value="Busca" name="btEnviar"> </p> </form> </body> </html>
Agora o arquivo de conexão com seu bd:
<% 'Variáveis Dim StrCon 'String de conexão Dim Conexao 'Objeto de conexão Set Conexao = CreateObject("ADODB.CONNECTION") Strcon ="DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & server.MapPath("nome do banco.mdb") Sub AbreConexao() Conexao.Open Strcon end sub Sub FechaConexao() Conexao.close end sub %>
E agora o arquivo BuscaRevendedor.asp:
<html> <head> <title>Lista revendedores</title> <!--aqui o include do arquivo de conexão com o banco> <!--#include virtual="/raiz do site/conecta.inc"--> <% AbreConexao Dim rs 'Recordset '//Montamos aqui o recordset que irá receber os valores do banco Set rs = Server.CreateObject("ADODB.Recordset") Set rs = conexao.Execute("SELECT * from Revendedores" _ & " Where cep= '"& request.form("txtCep") & "'") %> <p> <% if rs.eof then Response.write("Não existem revendedores para este cep.") %> </p> <%else%> <% Do While Not rs.EOF %> <p><%=rs.Fields("Cep").Value%></p> <p><%=rs.Fields("NomeRevendedor").Value%></p> <p><%=rs.Fields("EndRevendedor").Value%></p> <p>etc...</p> <% '//Fecha o Loop rs.MoveNext Loop '//Fecha o recordset e libera os objetos rs.Close Set rs = Nothing conexao.Close Set conexao = Nothing %> <%end if%> </html>
Não tive tempo de testar o buscaRevendedor.asp ok? Se tiver alguma falha pessoal, por favor, corrijam ok?
Espero que te ajude...
Até mais
- Fórum WMO
- → ecbert's Content
- Privacy Policy
- Regras ·