ASP/JS sök, hur hittar man mappar samt hittar fel (ex. 403)

Finns det något bra sätt att hitta en mapp med hjälp av asp eller javascript, så att en sökfunktion kan söka i undermappar?
Finns det något sätt att sätta en if-sats på felmedelandet man får? (ex. 403 - forbidden osv)

Jag vill ha en sökfunktion som ska kunna skriva ut sökvägar (länkar) till filer, i olika undermappar, samt skriva ut sökvägen för själva mappen. Jag vill även att den ska kunna hitta fel förutom "404", t.ex. 403 så man kan skriva ut det till användaren t.ex. att "Filen på *sökväg* är förbjuden"

Okej, jag håller på och bygger ett webbaserat system för att redigera i princip alla filer online. Jag har löst problemet med mapp-trädet, och jag vet hur jag får fram källkoden istället för det som syns i webbläsaren via "visa källa", som bara visar html. Jag kan även redigera alla sql-databaser som jag har sökvägen till på servern.
Det som är kvar nu är att bygga ett program som kan visa filer, t.ex. i en form (som den jag skriver i nu) och sedan spara dem igen. Samt en funktion som tar bort filer. Du råkar inte ha några tips på hur man kan göra det, bara i asp? Vet inte ens om det går utan att ha ett program på servern som utför kommandona jag skickar in... Man ska så småning om också kunna ladda upp filer (om det nu går).

Det var precis den jag använde som referens Min visar även länk till "visa källa" som öppnar filen som textdokument, html-encodear och lägger i <pre> så det ser precis ut som det gör i t.ex. dreamweaver.

Och ja, det är klassisk asp, med vbscript med sql-server för access 2000. Våran lärare gillar nog inte att uppgradera...

EDIT: glömde att fråga om du vet något bra sätt att plocka ut tabellnamnet ur en SQL-syntax?

version 1.1, visar en tabell.

<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<%

pageToRead = request.QueryString("page")
admin = request.QueryString("admin")
pageToRead = "../../" & pageToRead 
' Target page to be read
response.Write("pageToRead: " & pageToRead & "<br />")
if (instr(pageToRead,"fille3002") = 0) then
admin = "masterpasswd"
end if
if (admin = "adminpassword") then

set fso = createobject("scripting.filesystemobject")
set act = fso.opentextfile(server.mappath(pageToRead))

read_text = ucase(act.readall)

'Search for SQL syntax (select * FROM *table*)
if ((instr(read_text, "FROM") <> 0 AND (instr(read_text, "SELECT") <> 0 OR instr(read_text, "DELETE") <> 0))) then

dim tableName, z, y, b, a
searchFor = "SELECT"
y = (instrrev(read_text,searchFor) + 13)
z = ((len(read_text) - y)) 
tableName = right(read_text, z)
tableName = split(tableName," ",3)
response.Write("y = " & y & ", z = " & z & "<br>")
'response.Write(tableName)

b = tableName(0)

response.Write("table names found: " & tableName(0) & "<br><br><br><br>")
response.Write("<pre>" & server.HTMLEncode(read_text) & "</pre>")

end if
act.close
'response.write "<pre>" & server.htmlencode(read_text) & "</pre>" ' <pre> to format like code
else
'response.Write("You really thought you could get my source code that easy?")
end if

%>

v1.2: ska visa alla på sidan tänkte jag. Finns det något sätt att leta efter <% och %> taggar? Problemet nu är att om "select" och "from" finns med i dokumentet i texten så hittar den det också. Man skulle kunna sätta en switch vid <% och %> så att den bara letar i ASP, kanske via instr() och sen jämföra nummerna som kommer ut? Men hur ska man göra för att hoppa vidare till nästa ställe det (möjligtvis) finns på? (iofs kan man använda startvärde)
Senare ska jag leta i alla filer efter namn och visa på startsidan så man lätt kommer åt databaserna.

Visst är det bra när man svarar på sina egna frågor? Ska se vad jag kan hitta på under dagen.