CIO Tech Eksperten IT-JOB IT-Kurser Events Podcast Søg
Cookie ikon
Avatar billede nielsverner Nybegynder
15. december 2001 - 21:15 Der er 5 kommentarer og
1 løsning

Filer i mappen

Et script der skriver filnavnet på alle filer i den mappe scriptet ligger i... Nogen der lige kan ryste det ud af ærmet?
Avatar billede hy Nybegynder
15. december 2001 - 21:32 #1
<%
set fs = CreateObject(\"Scripting.FileSystemObject\")
    set f = fs.GetFolder(Server.MapPath(\".\"))
    ReDim fileNames(f.files.count)
    ReDim fileSize(f.files.count)
    ReDim fileType(f.files.count)
        i = 0
    For Each fldr in f.files
          fileNames(i) = fldr.name
          fileSize(i) = fldr.size
          fileType(i) = fldr.Type
          i = i + 1
    Next
%>
<html>

<head>

<body>

<table>
  <tr>
    <td>Name:</td>
    <td>Size</td>
    <td>Type</td>
  </tr>
<%
    For i = f.files.count - 1 to 0 step -1
    %>
  <tr>
    <td><a href=\"<%= fileNames(i) %>\"><%= fileNames(i) %></a></td>
    <td><%= fileSize(i) %>
</td>
    <td><%= fileType(i) %>
</td>
  </tr>
<%
    Next
    %>
Avatar billede nielsverner Nybegynder
15. december 2001 - 21:40 #2
Er det min lokale server den er helt galt med, eller hænger siden _meget_ lang tid for til sidst at stoppe med at hente?
Avatar billede hy Nybegynder
15. december 2001 - 21:44 #3
Denne er hurtigere :

<%
set fs = CreateObject(\"Scripting.FileSystemObject\")
    set f = fs.GetFolder(Server.MapPath(\".\"))
    For Each fldr in f.files
    Response.Write  fldr.name & \"<br>\"
    Next
%>

hyde
Avatar billede hy Nybegynder
15. december 2001 - 21:45 #4
Det kommer vel an på om du har 10000 filer i mappen !! , men her kommer den med det samme ??
Avatar billede nielsverner Nybegynder
15. december 2001 - 21:51 #5
Jeg tror det er min server der er træt...
Vi siger tak :O)
Avatar billede hy Nybegynder
15. december 2001 - 21:53 #6
Selv tak !!!
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Programmeringssprog kurser
Kurser inden for grundlæggende programmering
Se alle Programmeringssprog kurser

Flere spørgsmål fra ASP kategorien

Titel Indlæg Oprettet Seneste aktivitet
Lost focus Af bsn i ASP 1 07/11/202415:34 01/01/202514:58
ASP classic Af bsn i ASP 8 28/10/202423:11 30/10/202422:51
Classic - filer vist med sidste fil først Af bsn i ASP 5 23/05/202409:56 24/05/202400:02
Optimer MySql table med ASP Af poulmadsen i ASP 4 26/04/202417:16 26/04/202418:37
JSON Af ingeman i ASP 3 07/04/202417:53 08/04/202412:09
Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Opret Log ind

Du kan også logge ind via nedenstående tjenester



Alle kategorier på Eksperten
Seneste spørgsmål Seneste aktivitet
I går 15:05 Excel ark oplåsning Af FinnLauridsen i Excel
I går 13:39 Postman Af OBS i Andet software
16/0911:19 Google maps - downloaded - samlet overblik? Af 1Dorte i Andet software
15/0913:51 Smarthome system Af Vesterlund i Andet hardware
12/0915:18 Valg af vejrstation Af KurtG i Andet hardware
White papers
Flere white papers »


Premium
Teaser billede
Ny topchef for 2.000 medarbejdere: Her er Carsten Fensholts plan med Aeven
Læs mere »
Ny AI-model er trænet på sundhedsdata fra millioner af danskere: Kan forudse din risiko for mere end 1.000 sygdomme
”Det fylder helt oppe på direktionsgangene:" Danske topkonsulenter løfter sløret for det allervigtigste it-tema lige nu
Det benytter de den danske supercomputer Gefion til: Topchef Nadia Carlsten løfter sløret for AI-computerens brugere
Se alle »
Computerworld
Teaser billede
I aften sker det: Din iPhone får en monumental opdatering
Læs mere »
Apples nye AirPods Pro 3 er proppet med nyt – nu er det meget mere end nogle høretelefoner
Microsoft løfter sløret for næste generation af selskabets udbredte kodeværktøj: Kan prøves allerede nu
Alt om Apples store opdatering til iPhone, Mac, Watch og iPad
Se alle »
CIO
Teaser billede
Til kamp mod legacy og teknisk gæld: Uffe har skrottet 200 servere og 1.000 routere og switches på 140 lokationer
Læs mere »
Microsoft opsplitter Office og Teams: Sådan fungerer opdelingen
Overgangen til Windows 11 kan udløse store bøder, hvis du ikke passer på
Region Sjælland dropper kæmpe Oracle-planer til 150 millioner kroner: Skifter til SAP
Se alle »
Job & Karriere
Teaser billede
Tryg skiller sig af med 225 it-medarbejdere: Outsourcer stor del af sin it-drift til indere
Læs mere »
Lille dansk it-virksomhed fra Vanløse lander drømmekontrakt, der rækker langt ind i stifterens pension
Her er fidusen: Sådan fastholder KMD og Twoday deres it-folk i lang tid
Novo Nordisks CIO og digitale topchef, Anders Romare, forlader selskabet
Se alle »
White paper
Teaser billede
Sådan får du succes med AI i hele organisationen
Læs mere »
Sådan får du succes med AI i hele organisationen
IT i front: Sådan bliver netværk en strategisk driver
Sådan sikrer du nem og beskyttet adgang til dine ressourcer
Se alle »

Events
Flere events »
White papers
Flere white papers »
IT-Kurser
Se alle vores it-kurser »