Código PHP:
dim objFSO, objF,objF2,objF3, objFC, objFC2,objFC3 , poble, allotjament, masia, imatge
dim f1, w, h, c, strType, mostranom
dim quina_carpeta
quina_carpeta = request.QueryString("carpeta")
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objF = objFSO.GetFolder(Server.MapPath("imatges/seccions/poble/"))
Set objF2 = objFSO.GetFolder(Server.MapPath("imatges/seccions/allotjament/"))
Set objF3 = objFSO.GetFolder(Server.MapPath("imatges/seccions/masia/"))
Set objFC = objF.Files
Set objFC2 = objF2.Files
Set objFC3 = objF3.Files
For Each f1 in objFC
if instr(ucase(f1.Name), ".JPG") or instr(ucase(f1.Name), ".GIF") or instr(ucase(f1.Name), ".PNG")then
poble="'imatges/seccions/"&f1.Name&"'<br>"
end if
Next
de esta manera 'imatges/seccions/imagenpueblo.jpg' ' imatges/seccions/piscina.gif'' imatges/seccions/entrada.jpg
lo he intentado de esta manera pero no me funciona
i que despues yo con solo llamar a la variable <%=poble%> me las pinte en un lugar determinado
alguien sabe?
gracias