<% '************************************************************************ '** 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 ** '************************************************************************ %> <% response.expires = 0 if session("verifica") < 1 Then response.redirect"erro1.asp" End If 'Recebemos os campos n = replace(Request("n"), "'", "") e = replace(Request("e"), "'", "") b = replace(Request("b"), "'", "") s = replace(Request("s"), "'", "") se = replace(Request("se"), "'", "") t = replace(Request("t"), "'", "") u = replace(Request("user"), "'", "") id = replace(Request("id"), "'", "") 'Atualizamos os banco de dados com os dados dos campos. conexao.Execute("UPDATE membros SET seu_nome='"&n&"',"&_ "seu_email='"&e&"', imagem='"&b&"', site='"&s&"',"&_ "sua_senha='"&se&"', texto='"&t&"' WHERE tc_id LIKE "&id&"") %> <% Response.Redirect ("administracao.asp") %>