【www.gdgbn.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)

本文来源：http://www.gdgbn.com/shujuku/12778/