Notifikationer

Markér alle som læst Log ud

hundevennen Nybegynder

07. januar 2008 - 09:32 Der er 2 kommentarer og
1 løsning

hente fil via indputfelt

Jeg har 200 word docs og vil gerne kunne finde et enkelt frem
ved at taste et nummer i et inputfelt og så ENTER og derved skal word dokumentet åbne.
Dokumenterne har numrene 1 - 200

Selve formen kan jeg godt lave , men løsningen via et FSO kan jeg ikke, men det er vel en løsning med det?

Synes godt om

hundevennen Nybegynder

07. januar 2008 - 20:54 #1

:-(

Synes godt om

j_andersen Nybegynder

08. januar 2008 - 13:41 #2

Nedenstående viser en liste med links til indholdet af hver fil i et directory.

Du kan lægge alle filerne ind i et array af strings, og så pege på dem med et nummer, men prøv lige denne kode. HUSK at ændre filepath til din sti.

<body>
<%

Dim Dirnames
rootpath= Server.MapPath("..")
filepath= "\doc" '
SearchPath = rootpath & filepath
%>

<h2>Select a File to Download</h2>
<p>Search: <%= filepath %></p>
<table border="0" cellspacing="2" cellpadding="3">
<tr>
<th width="200" class="Label">Server File</th>
<th width="80" class="Label">Size</th>
</tr>
<% Dim objFS, objFolder, objFile

Set objFS = Server.CreateObject("Scripting.FileSystemObject")
Set objFolder = objFS.GetFolder(SearchPath)

For Each objFile In objFolder.Files
%>
<tr>
<td>
<a href="<%= ".." & filepath & "/" & (objFile.Name)%>" target="_blank"><%=objFile.Name%></a>
</td>
<td class="Normal" align="right"><%= FormatNumber(objFile.Size, 0) %></td>
</tr>
<% Next
Set objFile = Nothing
Set objFolder = Nothing
Set objFS = Nothing
%>
</table>
<p> </p>
</body>

Synes godt om

j_andersen Nybegynder

08. januar 2008 - 13:45 #3

Glemte lige at rootpath skal pege på roden
Hvis du afvikler direkte i roden rootpath= Server.MapPath(".")
Hvis du afvikler i et direktorie rootpath= Server.MapPath("..")

Synes godt om

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.

Følg dette spørgsmål

Opret Preview

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
Jeg bakser med noget Database og If Then med ASP - hvad gør jeg galt? Af Peer i ASP	9	25/06/202622:20	29/06/202621:55
Tjek alle checkbox i form Af bsn i ASP	4	18/05/202601:57	19/05/202613:33
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

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.

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten

Seneste artiklerRSS