Ler Diretório

[tom_batista]

Olá pessoal. Gostaria de saber como ficaria um script em asp para ler um diretório e devolver um html com links para os arquivos pdf que estiverem nesse dir independente do num de arquivos que estiverem lá.

Desde já agradeço a quem puder ajudar....

[cyberalexxx]

é os usar FSO, la no tópico de tutoriais você acha um bom tutorial sobre isso, de qualquer forma segue abaixo um exemplo.

<%
Set FSO = Server.CreateObject("Scripting.FileSystemObject")
Set principal = FSO.GetFolder("c:\intranet") ' coloque a pasta principal
Set arquivos = principal.Files


dim nome
nome=array()
For each arq in arquivos
redim preserve nome(Ubound(nome)+1)
nome(Ubound(nome)) = arq.name
next

CAMINHO=MID(PRINCIPAL,3,LEN(PRINCIPAL)-2)

for x = 0 to Ubound(nome)  
if FSO.GetExtensionName(nome(x)) = "pdf" then
   response.write "<a href="& CAMINHO &"\"& nome(x)& ">"& nome(x) &"</a><br>"
end if
next

%>

[tom_batista]

Grato

[off-topic] - se precisar de plug-ins do SF7 tenho como conseguir alguns...

[ursolouco]

Grato

[off-topic] - se precisar de plug-ins do SF7 tenho como conseguir alguns...

Hãn ?

Serve para ASP isso ae ? Qui tal ser explicito isso ae ?

[cyberalexxx]

Testou o Script?? funcionou?? Posso fechar o tópico??

[cyberalexxx]

Grato

[off-topic] - se precisar de plug-ins do SF7 tenho como conseguir alguns...

Hãn ?

Serve para ASP isso ae ? Qui tal ser explicito isso ae ?

é que ele viu na minha assinatura que eu uso SF7 (Sound Forge 7), não tem nada a ver com ASP não, é Edição de Audio.

T+

[ursolouco]

Grato

[off-topic] - se precisar de plug-ins do SF7 tenho como conseguir alguns...

Hãn ?

Serve para ASP isso ae ? Qui tal ser explicito isso ae ?

é que ele viu na minha assinatura que eu uso SF7 (Sound Forge 7), não tem nada a ver com ASP não, é Edição de Audio.

T+

Ah sim, isso ae, já é pra alucinados, eu ainda não cheguei lá.

Fui...

[cyberalexxx]

Ah sim, isso ae, já é pra alucinados, eu ainda não cheguei lá.

Fui...

É só uma questão de tempo

[tom_batista]

Pessoal.. funcionou... era isso mesmo.... estava esquecendo do FSO - fileSystemObject...

Tks...

[cyberalexxx]

OK!! To fechando o tópico, se precisar reabrir o tópico é so mandar PM para algum moderador.

T+