<% if request("link") = "ver" then set cp = conexao.execute("SELECT * FROM cupom") %>

VEJA ABAIXO TODOS OS CUPONS DE DESCONTO

<%if request("mensagem") <> "" then%>

<%=request("mensagem")%>

<%end if%> <%if cp.eof or cp.bof then%> Desculpe, não foi encontrado nenhum cupom de desconto em sua loja virtual. <%else%>

Os seguintes cupons descontos foram localizados:

<%while not cp.eof%> <%cp.movenext wend%>
DATA
CODIGO
VALOR
TIPO
UTILIZADO
 AÇÃO
 <%=cp("data")%>
 <%=cp("codigo")%>  <%=cp("valor")%>  <%=cp("tipo")%>  <%=cp("utilizado")%> ">Editar | ();">Excluir

<%end if%>

<% elseif request("link") = "novo" then codigo = cupom(10) %>

CADASTRAR CUPONS DE DESCONTO

<%if request("mensagem") <> "" then%>

<%=request("mensagem")%>

<%end if%>
Data de Cadastro:
 <%=date%>

Código do Cupom:
Valor do Desconto:
R$
   
   
<% elseif request("link") = "editar" then set ce = conexao.execute("SELECT * FROM cupom WHERE id="&request("id")&"") %>

EDITAR OS CUPONS DE DESCONTO

<%if request("mensagem") <> "" then%>

<%=request("mensagem")%>

<%end if%> <%if ce.eof or ce.bof then%> O Cupom informado não foi localizado! <%else%>
Data de Cadastro:
 <%=ce("data")%> ">

Código do Cupom:

 <%=ce("codigo")%>
Valor do Desconto:
" size="5"> em > % ou > R$
   
   
<%end if%>
<% END IF %>

EDITAR OS CUPONS DE DESCONTO

Veja todos os cumpons descontos Cadastre um novo cupom de desconto
Com esta opção você poderá ver todos os cupons de descontos editá-los excluí-los etc... Com esta opção você poderá cadastrar novos cupons de descontos e enviá-los aos seus clientes.