8 replies to this topic

[fabiano.froes]

eu tenho um diretorio com alguns arquivos de imagem como mostrado abaixo:

123_1.jpg
123_2.jpg
123_3.jpg
124_1.jpg
124_2.jpg

eu preciso mostrar as imagens q tem inicio "123", como faço?

[siola]

<% set fs = Server.CreateObject("Scripting.FileSystemObject")
set f = fs.GetFolder("c:\Inetpub\wwwroot\bb\")
For Each File In f.files
If Left(file.name, 3) = "123" Then
Response.Write file.name & "<br>"
End If
Next
set f = nothing
set fs = nothing %>

[]s

[Worm]

<% set fs = Server.CreateObject("Scripting.FileSystemObject")
set f = fs.GetFolder("c:\Inetpub\wwwroot\bb\")
For Each File In f.files
If Left(file.name, 3) = "123" Then
Response.Write file.name & "<br>"
End If
Next
set f = nothing
set fs = nothing %>

[]s

Tio eu ia sugerir isso, mas dai pintou a duvida.

eas imagens estão com nome de 123, 124 etc. Imagindando que elas sejam sequenciais e começaram do 1. E se pra cada numero ele tenha 20 imagens.

Lêr todas não vai ficar Lento ????

[siola]

Fica, mas eu diria que esse é o preço que se paga por uma falta de estruturação de dados hehe.

Para evitar a lentidão ele poderia separar as imagens com nome diferente em pastas diferentes, ou armazenar os nomes no banco de dados e com uma instrução SQL selecionar somente as que ele quer. Mas ai vai de cada um.

[]s

[Worm]

Fica, mas eu diria que esse é o preço que se paga por uma falta de estruturação de dados hehe.

Para evitar a lentidão ele poderia separar as imagens com nome diferente em pastas diferentes, ou armazenar os nomes no banco de dados e com uma instrução SQL selecionar somente as que ele quer. Mas ai vai de cada um.

[]s

Certo

É que fiquei curioso pra saber como seria feito, se tive-se que mudar.

[fabiano.froes]

Fica, mas eu diria que esse é o preço que se paga por uma falta de estruturação de dados hehe.

Para evitar a lentidão ele poderia separar as imagens com nome diferente em pastas diferentes, ou armazenar os nomes no banco de dados e com uma instrução SQL selecionar somente as que ele quer. Mas ai vai de cada um.

[]s

Certo

É que fiquei curioso pra saber como seria feito, se tive-se que mudar.

meu servidor nao esta aceitando a funcao getfolder()

o q fazer?


Deu certo!
valew!!

[Generation]

meu servidor nao esta aceitando a funcao getfolder()

o q fazer?


Deu certo!
valew!!

Estranho se aceita criar o Objeto FSO...rs, mas no final disse que deu certo ?

[]'s

[fabiano.froes]

esse codigo funciona, mas quando eu selecionar o registro de codigo "12" ira aparecer todas as imagens q começa com "12", incluindo 123_1.jpg, 1234_1.jpg e etc

como eu resolvo isso...???

[Nicholas Pufal]

Tu quer só as com 123 certo?
Então só adiciona um "_" no código e muda de 3 pra 4:

<%
set fs = Server.CreateObject("Scripting.FileSystemObject")
set f = fs.GetFolder("c:\Inetpub\wwwroot\bb\")

For Each File In f.files

If Left(file.name, 4) = "123_" Then
Response.Write file.name & "<br>"
End If

Next

set f = nothing
set fs = nothing
%>

Edição feita por: Firehalk, 05/10/2006, 18:33.