---
title: "Ogiltig klassträng"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/88993-ogiltig-klassträng"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Frexuz"
published: "2003-10-20T14:15:36.000Z"
updated: "2003-10-20T14:15:36.000Z"
replies: 0
views: 354
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/88993-ogiltig-klassträng"
---

# Ogiltig klassträng

## #1 — Frexuz, 2003-10-20T14:15Z

Feltyp:
Serverobjekt, ASP 0177 (0x800401F3)
Ogiltig klassträng 
/movies.asp, line 24

\--------------

rad 24:

    Set objFSO = Server.CreateObject("Scripting.FileSystemObject") 

\--------------

hela:

\<% 
    Response.Buffer = true 
    Server.ScriptTimeout = 36000 

Sub IterateThroughDirectory(objFolder) 
    Response.Write "\<br/\>\<hr noshade\>\<b\>/" & objFolder.Name & "\</b\>\<br/\>" 

    For Each objFile in objFolder.Files 
        Response.Write objFile.Name & "\<br/\>" 
    Next 

    Dim objFile 

    Dim objSubFolder 
    For Each objSubFolder in objFolder.SubFolders 
        IterateThroughDirectory objSubFolder 
    Next 
End Sub 

    Dim objFSO 
    Set objFSO = Server.CreateObject("Scripting.FileSystemObject") 

    Dim strCurrentFolder 
    strCurrentFolder = Server.MapPath("..\\..\\download\\movies") 
    Dim objFolder 
    Set objFolder = objFSO.GetFolder(strCurrentFolder) 

    
    IterateThroughDirectory objFolder 
%\>

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/88993-ogiltig-klassträng