
PK 
<!--#include file="includes/openconn.asp" -->
<%dim cantx
for a = 0 to 300
session("sss_iditem" & a)=""
session("sss_precio" & a)=""
session("sss_preciomin" & a)=""
session("sss_preciocompra" & a)=""
session("sss_cantidad" & a)=""
next
rs.open "SELECT * FROM Q_articulos WHERE art_publicado = true ORDER BY idseccion, cat_nombre, art_nombre",conn,3,1
rs.movefirst
a = 0
do until rs.EOF
cantx = 0
if rs("art_ventaunitaria") AND request("item_" & rs("idarticulo") & "_u") <> "" then cantx = cantx + cint(request("item_" & rs("idarticulo") & "_u"))
if rs("art_unidadespc") > 0 AND request("item_" & rs("idarticulo") & "_c") <> "" then cantx = cantx + cint(request("item_" & rs("idarticulo") & "_c") * rs("art_unidadespc"))
if cantx > 0 then
session("sss_iditem" & a)=rs("idarticulo")
if rs("art_precio_may") > 0 then
session("sss_precio" & a) = rs("art_precio_may")
session("sss_preciomin" & a) = rs("art_precio")
session("sss_preciocompra" & a)=request("item_" & rs("idarticulo") & "_compra")
else
session("sss_precio" & a) = 0
session("sss_preciomin" & a) = 0
session("sss_preciocompra" & a)= request("item_" & rs("idarticulo") & "_compra")
end if
session("sss_cantidad" & a)=cantx
a = a + 1
end if
rs.movenext
loop
rs.close
conn.close
Response.Redirect("comprarapida_ver.asp")%>


PK 99