Localize el producto que desee seleccionando la referencia en la categoría que elija...
LIBROS
ref
Seleccione Una
<% Set MiFSO_2 = Server.CreateObject("Scripting.FileSystemObject") Set MiCarpeta = MiFSO_2.GetFolder(server.mappath("/productos/libros/")) FOR EACH thing in MiCarpeta.Files set Nombre = thing ref_temp=nombre.name tamano=(Len(ref_temp)-4) ref=Mid(ref_temp,1,tamano) %>
"><%=ref%>
<% NEXT Set MiFSO_2 = nothing Set MiArchivo= nothing %>
IMAGEN Y SONIDO
ref
Seleccione Una
<% Set MiFSO_2 = Server.CreateObject("Scripting.FileSystemObject") Set MiCarpeta = MiFSO_2.GetFolder(server.mappath("/productos/electr/")) FOR EACH thing in MiCarpeta.Files set Nombre = thing ref_temp=nombre.name tamano=(Len(ref_temp)-4) ref=Mid(ref_temp,1,tamano) %>
"><%=ref%>
<% NEXT Set MiFSO_2 = nothing Set MiArchivo= nothing %>
FUEGOS
ref
Seleccione Una
<% Set MiFSO_2 = Server.CreateObject("Scripting.FileSystemObject") Set MiCarpeta = MiFSO_2.GetFolder(server.mappath("/productos/fueg/")) FOR EACH thing in MiCarpeta.Files set Nombre = thing ref_temp=nombre.name tamano=(Len(ref_temp)-4) ref=Mid(ref_temp,1,tamano) %>
"><%=ref%>
<% NEXT Set MiFSO_2 = nothing Set MiArchivo= nothing %>
CUBERTEROS
ref
Seleccione Una
<% Set MiFSO_2 = Server.CreateObject("Scripting.FileSystemObject") Set MiCarpeta = MiFSO_2.GetFolder(server.mappath("/productos/cubert/")) FOR EACH thing in MiCarpeta.Files set Nombre = thing ref_temp=nombre.name tamano=(Len(ref_temp)-4) ref=Mid(ref_temp,1,tamano) %>
"><%=ref%>
<% NEXT Set MiFSO_2 = nothing Set MiArchivo= nothing %>
Libros
-
Imagen y Sonido
-
Fuegos
-
Cuberteros
Página Principal
-
Quienes Somos
-
Contactar
-
Buscar