<%@ LANGUAGE="VBSCRIPT" %> <% sql = "Select * from bo_categoriasgrales where cg_mostrar = 'S' order by cg_descr" Set RSCatGrales = Server.CreateObject("ADODB.RecordSet") RSCatGrales.Open sql, oConn, 1, 1 %> ..:: Ofertisima ::..
www.ofertisima.com
 
 
           
                       
   
1
2
3
4
   
Categoria
Sub Categoría
Carga de Datos
Publicar
  Seleccione la Categoría en la que desea publicar su anuncio:  
 
<% Do While (Not RSCatGrales.EOF) %> <% RSCatGrales.MoveNext Loop %>
 <%=mid(RSCatGrales("cg_contenido"),1,90)&"..."%>  

 
 
www.ofertisima.com