<%
if opc = 1 then acao = "Inclusão"
if opc = 2 then acao = "Alteração"
' verifica se alteracao
if opc = 2 then
' pega os dados da categoria
ProdSQL = "SELECT nm_sala, tt_usuarios "_
& "FROM chat_salas "_
& "WHERE (id_sala = " & sala & ") "
set ProdRS = conecta.Execute(ProdSQL)
' seta variaveis
nome_sala = ProdRS("nm_sala" )
usuarios = ProdRS("tt_usuarios")
end if
%>
Ação: <%=acao%>