Ir para conteúdo
Fórum Script Brasil
  • 0

Listar Arquivos Numa Pasta Com Link


Guest - Skywolker -

Pergunta

Guest - Skywolker -

Pessoal é o seguinte estou vendo se consigo criar uma página que me mostre o conteudo de uma determinada pasta, e liste o conteudo com links, fiz um código com uma ajuda mas não consegui dai resolvi aperriar vocês. abaixo segue o código está listando mas não linka

<html>

<head>

<link href="../style.css" rel="stylesheet" type="text/css">

<title>Upload/delete images</title>

</head>

<body>

lista aquivos em dir, com links

<table width=400 align="center" cellpadding="0" cellspacing="0" class="ruta">

<tr>

<td class="rubrik"> <font size="2" face="verdana">Upload image</font></td>

<td class="rubrik">&nbsp;</td>

<td class="rubrik"><font size="2" face="verdana"><a href="../default.asp">Menu

</a></font></td>

</tr>

<tr>

<td colspan=3><hr size=1 color=#000000></td>

</tr>

<tr>

<td width=60%><b>File name</b></td>

<td width=40%><div align="right"><strong>File size</strong></div></td>

<td width=40%>&nbsp;</td>

</tr>

<tr>

<td><a href="<%

Set fso=Server.createobject("Scripting.FileSystemObject")

Set pasta=fso.GetFolder("C:\teste")

Set arquivos=pasta.Files

for each arquivo in arquivos

response.write arquivo.name & "<br>"

next

%>

</a></td>

</tr>

</table>

</body>

</html>

Link para o comentário
Compartilhar em outros sites

3 respostass a esta questão

Posts Recomendados

  • 0

ai é so HTML!!

Basta colocar a tag <a> no seu script:

<html>

<head>

<link href="../style.css" rel="stylesheet" type="text/css">

<title>Upload/delete images</title>

</head>

<body>

lista aquivos em dir, com links

<table width=400 align="center" cellpadding="0" cellspacing="0" class="ruta">

<tr>

<td class="rubrik"> <font size="2" face="verdana">Upload image</font></td>

<td class="rubrik">&nbsp;</td>

<td class="rubrik"><font size="2" face="verdana"><a href="../default.asp">Menu

</a></font></td>

</tr>

<tr>

<td colspan=3><hr size=1 color=#000000></td>

</tr>

<tr>

<td width=60%><b>File name</b></td>

<td width=40%><div align="right"><strong>File size</strong></div></td>

<td width=40%>&nbsp;</td>

</tr>

<tr>

<td><a href="<%

Set fso=Server.createobject("Scripting.FileSystemObject")

Set pasta=fso.GetFolder("C:\teste")

Set arquivos=pasta.Files

for each arquivo in arquivos

response.write "<a href='" & arquivo.name & "'>" & arquivo.name & "</a><br>"

next

%>

</a></td>

</tr>

</table>

</body>

</html>

Link para o comentário
Compartilhar em outros sites

Visitante
Este tópico está impedido de receber novos posts.


  • Estatísticas dos Fóruns

    • Tópicos
      152,3k
    • Posts
      652,3k
×
×
  • Criar Novo...