<% if Request.QueryString("acao")="delven" then qdel="DELETE FROM T_USR WHERE IDUSR="&Request.Form("IDUSR") Conexao.Execute(qdel) qdel="DELETE FROM T_VENDEDOR WHERE IDUSR="&Request.Form("IDUSR") Conexao.Execute(qdel) Response.Redirect "reprevend.asp" End if if Request.QueryString("acao")="confirmacao" then %> Credilon
">
Você tem certeza que deseja remover este vendedor?
Não
<% End if 'IF da Confirmação' %>