indhold af mappe

jeg har det her script:
<%
Dim objFSO, oFolder, oSub

Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
Set oFolder = objFSO.GetFolder(Server.MapPath("/nt"))
For Each oSub In oFolder.SubFolders
  Response.Write("Folder: "& oSub.Name &"<br>")
Next

%>


men den skal ikke vise mappen "_vti_cnf", og så skal den også erstatte _ med et mellemrum!
Det kunne være rart, er der nogen derkan hjælpe mig?

//Niko