<%@ LANGUAGE="VBSCRIPT" %>
<%
cEmail = Request("email")
cClave = Request("clave")
cProact = Request("proact")
cProadm = Request("proadm")
nIdArt = Request("idart")
'nIdContacto = Request("idcontacto")
if cClave = "" and nIdArt <> "" then
cClave = nIdArt
end if
'para saber si marcamos
if cProact <> "" then
cCheckedact = " checked "
else
cCheckedact = ""
end if
'para saber si marcamos
if cProadm <> "" then
cCheckedadm = " checked "
else
cCheckedadm = ""
end if
'si ambos no recibimos ningun parametro entonces marcamos activar por defecto
if cProadm = "" and cProact = "" then
cCheckedact = " checked "
end if
%>
..:: Ofertisima ::..
