---
title: "Försatt kamp med filöppningen"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/45410-försatt-kamp-med-filöppningen"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "katis"
published: "2002-06-07T12:27:11.000Z"
updated: "2002-06-07T12:46:11.000Z"
replies: 1
views: 188
page: 1
pages: 1
language: "sv-SE"
site: "webForum — webforum.nu"
rights: "Upphovsrätten till varje inlägg tillhör dess författare."
attribution: "Citera som: webForum, https://www.webforum.nu/amne/asp/45410-försatt-kamp-med-filöppningen"
---

# Försatt kamp med filöppningen

## #1 — katis, 2002-06-07T12:27Z

Halloi!
Min stora önskemål  att öppna alla filler i mappen "files".
Och mitt tapra försök(inte fungerande) ser ut på följande sätt: 

\<html\>
\<%@ LANGUAGE="VBScript"%\>
\<body\>
\<p\>\<h3\>\<font style = "Verdana"\>Dina gamla beställningar\</font\>\</h3\>\</p\>
\<%
Dim objFSO, objMinFil
Dim objMinMapp, mapp
path = Server.MapPath("\\bonab")
mapp = path & "\\files"

Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
Set objMinMapp = objFSO.GetFolder(mapp)

For each objMinFil in objMinMapp.Files
namn = objMinFil.Name
Set objMinFil = objFSO.OpenTextFile (mapp & "\\" & namn)
While Not objMinFil.AtEndOfStream
rad = objMinFil.ReadLine & "\<br\>"
Wend
MinFil.Close
Next
%\>
\</body\>
\</html\>

Vad är det för fel med den här koden?
Tack på förhand

Permalänk: https://www.webforum.nu/p/45410

## #2 — solbulle, 2002-06-07T12:46Z

```
<html> 
<%@ LANGUAGE="VBScript"%> 
<body> 
<p><h3><font style = "Verdana">Dina gamla beställningar</font></h3></p> 
<% 
Dim objFSO, objMinFil 
Dim objMinMapp, mapp 
path = Server.MapPath("\bonab") 
mapp = path & "\files" 

Set objFSO = Server.CreateObject("Scripting.FileSystemObject") 
Set objMinMapp = objFSO.GetFolder(mapp) 

For each objMinFil in objMinMapp.Files 
namn = objMinFil.Name 
Set objMinFil = objFSO.OpenTextFile (mapp & "\" & namn) 
While Not objMinFil.AtEndOfStream 
rad = objMinFil.ReadLine & "<br>" 
response.write rad
Wend 
objMinFil.Close 
Next 
%> 
</body> 
</html>
```

I din kod öppnar du alla filer, men sen gör du ju inget med dom!?!
Vidare stänger du fel object på slutet.

Permalänk: https://www.webforum.nu/p/690967

---

Tråden på webben: https://www.webforum.nu/amne/asp/45410-försatt-kamp-med-filöppningen