|

|
<%
f_codigo = request ("codigo")
f_codigo = Replace(f_codigo, "'", "")
if f_codigo = "" then
queryselbon = "SELECT * FROM bonus ORDER BY bon_codigo DESC"
set i_query = Conexao.Execute(queryselbon)
do while not i_query.eof
%>
| |
|
"> <%=i_query("bon_nome")%> |
<% i_query.movenext
loop
else
queryselregra = "SELECT * FROM bonus WHERE bon_codigo ="&f_codigo
set i_query = Conexao.Execute(queryselregra)
%>
| |
|
" target="bon"> <%=i_query("bon_nome")%> |
|
|
<%=replace(i_query("bon_bonus"), chr(13), " ")%>
«
voltar
<% end if
%>
|
|
|