两个asp方面的问题(100分)

1。如何用vbscript完成某个目录下的所有文本文件的遍历，包括子目录？
2。如何做整个目录下的全文搜索？

文件遍历的：
以下的内容 转自CHINAASP
<%@ Language=VBScript %>
<%
'我写的一个遍历目录以及目录下文件的函数，
%>
<%
function bianli(path)
set fso=server.CreateObject("scripting.filesystemobject")
on error resume next
set objFolder=fso.GetFolder(path)

set objSubFolders=objFolder.Subfolders

for each objSubFolder in objSubFolders

nowpath=path + "/" + objSubFolder.name

Response.Write nowpath
set objFiles=objSubFolder.Files
for each objFile in objFiles
Response.Write "<br>---"
Response.Write objFile.name
next
Response.Write "<p>"
bianli(nowpath)'递归

next
set objFolder=nothing
set objSubFolders=nothing
set fso=nothing
end function
%>
<%
bianli("d:") '遍历d:盘
%>

我才刚学，帮你提前！

谢谢各位捧场啊！！
本来我的意思是要做一个全文检索的页面，开始是打算用文件遍历的方法，利用filesystemobject对象
查找文本内容...很恐怖的计划[]！！
后来知道nt的indexServer功能，可以直接利用nt的服务来完成，在《asp彻底研究》中看到的一个例子，
真是很爽啊！不过还没有完全弄明白怎么回事，也不知道这样可靠不可靠，如果有熟悉这个组件的朋友请
留下宝墨!
让我们共同学习！！！共同进步！！

我知道有个Search maker pro 2.1 在华军软件园上有(它可以自动搜索一个网站,对所有页面进行索引,生成自已的搜索引擎,不用配置WEB服务器),但我不知道破解的密码

多人接受答案了。