Your browser does not support HTML5 video.
Shoes Net World
  • Empresa
  • Produtos Promoção
  • -
  • Contatos
  • ...
  • Categorias
      <% //------------------------------------------------------- //BLOCO QUE TRAS TABELA (g01t0014 -- Categorias - MENU Ordem Alabetica) vsDES = "" VS_STRING_SQL_SELECT = "SELECT CATEGORIA, DESCRICAO FROM g01t0014 WHERE g01t0014.CNPJ = '" & VS_DocSujei & "' AND g01t0014.CNPJ_RESP = '" & VS_DocSujei & "'GROUP BY g01t0014.CATEGORIA ORDER BY g01t0014.CNPJ, g01t0014.CNPJ_RESP, g01t0014.DESCRICAO, g01t0014.CATEGORIA" iRecCou = 0 Set RS_0014 = Conn.Execute(VS_STRING_SQL_SELECT) DO WHILE NOT RS_0014.EOF iRecCou = iRecCou + 1 vsDES = Trim(RS_0014("DESCRICAO")) %>
    • <%=vsDES%>
        <% //------------------------------------------------------- //BLOCO QUE TRAS TABELA (g01t0015 -- Grupos - MENU Ordem Alabetica) vsDES = "" VS_STRING_SQL_SELECT = "SELECT GRUPO, DESCRICAO FROM g01t0015 WHERE g01t0015.CNPJ = '" & VS_DocSujei & "' AND g01t0015.CNPJ_RESP = '" & VS_DocSujei & "' AND g01t0015.CATEGORIA = '" & RS_0014("CATEGORIA") & "' GROUP BY g01t0015.GRUPO ORDER BY g01t0015.CNPJ, g01t0015.CNPJ_RESP, g01t0015.DESCRICAO, g01t0015.CATEGORIA, g01t0015.GRUPO" iRecCou = 0 Set RS_0015 = Conn.Execute(VS_STRING_SQL_SELECT) DO WHILE NOT RS_0015.EOF iRecCou = iRecCou + 1 vsDES = Trim(RS_0015("DESCRICAO")) %>
      • <%=vsDES%>
          <% //------------------------------------------------------- //BLOCO QUE TRAS TABELA (g01t0015 -- Grupos - MENU Ordem Alabetica) vsDES = "" VS_STRING_SQL_SELECT = "SELECT SUBGRUPO, DESCRICAO FROM g01t0016 WHERE g01t0016.CNPJ = '" & VS_DocSujei & "' AND g01t0016.CNPJ_RESP = '" & VS_DocSujei & "' AND g01t0016.GRUPO = '" & RS_0015("GRUPO") & "' GROUP BY g01t0016.SUBGRUPO ORDER BY g01t0016.CNPJ, g01t0016.CNPJ_RESP, g01t0016.GRUPO, g01t0016.SUBGRUPO" iRecCou = 0 Set RS_0016 = Conn.Execute(VS_STRING_SQL_SELECT) DO WHILE NOT RS_0016.EOF iRecCou = iRecCou + 1 vsDES = Trim(RS_0016("DESCRICAO")) %>
        • ','1','<%=RS_0016("SUBGRUPO")%>','0','0','0','<%=RS_0015("GRUPO")%>')" href="#"><%=vsDES%>
          • <% ' Proximo Registro. RS_0016.MoveNext Loop %>
        • <% ' Proximo Registro. RS_0015.MoveNext Loop %>
      • <% ' Proximo Registro. RS_0014.MoveNext Loop %>
  • Promoção
  • Produtos
  • Catálogos
>
  • ...

  • Empresa

  • Produtos

  • Promoção

  • -

  • Contatos

  • Rede Social Linkedin!
  • Rede Social Facebook!
  • Rede Social Facebook!
  • ...
  • Categorias
      <% //------------------------------------------------------- //BLOCO QUE TRAS TABELA (g01t0014 -- Categorias - MENU Ordem Alabetica) vsDES = "" VS_STRING_SQL_SELECT = "SELECT CATEGORIA, DESCRICAO FROM g01t0014 WHERE g01t0014.CNPJ = '" & VS_DocSujei & "' AND g01t0014.CNPJ_RESP = '" & VS_DocSujei & "'GROUP BY g01t0014.CATEGORIA ORDER BY g01t0014.CNPJ, g01t0014.CNPJ_RESP, g01t0014.DESCRICAO, g01t0014.CATEGORIA" iRecCou = 0 Set RS_0014 = Conn.Execute(VS_STRING_SQL_SELECT) DO WHILE NOT RS_0014.EOF iRecCou = iRecCou + 1 vsDES = Trim(RS_0014("DESCRICAO")) %>
    • <%=vsDES%>
        <% //------------------------------------------------------- //BLOCO QUE TRAS TABELA (g01t0015 -- Grupos - MENU Ordem Alabetica) vsDES = "" VS_STRING_SQL_SELECT = "SELECT GRUPO, DESCRICAO FROM g01t0015 WHERE g01t0015.CNPJ = '" & VS_DocSujei & "' AND g01t0015.CNPJ_RESP = '" & VS_DocSujei & "' AND g01t0015.CATEGORIA = '" & RS_0014("CATEGORIA") & "' GROUP BY g01t0015.GRUPO ORDER BY g01t0015.CNPJ, g01t0015.CNPJ_RESP, g01t0015.DESCRICAO, g01t0015.CATEGORIA, g01t0015.GRUPO" iRecCou = 0 Set RS_0015 = Conn.Execute(VS_STRING_SQL_SELECT) DO WHILE NOT RS_0015.EOF iRecCou = iRecCou + 1 vsDES = Trim(RS_0015("DESCRICAO")) %>
      • <%=vsDES%>
          <% //------------------------------------------------------- //BLOCO QUE TRAS TABELA (g01t0015 -- Grupos - MENU Ordem Alabetica) vsDES = "" VS_STRING_SQL_SELECT = "SELECT SUBGRUPO, DESCRICAO FROM g01t0016 WHERE g01t0016.CNPJ = '" & VS_DocSujei & "' AND g01t0016.CNPJ_RESP = '" & VS_DocSujei & "' AND g01t0016.GRUPO = '" & RS_0015("GRUPO") & "' GROUP BY g01t0016.SUBGRUPO ORDER BY g01t0016.CNPJ, g01t0016.CNPJ_RESP, g01t0016.GRUPO, g01t0016.SUBGRUPO" iRecCou = 0 Set RS_0016 = Conn.Execute(VS_STRING_SQL_SELECT) DO WHILE NOT RS_0016.EOF iRecCou = iRecCou + 1 vsDES = Trim(RS_0016("DESCRICAO")) %>
        • ','1','<%=RS_0016("SUBGRUPO")%>','0','0','0','<%=RS_0015("GRUPO")%>')" href="#"><%=vsDES%>
          • <% ' Proximo Registro. RS_0016.MoveNext Loop %>
        • <% ' Proximo Registro. RS_0015.MoveNext Loop %>
      • <% ' Proximo Registro. RS_0014.MoveNext Loop %>
  • Promoção
  • Produtos
  • Catálogos
>

Fale Conosco

...







...
11 4605-5292

contatosnw@shoesnetworld.com.br

Av. Pres. Kenedy, 80 -
Centro, Caieiras - SP, 07700-060

Rede Social Facebook!
Rede Social Facebook!