FSO Mapp och bildnavigering!

Hej!
Håller på med ett fotoalbum som endast hämtar bilder ifrån mappar.
Det är så här:
Jag vill att man ska kunna leta sig igenom mappkonstruktionen och dte kan jag med den koden som är nedanför. Men när det sedan visas det ligga bilder i en av undermapparna så vill jag att dem ska visas. Hur kan man lösa detta?

	
<%
rootname = server.mappath("/foto/")& "/"
Dirfolder = request.querystring("dir")

Set FSO = Server.CreateObject("Scripting.FileSystemObject")
Set Folder = FSO.GetFolder(rootname & Dirfolder)
set Files = Folder.Files

'ParentFolderName = FSO.GetParentFolderName(rootname & Dirfolder)

For each Item in Folder.SubFolders
	if Item.Name = "_vti_cnf" then
	else
	response.write "<a href='" & strScriptname & "?Dir=" & Item.Name & "'>" & Item.Name & "</a>"
	'response.write Item.Name
	response.write "<br />"
	end if
Next

set Folder = nothing
set FSO = nothing
set Files = nothing
%>

Har ni några förslag?