|
....................................................................................................
|
<%
f_codigo = request ("codigo")
f_codigo = Replace(f_codigo, "'", "")
if f_codigo = "" then
queryselregra = "SELECT * FROM regra WHERE reg_descricao_pt <> '' ORDER BY reg_codigo DESC"
set i_query = Conexao.Execute(queryselregra)
do while not i_query.eof
%>
| |
"> <%=i_query("reg_nome")%> |
<% i_query.movenext
loop
else
queryselregra = "SELECT TOP 1 * FROM regra WHERE reg_codigo ="&f_codigo
set i_query = Conexao.Execute(queryselregra)
%>
| |
<%=i_query("reg_nome")%> |
|
|
<%=replace(i_query("reg_descricao_pt"), chr(13), "
")%>
«
voltar
<% end if
%>
|
|
|
