欢迎来到天天文库
浏览记录
ID:10680028
大小:54.00 KB
页数:3页
时间:2018-07-07
《用asp实现网站的目录树管理--》由会员上传分享,免费在线阅读,更多相关内容在工程资料-天天文库。
1、用ASP实现网站的“目录树”管理>> 数据库结构(共使用了两个表)1.tblCategory字段名类型Rootbinary说明树关或开(目录的根)ID自动编号关键字Sortinteger识别该字段内容的整数(如果root是开状态sort为0)表示显示的目录的顺序Nametext(255)可以包含html中的标识符HREFtext(255)允许空2.tblPagesID自动编号Sortinteger关键字Nametext(255)HREFtext(255)3.default.htm〈html$#62;〈head$#62;〈title$#62;JavaScript/"target=
2、"_blank">JavaScriptTreeControlTemplate〈/title$#62;〈/head$#62;〈framesetcols="210,*"$#62;?〈framesrc="tree.asp"name="TOC"$#62;?〈framesrc="main.htm"name="basefrm"$#62;〈/frameset$#62;〈/html$#62;4.main.htm〈head$#62;〈title$#62;〈/title$#62;〈/head$#62;〈body$#62;〈h2$#62;StartPage〈/h2$#62;〈/body$#62;
3、〈/html$#62;5.tree.aspSetconn=Server.CreateObject("ADODB.Connection")SetRs=Server.CreateObject("ADODB.Recordset")conn.open"DRIVER=MicrosoftAccessDriver(*.mdb);DBQ="Server.MapPath("toc.mdb")strsql="SELECTtblCategory.Root,tblCategory.[ID],tblCategory.SortASCatSort,tblPages.sortASLinkSort,tblCate
4、gory.[Name]ASCatName,tblCategory.HREFASCatURL,tblPages.[Name]ASLinkName,tblPages.hrefASLinkURLFROMtblCategoryLEFTJOINtblPagesONtblCategory.[ID]=tblPages.[ID]ORDERBYtblCategory.rootASC,tblCategory.Sort,tblPages.sort"rs.openstrsql,conn,2,2ifnotrs.eofthenrs.movefirstcurrentID=""%$#62;〈html$#62;〈
5、head$#62;〈linkrel="stylesheet"href="ftie4style.css"$#62;〈!--Infrastructurecodeforthetree--$#62;〈scriptsrc="ftiens4.js"$#62;〈/script$#62;〈!--Executionofthecodethatactuallybuildsthespecifictree--$#62;〈script$#62;USETEXTLINKS=1〈%DhileNotRs.EOFIfRs("Root")=TrueThen%$#62;foldersTree=gFld("〈%=Rs("C
6、atName")%$#62;","〈%=Rs("CatURL")%$#62;")〈%Else%$#62;aux1=insFld(foldersTree,gFld("〈%=Rs("CatName")%$#62;","〈%=Rs("CatURL")%$#62;"))〈%currentID=Rs("ID")savedID=Rs("ID")DooveNextifnotrs.eofthencurrentID=Rs("ID")LoopEndIfifcurrentID=""thenrs.movenextLoop%$#62;〈/script$#62;〈script$#62;initializeD
7、ocument()〈/script$#62;〈basetarget="basefrm"$#62;〈title$#62;〈/title$#62;〈/head$#62;〈bodybgcolor="l$#62;>>>>这篇文章来自..,。
此文档下载收益归作者所有