I'm not an expert on asp but I'm familar with it.

What's going on is when I goto my webserver dir

noc/cincyswtraf.asp

OK, I get this error:

Error Type:

Microsoft VBScript runtime (0x800A000D)

Type mismatch: 'server'

noc/cincyswtraf.asp, line 23

Now my code:

<%

u_file=trim(request.querystring("u_file"))

if u_file = "" then

' Get the top level directory info

dir_info = request.servervariables("appl_physical_path")

' Get the rest of the directory info without the first /
dir_info = dir_info +
right(request.servervariables("script_name"),(len(request.servervariab
les("script_name"))-1))

' Split the directory info by /

g_input=split(dir_info,"/")


' Count the number of splits

num_inputted=ubound(g_input)-1

set directory=server.createobject("scripting.filesystemobject")

set
allfiles=directory.getfolder(server.mappath("c:\inetpub\wwwroot\noc\&g
_input"(num_inputted)))

' Lists all the files found in the directory
For each directoryfile in allFiles.files


' Removes ASP pages from view

if (right(directoryfile.name,3)) <> "asp" then

set fso = createobject("scripting.filesystemobject")

set act = fso.opentextfile(server.mappath(directoryfile.name))