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
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
Vis detaljeret fejlkoder Af poulmadsen i ASP 6 09/03/202418:16 10/03/202417:59
IIS virker ikke på asp sider... Af bsn i ASP 10 15/10/202313:12 18/10/202308:48
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
IT-JOB

Cognizant Technology Solutions Denmark ApS

Test Architect - Projects

Politiets Efterretningstjeneste

Configuration Manager til kampen mod terror og spionage

Danske Spil A/S

Full-stack udvikler til Danske Spils Lotterier

A/S Bryggeriet Vestfyen

IT-Architect /Administrator

Gehl Architects ApS

IT Supporter
Seneste spørgsmål Seneste aktivitet
23 min siden Oprette / gemme et par fotos i en mappe - Samsung Galaxy A 14 5G ? Af Ikke-ekspert i Mobiltelefoner
I dag 11:14 Bærbar til Sims 3? Af idamarie i PC
I dag 10:49 Adobe til excel Af densortehingst i Andet software
I dag 09:26 Chrome Af fjorbak i Andet netværk
I går 21:08 Hvor kan man se Alan Turings mekaniske apparat til at løse Enignas koder Af KurtG i Andet hardware
White papers
Flere white papers »


Premium
Teaser billede
Hackere udnytter CrowdStrike-nedbruddet: Spreder malware ved hjælp af falske løsninger
Læs mere »
Microsoft skyder dele af skylden for CrowdStrike-nedbrud på 15 år gammel EU-aftale
Derfor står Danske Bank foran en kæmpe AWS-transformation: Ellers skulle vi bygge en ny infrastruktur for at følge med
Det er blevet kaldt ”det største it-nedbrud i historien” og omkostningerne kan nemt løbe op i syv milliarder kroner: Men hvem skal betale for Crowdstrikes fejl?
Se alle »
Computerworld
Teaser billede
Microsoft-nedbrud spreder sig: It-systemer i lufthavne verden over er ramt
Læs mere »
Test: Denne mikro-pc er smartere end de stærkeste desktop-maskiner - men flopper alligevel
Elon Musk dropper CrowdStrike efter kæmpe nedbrud
Hundredevis af flyafgange ramt af stort Microsoft-nedbrud
Se alle »
CIO
Teaser billede
Microsoft er på sagen: I gang med at løse kæmpe nedbrud efter katastrofal Crowdstrike-fejl
Læs mere »
Så mange Microsoft-enheder blev ramt af gigantisk Crowdstrike-koks
Telenor skrotter ældre it-system: Nyt system er en hyldevare
Peter Lüth udlever CTO-drømmen: Bygger et system fra bunden og tjener kassen på det
Se alle »
Job & Karriere
Teaser billede
Efter 12 år er NNIT's hovedkvarter i Søborg nu ryddet og tomt - alle arbejder hjemme: "Det er med et vist vemod"
Læs mere »
Norlys skal splittes op i fem selskaber: Nu bliver flere ansatte og ledere fyret
Dansk top-profil trækker sig fra Microsoft: Skal være direktør i TDC Erhverv
KMD-direktør forlader selskabet: Det skal hun nu
Se alle »
White paper
Teaser billede
Få mere ud af din cloudinfrastruktur og gør op med de konstant stigende omkostninger
Læs mere »
Nemmere overblik, styring og omkostningskontrol i dit multicloud-miljø
Rapport kortlægger de 13 bedste muligheder for at sætte turbo på din cloud computing
Opdag fordelene ved cloud-baseret backup og recovery
Se alle »

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