如何使用ASP实现网站的“目录树”管理
来源:互联网 发布:淘宝商品推广方法 编辑:程序博客网 时间:2024/06/11 15:16
使用ASP实现网站的目录树
数据库结构(共使用了两个表)
1。tblCategory
字段名 类型
Root binary 说明树关或开(目录的根)
ID 自动编号 关键字
Sort integer 识别该字段内容的整数(如果root是开状态sort为0)表示显示的目录的顺序
Name text(255)可以包含html中的标识符
HREF text(255) 允许空
2。tblPages
ID 自动编号
Sort integer 关键字
Name text(255)
HREF text(255)
3.default.htm
<html>
<head>
<title>JavaScript Tree Control Template</title>
</head>
<frameset cols=""210,*"">
?<frame src=""tree.asp"" name=""TOC"">
?<frame src=""main.htm"" name=""basefrm"">
</frameset>
</html>
4.main.htm
<head><title></title></head>
<body>
<h2>Start Page</h2>
</body>
</html>
5.tree.asp
Set conn = Server.CreateObject(""ADODB.Connection"")
Set Rs = Server.CreateObject(""ADODB.Recordset"")
conn.open ""DRIVER=Microsoft Access Driver (*.mdb);DBQ="" & Server.MapPath(""toc.mdb"")
strsql = ""SELECT tblCategory.Root, tblCategory.[ID], tblCategory.Sort AS CatSort, tblPages.sort AS LinkSort, tblCategory.[Name] AS CatName, tblCategory.HREF AS CatURL, tblPages.[Name] AS LinkName, tblPages.href AS LinkURL FROM tblCategory LEFT JOIN tblPages ON tblCategory.[ID] = tblPages.[ID] ORDER BY tblCategory.root ASC, tblCategory.Sort, tblPages.sort""
rs.open strsql, conn, 2, 2
if not rs.eof then rs.movefirst
currentID = """" %>
<html>
<head>
<link rel=""stylesheet"" href=""ftie4style.css"">
<!-- Infrastructure code for the tree -->
<script src=""ftiens4.js""></script>
<!-- Execution of the code that actually builds the specific tree -->
<script>
USETEXTLINKS = 1
<%
Do While Not Rs.EOF
If Rs(""Root"") = True Then %>
foldersTree = gFld(""<%= Rs(""CatName"") %>"", ""<%= Rs(""CatURL"") %>"")
<% Else %>
aux1 = insFld(foldersTree, gFld(""<%= Rs(""CatName"") %>"", ""<%= Rs(""CatURL"") %>""))
<% currentID = Rs(""ID"")
savedID = Rs(""ID"")
Do While currentID = savedID and not rs.eof
if Rs(""LinkName"") <> """" Then %>
insDoc(aux1, gLnk(0, ""<%= Rs(""LinkName"") %>"", ""<%= Rs(""LinkURL"") %>""))
<%
end if
Rs.MoveNext
if not rs.eof then currentID = Rs(""ID"")
Loop
End If
if currentID = """" then rs.movenext
Loop %>
</script>
<script>
initializeDocument()
</script>
<base target=""basefrm"">
<title></title>
</head>
<body bgcolor=""white"">
</body>
</html>
- 如何使用ASP实现网站的“目录树”管理
- 网站建设:如何实现asp网站的本地测试功能
- 如何实现ASP.NET中网站访问量的统计
- 如何实现ASP.NET中网站访问量的统计
- ASP.NET网站如何实现不同域名解析不同的子目录
- 如何实现ASP.NET网站个性化
- 如何实现ASP.NET网站个性化
- 如何实现ASP.NET网站个性化
- 如何实现ASP.NET网站个性化
- [AspProtect]监控网站上传目录,保护你的ASP网站
- asp实现树型目录
- 我网站的后台管理。ASP代码。
- 想找个ASP车辆管理网站的程序代码
- ASP.net网站配置文件的读写管理
- 使用ASP.NET程序来管理文件或目录的一种方案!!
- 如何下载一个网站的整个目录
- 浅谈如何做好网站的目录规划
- 计算机毕业论文-ASP.NET的网站新闻管理系统设计与实现
- 简明批处理教程
- 职场生涯的3个步骤--法、儒、道家的管理哲学
- 块和闭包(block and Closures)
- 刘若英《后来》
- 批处理的高级运用
- 如何使用ASP实现网站的“目录树”管理
- 块和迭代器,事务处理
- 还有Bliki/Wikilog
- 那个mm,是谁在支持着你的堕落
- 重新调整数组长度
- 保证你现在和未来不失业的十种关键技术
- Windows的动态链接库
- 今天看了看p2p方面的文档。
- linux常见命令