<% if Request.Form("acao")=delrepre then qqusr="SELECT * FROM T_REPRESENTANTE WHERE IDREPRESENTANTE="&Request.QueryString("item") RSqusr=Conexao.Execute(qqusr) qdel="DELETE FROM T_USR WHERE IDUSR="&RSqusr("IDUSR") Conexao.Execute(qdel) qdel="DELETE FROM T_REPRESENTANTE WHERE IDREPRESENTANTE="&Request.QueryString("item") Conexao.Execute(qdel) Response.Redirect "admrepre.asp" End if %>