广告：
网页制作参考
千千学园
雨路开发频道
雨路技术文档
技术问答
编程技术

在iis5(就是安装了win2000)中自带了新的ado 2.5版本尤其
增加了对xml技术的支持，并且带入了许多崭新的技术，这些技术可以
帮助我们实现以前必须要依靠组件或者其它技术才能够实现的功能。
我这里做一个简单的介绍让大家对这个新的web组合有所了解。
从这可以看出，学习和掌握xml技术已经迫在眉睫了。欢迎大家到隔壁
的xml学习园地作客。。。
新技术之一：
ado中新增加了一个record对象（别和recordset对象混淆了）。。。
它可以操纵服务器上的任何文件。。。
下面是它运用的事例：

<%
dim recroot
dim rsfiles

set recroot = server.createobject("adodb.record")

注意打开的url必须是运行iis5中或者支持webdav服务，
至于什么是webdav请到隔壁去看看把
recroot.open "", "url=http://localhost/iis", admoderead
response.write "<ul>" & chr(13) & chr(10)
traversetree recroot
response.write "</ul>" & chr(13) & chr(10)
recroot.close
set recroot = nothing

sub traversetree(recnode)

dim rschildren
dim recchildnode
set recchildnode = server.createobject("adodb.record")

response.write "<li>" & recnode("resource_parsename") & chr(13) & chr(10)
set rschildren = recnode.getchildren

if not rschildren.eof then
response.write "<ul>" & chr(13) & chr(10)
while not rschildren.eof
if rschildren("resource_iscollection") then
recchildnode.open rschildren
traversetree recchildnode
recchildnode.close
else
response.write "<li>" & rschildren("resource_parsename") & chr(13) & chr(10)
end if
rschildren.movenext
wend
response.write "</ul>" & chr(13) & chr(10)
end if
rschildren.close
set rschildren = nothing
set recchildnode = nothing
end sub
%>

考虑到很多人目前没有安装win2000，所以我把运行结果也给出来了，
大家可以看到代码运行的结果。。。
注意要想得到正确的结果必须要让iis目录可以directory browing
<ul>
<li>iis
<ul>
<li>sdk
<ul>
<li>admin
<ul>
<li>mkwebsrv.vbs
<li>mkwebsrv.js
<li>metabackrest.vbs
<li>metabackrest.js
<li>metaback.vbs
<li>metaback.js
<li>logenum.vbs
<li>logenum.js
</ul>
<li>asp
<ul>
<li>applications
<ul>
<li>session_vbscript.asp
<li>session_jscript.asp
<li>application_vbscript.asp
<li>application_jscript.asp
</ul>
<li>components
<ul>
<li>redirect.asp
<li>nts_iis.gif
<li>ie.gif
<li>clientcap.htm
<li>browsercap_vbscript.asp
<li>browsercap_jscript.asp
<li>adrotator_vbscript.asp
<li>adrotator_jscript.asp
<li>adrot.txt
</ul>
<li>database
<ul>
<li>update_vbscript.asp
<li>update_jscript.asp
<li>storedprocedures_vbscript.asp
<li>storedprocedures_jscript.asp
<li>simplequery_vbscript.asp
<li>simplequery_jscript.asp
<li>multiscrolling_vbscript.asp
<li>multiscrolling_jscript.asp
<li>limitrows_vbscript.asp
<li>limitrows_jscript.asp
<li>authors.mdb
<li>adddelete_vbscript.asp
<li>adddelete_jscript.asp
</ul>
<li>docs
<ul>
<li>toolbar.asp
<li>sampfram.asp
<li>libcodebrws.inc
<li>colorpicker.asp
<li>codebrws.asp
</ul>
<li>interaction
<ul>
<li>servervariables_vbscript.asp
<li>servervariables_jscript.asp
<li>redirect_vbscript.asp
<li>redirect_jscript.asp
<li>querystring_vbscript.asp
<li>querystring_jscript.asp
<li>populateform_vbscript.asp
<li>populateform_jscript.asp
<li>pics_vbscript.asp
<li>pics_jscript.asp
<li>logon_vbscript.asp
<li>logon_jscript.asp
<li>form_vbscript.asp
<li>form_jscript.asp
<li>filelist.txt
<li>expire_vbscript.asp
<li>expire_jscript.asp
<li>cookie_vbscript.asp
<li>cookie_jscript.asp
<li>clientscript_vbscript.asp
<li>clientscript_jscript.asp
</ul>
<li>simple
<ul>
<li>variables_vbscript.asp
<li>variables_jscript.asp
<li>looping_vbscript.asp
<li>looping_jscript.asp
<li>includes_vbscript.asp
<li>includes_jscript.asp
<li>headerinfo.asp
<li>functions_vbscript.asp
<li>functions_jscript.asp
<li>conditional_vbscript.asp
<li>conditional_jscript.asp
<li>arrays_vbscript.asp
<li>arrays_jscript.asp
</ul>
<li>transactional
<ul>
<li>simpletransaction_vbscript.asp
<li>simpletransaction_jscript.asp
<li>fundtransfer_vbscript.asp
</ul>
</ul>
</ul>
<li>homepage
<ul>
<li>themes
<ul>
<li>gunmetal
<ul>
<li>setup.inc
<li>layout.inc
<li>layout.css
<li>gradient.gif
</ul>
<li>journal
<ul>
<li>setup.inc
<li>rip3.gif
<li>rip2_2.gif
<li>layout.inc
<li>layout.css
</ul>
<li>looseleaf
<ul>
<li>setup.inc
<li>layout.inc
<li>layout.css
</ul>
</ul>
<li>themes.inc
<li>theme.inc
<li>sub.inc
<li>signbook.asp
<li>myfiles.asp
<li>guestbk.asp
<li>global.asa
<li>file.gif
<li>default.asp
<li>bullet.gif
</ul>
<li>global.asa
</ul>
</ul>

（）