<%
@ Page language = "c #"
%>
<%
@ Import namespace = "system.data"
%>
<%
@ Import namespace = "system.data.oledb"
%>
<%
@ Import namespace = "system.text"
%>
Data Sheet: [Tree] field 1: [TREEID] Auto Number / Primary Key field 2: [Treetitle] Text length 50 field 3: [TREENODE] text length 50 / unique index
->
<
Script
Language
= "C #"
Runat
= "Server"
>
Script
>
DOCTYPE HTML PUBLIC "- // w3c // DTD HTML 4.0 Transitional // En"
>
<
HTML
>
<
HEAD
>
<
Title
>
Tree
Title
>
<
Meta
Name
= "Generator"
Content
= "Microsoft Visual Studio .NET 7.1"
>
<
Meta
Name
= "Code_Language"
Content
= "C #"
>
<
Meta
Name
= "VS_DEFAULTCLIENTScript"
Content
= "JavaScript"
>
<
Meta
Name
= "vs_targetschema"
Content
= "http://schemas.microsoft.com/intellisense/ie5"
>
<
Style
>
Body {} {font-size: 9pt; vertical-align: Top; text-align: center} Table {} {font-size: 9pt; vertical-align: top} TD {} {font-size: 9pt; vertical- Align: Top} Input {} {font-size: 9pt}
Style
>
HEAD
>
<
Body
>
<
FORM
id
= "Form1"
Method
= "POST"
Runat
= "Server"
>
<
ASP: Label
id
= "LBLPROMPT"
Runat
= "Server"
EnableViewState
= "False"
Font-bold
= "True"
>
Simple unlimited grade tree
ASP: Label
> <
Br
>
<
Br
>
<
Span
Style
= "Border-right: # 000000 1px dotted; border-top: # 000000 1px dotted; border-left: # 000000 1px dotted; width: 200px; border-bottom: # 000000 1px dotted; text-align: left>>
<
A
HREF
= "Tree.aspx? TreeId = 0"
>
Top classification
A
>
<
ASP: Label
id
= "lbltree"
Runat
= "Server"
EnableViewState
= "False"
>
ASP: Label
>
Span
>
<
Span
Style
= "Width: 400px"
>
<
TABLE
Width
= "100%"
Border
= "0"
Cellspacing
= "1"
Cellpadding
= "4"
>
<
TR
>
<
TD
Align
= "Right"
Width
= "100"
>
Current classification:
TD
>
<
TD
>
<
ASP: Label
id
= "lbltreetitle"
Runat
= "Server"
EnableViewState
= "False"
Font-bold
= "True"
>
ASP: Label
> <
INPUT
id
= "hidtreeid"
Type
= "hidden"
Name
= "hidtreeid"
Runat
= "Server"
>
TD
>
TR
>
<
TR
>
<
TD
Align
= "Right"
Width
= "100"
>
Add subclassification:
TD
>
<
TD
>
<
ASP: RequiredFieldValidator
id
= "Reqvaladdtree"
Runat
= "Server"
EnableViewState
= "False"
ErrorMessage
= "*"
DISPLAY
= "Dynamic"
ControlTovAlidate
= "TXTADDTREE"
>
ASP: RequiredFieldValidator
>
<
ASP: TEXTBOX
id
= "TXTADDTREE"
Runat
= "Server"
EnableViewState
= "False"
Maxlength
= "20"
>
ASP: TEXTBOX
>
<
ASP: Button
id
= "btnadd"
Runat
= "Server" enableviewstate
= "False"
Width
= "80px"
TEXT
= "Add"
>
ASP: Button
>
TD
>
TR
>
<
TR
>
<
TD
Align
= "Right"
Width
= "100"
>
Update the current category:
TD
>
<
TD
>
<
ASP: TEXTBOX
id
= "TXTUPDATETREE"
Runat
= "Server"
EnableViewState
= "False"
Maxlength
= "20"
>
ASP: TEXTBOX
>
<
ASP: Button
id
= "btnUpdate"
Runat
= "Server"
EnableViewState
= "False"
Width
= "80px"
Causesvalidation
= "False"
TEXT
= "Update"
>
ASP: Button
>
TD
>
TR
>
<
TR
>
<
TD
Align
= "Right"
Width
= "100"
>
Delete the current category:
TD
>
<
TD
>
<
ASP: Button
id
= "btndelete"
Runat
= "Server"
EnableViewState
= "False"
Width
= "80px"
Causesvalidation
= "False"
TEXT
= "Delete"
>
ASP: Button
>
TD
>
TR
>
<
TR
>
<
TD
Align
= "Right"
Width
= "100"
>
TD
>
<
TD
>
TD
>
TR
>
TABLE
>
Span
>
FORM
>
Body
>
HTML
>
