Søg
Avatar billede 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?
Avatar billede hundevennen Nybegynder
07. januar 2008 - 20:54 #1
:-(
Avatar billede 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>&nbsp;</p>
</body>
Avatar billede 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("..")
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 dag 16:01 Driver opdatering Af barth i Andet software
I dag 14:32 Jeg kan ikke finde min vinkelmåler Af nu_igen i Apps til iOS
I går 22:04 Langsom Internet Af webnord i Andet software
I går 17:58 Libra Office har mange overflødige vaner. Af arnel i Andet software
I går 11:33 Bluetooth høreapparater og streaming Af bpnorskov i Tablet
White papers
Flere white papers »