CIO Tech Eksperten IT-JOB IT-Kurser Events Podcast Søg
Cookie ikon
Avatar billede jeg_var_gangsta Nybegynder
19. maj 2004 - 11:11 Der er 2 kommentarer og
1 løsning

Find ud af, hvor mange filer der ligger i en given dir.

Jeg har brug for at vide, hvor mange filer der ligger i en given directory. Hvordan?

MVH Christian
Avatar billede jeg_var_gangsta Nybegynder
19. maj 2004 - 11:33 #1
Sådan: :)
        n = 1
        for each Image in objFiles
            n = n + 1
        next
Avatar billede asp-rallye Nybegynder
19. maj 2004 - 11:34 #2
Prøv dette!!

<%

ImageDir = "/images/fister/206/"
directpath = server.mappath("/") & "\images\fister\206\"

%>

<HTML>
<HEAD>
    <TITLE>forsøg</TITLE>
<meta name="Generator" content="Stone's WebWriter 4">
<meta http-equiv="Content-Type" content="text/html; charset=ISO-8859-1">


<style type="text/css">
a.sider {
    font-size: 0.7em;
}
</style>
</HEAD>

<body>
<div>

<%

picture = request("picture")
id = request("id")
pagenumber = request("page")
If isNumeric(pagenumber) = False Or pagenumber < 1 Then
  pagenumber = 1
End If

'*********************************************************************
'* Find all pictures in dictory
'*********************************************************************
Set objFS = CreateObject("Scripting.FileSystemObject")
Set objFolder = objFS.GetFolder(Server.MapPath(ImageDir))
Set objFiles = objFolder.Files

numberofpictures = objFiles.Count
strScriptName = Request.Servervariables("ScriptName")
intPageCount = -Int(-(numberofpictures/picturesperpage))

IF picture="" then
Response.Write "Total of " & numberofpictures & " files"
END IF

Set objFS = Nothing
%>
</DIV>
</BODY>
</HTML>
Avatar billede eagleeye Praktikant
20. maj 2004 - 10:33 #3
Eller bare:

set fo=fs.GetFolder("c:\test\")
antal = fo.files.count
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
Tidligere Ecco-CIO Ulrik Balling Hansen lander internationalt topjob
Læs mere »
LA, SF og erhvervslivet er enige: Sådan opnår Danmark digital suverænitet
Hvad taler 3.000 it-folk om på årets AI- og cloudfestival? Fem it-professionelle giver dig svaret
Ny topchef for 2.000 medarbejdere: Her er Carsten Fensholts plan med Aeven
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
Alt om Apples store opdatering til iPhone, Mac, Watch og iPad
Microsoft løfter sløret for næste generation af selskabets udbredte kodeværktøj: Kan prøves allerede nu
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å
”Det fylder helt oppe på direktionsgangene:" Danske topkonsulenter løfter sløret for det allervigtigste it-tema lige nu
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 »
Fra drift til strategi: IT-chefens genvej til et stærkere netværk
Sikre og skalerbare datacentre med fokus på drift, energi og fremtid
Tidsbegrænset kampagne: Overvejer du at udskifte eller tilføje printere i din forretning? Vi kan tilbyde én eller flere maskiner gratis
Se alle »

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