Avatar billede bredgade Nybegynder
06. november 2001 - 16:34 Der er 6 kommentarer og
1 løsning

Filer

Jeg skal løbe igennem alle filer og biblioteker på min webserver, og liste alle filerne op i en tekstfil.

Hvordan?

Jeg ved at det er ved hjælp af fso...
Avatar billede mikethebike Nybegynder
06. november 2001 - 16:42 #1
dir /s /b> liste.txt
Avatar billede bredgade Nybegynder
06. november 2001 - 16:44 #2
Via ASP???
Avatar billede mikethebike Nybegynder
06. november 2001 - 16:48 #3
Sorry .. jeg hentede spørgsmålet fra forsiden, og så ikke lige at det lå under ASP ..

Jeg kender desværre ikke til ASP, men kan man ikke udføre det som en kommando på serveren?

/Michael

Avatar billede mri Nybegynder
06. november 2001 - 21:42 #4
Prøv noget lignende det her:

<%

Function ShowFileList(folderspec)
    Dim fso, f, f1, fc, s
    Set fso = CreateObject(\"Scripting.FileSystemObject\")
    Set f = fso.GetFolder(folderspec)
    Set fc = f.Files
    For Each f1 in fc
        WriteToFile(f1.name)
        response.write \"<br>\" + f1.name
    Next
End Function

Function ShowFolderList(folderspec)
    response.write \"ROOTFOLDER: \" + folderspec
    Dim fso, f, f1, s, sf
    Set fso = CreateObject(\"Scripting.FileSystemObject\")
    Set f = fso.GetFolder(folderspec)
    Set sf = f.SubFolders
    For Each f1 in sf
        WriteToFile(f1.name)
        response.write \"<br>\" + f1.name
        ShowFolderList(f1.path)
    Next
    ShowFileList(folderspec)
End Function

Function WriteToFile(fObjStr)
    Const ForWriting = 2
    Dim fsoWr, f
    Set fsoWr = CreateObject(\"Scripting.FileSystemObject\")
    Set f = fsoWr.OpenTextFile(\"C:\\webfoldercontent.txt\", ForWriting, True)
    f.Write fObjStr
    response.write fObjStr
End Function

ShowFolderList(\"C:\\webfolder\")

%>
Avatar billede bredgade Nybegynder
07. november 2001 - 09:03 #5
Det var lige det jeg manglede... Men den skal skrive ud for hver fil, et fortløbende nummer, som angiver hvilket niveau den er på, f.eks
/dokumenter/retningslinier/test.doc vil have niveauet 1.1.1
og /dokumenter/retningslinier/test2.doc vil have 1.1.2
og dokumenter/test3 vil have 1.2
osv...
Avatar billede mri Nybegynder
07. november 2001 - 11:09 #6
Det er jo lidt en anden snak...
Avatar billede bredgade Nybegynder
12. december 2001 - 09:33 #7
Har løst det
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
Kurser inden for grundlæggende programmering

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.

Du kan også logge ind via nedenstående tjenester