<% set rs = CreateObject("ADODB.Recordset") Set Conn = Server.CreateObject("ADODB.Connection") Conn.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("..\data\liqestoc.mdb")) rs.CursorType = adOpenKeyset 'rs.LockType = adLockOptimistic sqltxt="select * from articles where idArticle='"&Request.QueryString("idarticle")&"' And idfamilia='0010' And marca='"&Request.QueryString("marca")&"'" rs.Open sqltxt,conn %>
Modelo:  <%=RS("idarticle")%>
Descripción: <%=RS("descCAT")%>
Marca: <%=RS("marca")%>

">

Precio: <%=RS("pvp")%>

<%=RS("explica")%>
<% Conn.Close Set Conn = Nothing %>
Imprimir

Cerrar