<% paginaactual=mid(request.servervariables("PATH_TRANSLATED"),instrrev(request.servervariables("PATH_TRANSLATED"),"\")+1) FUNCTION setclass(seccion,paginaactual) IF (seccion=paginaactual) THEN setclass="s" ELSE setclass="" END IF END FUNCTION IF request("lonidcategoria")<>"" THEN lonidcategoria=request("lonidcategoria") sql="SELECT * FROM bti_categorias WHERE lonidcategoria=" & lonidcategoria SET rscat=conn.EXECUTE(sql) lonidcategoria00=rscat.fields("lonidcategoria00") lonidcategoria01=rscat.fields("lonidcategoria01") lonidcategoria02=rscat.fields("lonidcategoria02") lonidcontenido=rscat.fields("lonidcontenido") booshow00=rscat.fields("booshow00") booshow01=rscat.fields("booshow01") booshow02=rscat.fields("booshow02") booshow03=rscat.fields("booshow03") booshow04=rscat.fields("booshow04") ELSE lonidcategoria=0 lonidcategoria00=0 lonidcategoria01=0 lonidcategoria02=0 lonidcontenido=1 booshow00=1 booshow01=1 booshow02=1 booshow03=1 booshow04=0 END IF sql="SELECT strtitulo, strimagen00, strimagen01, strcontenido00 FROM bti_contenidos WHERE lonidcontenido=" & lonidcontenido SET rscont=conn.EXECUTE(sql) sqlcont="SELECT strcontenido01 FROM bti_contenidos2 WHERE lonidcontenido=" & lonidcontenido %> BTicino
   CONOCE BTICINO    EVENTOS    BTSERVICE    PRODUCTOS Y SOLUCIONES
DOCUMENTOS
<%IF rscont.fields("strimagen00")="" THEN%><%ELSE%><%END IF%>  
 
 
3 Lista de Precios BTICINO.

Vigente a partir del 1 de Noviembre de 2008.

2 Lista de Precios GENERAL.
1 Lista de Precios SISTEMAS DE CANALIZACIÓN.

 
   

<% response.flush() SET rscont2=conn.EXECUTE(sqlcont) IF NOT rscont2.EOF THEN %>

 

<%=rscont2.fields("strcontenido01")%>
<% END IF %>



<% IF (lonidcategoria00<>0) THEN IF (lonidcategoria00<>0) AND (lonidcategoria01=0) AND (lonidcategoria02=0) THEN mcat=lonidcategoria END IF IF (lonidcategoria00<>0) AND (lonidcategoria01<>0) AND (lonidcategoria02=0) THEN mcat=lonidcategoria00 END IF IF (lonidcategoria00<>0) AND (lonidcategoria01<>0) AND (lonidcategoria02<>0) THEN mcat=lonidcategoria01 END IF sql="SELECT lonidcategoria, strnombre, lonidcontenido FROM bti_categorias WHERE lonidcategoria00=" & mcat SET rscat=conn.EXECUTE(sql) %> <% WHILE NOT rscat.EOF sql="SELECT COUNT(lonidcategoria) FROM bti_categorias WHERE lonidcategoria00=" & rscat.fields("lonidcategoria") SET rscat2=conn.EXECUTE(sql) IF rscat2.fields(0)>=1 THEN sql="SELECT lonidcategoria FROM bti_categorias WHERE lonidcategoria00=" & rscat.fields("lonidcategoria") SET rscat2=conn.EXECUTE(sql) link="productos.asp?lonidcategoria=" & rscat2.fields("lonidcategoria") ELSE link="#" END IF %> <% rscat.MOVENEXT WEND %>
   
<% END IF %>
<% IF NOT booshow04 THEN %> <% IF booshow00 THEN %> <% END IF %> <% IF booshow01 THEN %> <% END IF %> <% IF booshow02 THEN %> <% END IF %> <% IF booshow03 THEN %> <% END IF %> <% IF (CLNG(lonidcategoria)=7) OR (CLNG(lonidcategoria00)=7) OR (CLNG(lonidcategoria01)=7) OR (CLNG(lonidcategoria02)=7) THEN %> <% END IF %>
 
   
 
 
 
   
<% ELSE %>
   
   
   
<% END IF %>
Home   Mapa   Contáctanos

 

Términos y condiciones de uso