haga CLIC aqui para ver su ORDEN DE COMPRA Ver Carrito de
Proformas

usuarios
conectados
<%=application("vactivos")%>
<% Set conexion = Server.CreateObject("ADODB.Connection") conexion.Open(Conn) set reg_prod=createobject("ADODB.Recordset") SQL="SELECT * FROM producto order by id ASC" reg_prod.open SQL, conexion %>
<% While NOT (reg_prod.EOF) %> <% reg_prod.MoveNext() Wend %>
"> <%=(reg_prod.Fields("catalogo"))%> " target="_parent">»»Haga clic para ver Video
 
 
<% x= Request.QueryString("id") Set conexion = Server.CreateObject("ADODB.Connection") Set Rs=Server.createobject("ADODB.Recordset") conexion.Open(conn) SQL="SELECT * FROM comentario1" Rs.open SQL,conexion,2,3%> <% Rs.AddNew Rs("id_artic")=x Rs("producto")=Request.form("producto") Rs("nombreapellido")=Request.form("nombreapellido") Rs("pais")=Request.form("pais") Rs("correo")=Request.form("correo") Rs("comentarios")=Request.form("comentarios") Rs("fecha")=date Rs("hora")=time Rs.Update numero=Rs("id_comen") Rs.Close %>


GRACIAS POR ESCRIBIR SU COMENTARIO

EN BREVE SU COMENTARIO SERA
ADICIONADO A NUESTRA WEB



 

 

 

 

 
<% 'RsProd.Close() reg_prod.Close() 'Set RsProd = Nothing Set reg_prod = Nothing conexion.close %>