<%
response.expires = 0
if session("verifica") < 1 Then
response.redirect"erro1.asp"
End If%>
<%
'************************************************************************
'** X-CHANGER - Troca de banners - Ano 2002 **
'** **
'** Sistema de troca de banners desenvolvido pela equipe **
'** Scriptmaster em parceria com a Paraná Design **
'**Contatos: **
'** Alexandre Vahldick - alexandre@paranadesign.com **
'** Renato Augusto V. Elias - averanger@scriptmaster.com.br **
'** Robson Campos De Abreu - jago@scriptmaster.com.br **
'**Sites: **
'** http://www.paranadesign.com **
'** http://www.scriptmaster.com.br **
'************************************************************************
%>
<%'Incluimos o config%>
<%'Se o campo deletar for sim ele continua
if request.form("Deletar") = "Sim" then
'aqui ele seleciona o usuario pelo login e senha que esta session e deleta eles e depos os redireciona
conexao.execute( "DELETE FROM membros WHERE seu_login LIKE '"&session("user")&"' and sua_senha LIKE '"&session("pass")&"'")
Response.Redirect ("cadastrar.asp")
'se não e ele for não ele segue
elseif request.form("Deletar2") = "Não" then
Response.Redirect ("administracao.asp")
'se não ele segue e mostra uma página se realmente deseja deletar
else%>
<%=nomedapagina%>