Avatar billede snie97 Nybegynder
02. oktober 2003 - 11:47 Der er 1 kommentar og
1 løsning

Oversigt over htm-filer i en mappe

Hej

Er der ikke lige én der kan bikse lidt kode sammen, som viser en oversigt over alle htm-filer i en forudbestemt mappe?
Avatar billede jacob_hs Nybegynder
02. oktober 2003 - 11:51 #1
<SELECT SIZE="8" NAME="filer">

<%
Set fso = CreateObject("Scripting.FileSystemObject")
Set fo = fso.GetFolder(server.mappath("mappe"))

Set fc = fo.Files

For Each file in fc
    if (Right(file.name,4) = ".htm") or (Right(file.name,5) = ".html") Then

    %>

    <OPTION VALUE="<%= application("filer_upload") & file.name %>"><%= file.name %></OPTION>
    <%
    end if
next
%>
</SELECT>
Avatar billede jacob_hs Nybegynder
02. oktober 2003 - 11:54 #2
Den viser en select-boks med alle filerne i en given mappe, du kan jo rette den til efter behov. application("filer_upload") & kan du sagtens fjerne, da det ikke skal bruges i dit tilfælde.

Den her under udskriver filerne med typen htm og html
<%
Set fso = CreateObject("Scripting.FileSystemObject")
Set fo = fso.GetFolder(server.mappath("mappe"))

Set fc = fo.Files

For Each file in fc
    if (Right(file.name,4) = ".htm") or (Right(file.name,5) = ".html") Then

      Response.Write file.name &"<br>"
    end if
next
%>
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
IT-kurser om Microsoft 365, sikkerhed, personlig vækst, udvikling, digital markedsføring, grafisk design, SAP og forretningsanalyse.

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