<% If Request("Action") = "Salvar" Then Session("nome") = Request.Form("nome") Session("imgcapa") = Request.Form("imgcapa") Session("aprovado") = Request.Form("aprovado") Response.Redirect "marc_alterar2.asp" End If %> <% Set Conn = Server.CreateObject("ADODB.Connection") BdConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=E:\Domains\antonioautopecas.com.br\db\conteudo.mdb;" conn.Open BdConn sql = "SELECT * FROM produtos_marcas WHERE Codigo = " sql = sql & Request.QueryString("Codigo") Set RS = Conn.Execute(sql) Session("Codigo") = RS("Codigo") %>
Incluir Marca Produto
Listagem

Nome categoria:

" size="70" />

" placeholder="Imagem da capa"/>

Enviar
Selecionar
(tamanho da imagem capa 204 x 204px)

 

Aprovado: "> S / N

 

<% RS.close Conn.close %>