<% num_registros = 3 If Int(Request.QueryString("txtPagina")) = 0 Then txtPagina = 1 Else txtPagina = Int(Request.QueryString("txtPagina")) End If set ObjCliente = new TBCliente ObjCliente.OpenTabla %> Extensiones de Cabello y extensiones de Pelo natural - Clientes
 
 
Clientes que ya han preferido nuestras prestigiadas marcas GLAMOROUS Extensiones de cabellos y LOVELY Extensiones de cabellos
<% if ObjCliente.rs.recordcount=0 then%> <% else ObjCliente.rs.PageSize = num_registros ObjCliente.rs.AbsolutePage = txtPagina%> <%do while not ObjCliente.rs.eof And Registro < Num_Registros%> <% registro=registro+1 ObjCliente.rs.movenext loop end if %>
No hay Clientes Ingresados
<%=mid(ObjCliente.rs("direccion"),1,100)%>
<%=ObjCliente.rs("nombre")%>
<%=ObjCliente.rs("fono")%>
<% i=0 While i < ObjCliente.RS.PageCount i=i+1 %> <%=i%> <% Wend %>