ASPを使用してWebサイトのディレクトリツリーを実装します
データベース構造(2つのテーブルが合計で使用されます)
1。tblcategory
フィールド名タイプ
ルートバイナリ説明ツリークローズまたはオープン(ディレクトリのルート)
ID自動番号付けキーワード
sort整数は、フィールドを含む整数を認識します(ルートが開いている場合、ソートは0です)。表示されたディレクトリの順序を示します。
名前テキスト(255)には、HTMLに識別子を含めることができます
HREFテキスト(255)は空を許可します
2。TBLPAGES
ID自動番号付け
整数キーワードをソートします
名前テキスト(255)
HREFテキスト(255)
3.Default.htm
<html>
<head>
<title> javascriptツリーコントロールテンプレート</title>
</head>
<フレームセットcols = "" 210、*"">
?<frame src = "" tree.asp "" name = "" toc "">
?<フレームsrc = "" main.htm "" name = "" basefrm "">
</frameset>
</html>
4.main.htm
<head> <title> </title> </head>
<body>
<h2>開始ページ</h2>
</body>
</html>
5.tree.asp
conn = server.createObject( "" adodb.connection "")
rs = server.createObject( "" adodb.recordset "")を設定します
conn.open "" driver = microsoftアクセスドライバー(*.mdb); dbq = ""&server.mappath( "" toc.mdb "")
strsql = "" Select tblcategory.root、tblcategory。 tblcategory。[id] = tblpages。
rs.open strsql、conn、2、2
rs.eofではない場合は、rs.movefirst
currentId = "" ""%>
<html>
<head>
<link rel = "" styleSheet "" href = "" ftie4style.css "">
<! - ツリーのインフラストラクチャコード - >
<スクリプトsrc = "" ftiens4.js ""> </script>
<! - 実際に特定のツリーを構築するコードの実行 - >
<スクリプト>
USETEXTLINKS = 1
<%
rs.eofではありません
rs( "" root "")= true then%>の場合
folderStree = gfld( "" <%= rs( "" catname "")
<%else%>
aux1 = insfld(folderStree、gfld( "" <%= rs( "" "catname" ")
<%currentId = rs( "" id "")
savedid = rs( "" id "")
currentId = savedidではなく、rs.eofではなくします
if rs( "" linkname "")<> "" "" then%>
insdoc(aux1、glnk(0、 "" <%= rs( "" linkname "")%> "" "" <%= rs( "" linkurl "")%> "")))