【www.bbyears.com--Access】
利用ACCESS创建数据库listBase.mdb:
数据表：listTable
数据字段：listId listName listInfo parentId 连接方法：
<%
dim sConn,sConnStr,sSql
sConnStr="DRIVER={Microsoft Access Driver (*.mdb)};dbq=" & server.mappath("listBase.mdb")
set sConn=server.createobject("adodb.connection")
sConn.open sConnStr
%>
把以上代码保存成文件：initialize.asp 下面这段程序代码是用来显示目录树用的，保存成文件：inc.asp
<script language=jscript>
</script>
<%
response.write("" & chr(13))
response.write("" & chr(13)&"" & chr(13) & "")
response.write("" & chr(13) & "" & chr(13) & "根节点" & chr(13))
response.write("添加" & chr(13))
response.write("" & chr(13))
response.write(" " & chr(13))
response.write("" & chr(13) & "" & chr(13))
""此处调用显示目录树的递归函数
listChild(0)
response.write("" & chr(13)