Case Study Asp And Xml
This document was uploaded by user and they confirmed that they have the permission to share it. If you are author or own the copyright of this book, please report to us by using this DMCA report form. Report DMCA
Overview
Download & View Case Study Asp And Xml as PDF for free.
More details
- Words: 4,355
- Pages: 55
Chapter 34 - Case Study: Active Server Pages and XML Outline 34.1 34.2 34.3 34.4 34.5 34.6 34.7 34.8
Introduction Setup and Message Forum Documents Forum Navigation Adding Forums Forum XML Documents Posting Messages Other Documents Web Resources
2004 Prentice Hall, Inc. All rights reserved.
1
2
Objectives • In this tutorial, you will learn: – To create a Web-based message forum using Active Server Pages. – To use XML with Active Server Pages. – To be able to add new forums. – To be able to post messages to the message forum. – To use Microsoft’s DOM to manipulate an XML document. – To use XSLT to transform XML documents.
2004 Prentice Hall, Inc. All rights reserved.
3
34.1 Introduction • Message forums – – – –
Popular internet feature Discuss topics Exchange information Several major sites provide this service • messages.yahoo.com/index.html • web.eesite.com/forums • groups.google.com
2004 Prentice Hall, Inc. All rights reserved.
4
34.2 Setup and Message Forum Documents • Prerequisites – – – –
Microsoft Internet Information Services 6 (IIS) Internet Explorer 6 (for XML and XSLT processing) MSXML 3.0 or higher Write permissions on forum folder
2004 Prentice Hall, Inc. All rights reserved.
5
34.2 Setup and Message Forum Documents File name forums.xml default.asp template.xml addForum.asp forumASP.xml formatting.xsl addPost.asp invalid.html site.css style.css
Fig. 34.1
Description XML document listing all available forums and their filenames. Main page, providing navigational links to the forums. Template for a message forum XML document. Adds a forum. Sample message forum. Document for transforming message forums into XHTML. Adds a message to a forum. Used to display an error message. Style sheet for formatting XHTML documents. Style sheet for formatting the message forum site.
Message forum documents.
2004 Prentice Hall, Inc. All rights reserved.
6
34.3 Forum Navigation Fig. 34.2
Key interactions between message forum documents.
default.asp
forums.xml addForum.asp
forumASP.xml formatting.xsl addPost.asp
2004 Prentice Hall, Inc. All rights reserved.
7
34.2 Setup and Message Forum Documents • Forum listing – XML – filename attribute
2004 Prentice Hall, Inc. All rights reserved.
1
Outline
2 3
4
forums.xml (1 of 1)
5 6
7 8
ASP
9 10
Name of forum.
XML document that contains the information for forum ASP.
2004 Prentice Hall, Inc. All rights reserved.
8
9
34.2 Setup and Message Forum Documents • Presenting forum listing – Convert to XHTML – CSS for formatting – ASP facilitates the conversion • DOMDocument
• Async property • DocumentElement • ChildNodes
• For Each…Next control structure
2004 Prentice Hall, Inc. All rights reserved.
1
<% @LANGUAGE = "VBScript" %>
Outline
2 3
<% ' Fig. 34.4 : default.asp
4
' Forum home page
5
Option Explicit
6
default.asp (1 of 3)
%>
7 8 9
Link to CSS style sheet style.css.
"http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
10 11 12 13
14
Deitel Message Forums
15
16 17
href = "style.css" />
18 19
20
21
22
Method getAttribute gets a forum’s filename. The anchor element creates a link to the available forums. 2004 Prentice Hall, Inc. All rights reserved.
11
49 50
Outline
51 52
56 57
default.asp (3 of 3)
58 59
This anchor element links to the ASP document addForum.asp that allows the user to create a new forum.
2004 Prentice Hall, Inc. All rights reserved.
12
13
34.3 Forum Navigation Fig. 34.4
Message forums main page.
2004 Prentice Hall, Inc. All rights reserved.
14
34.3 Adding Forums • Template forum – Bare minimum elements of forum – stylesheet tag for formatting – forum tag
2004 Prentice Hall, Inc. All rights reserved.
1
Outline
2 3
4
template.xml
5 6
7 8
9
The stylesheet processing instruction references formatting.xsl.
2004 Prentice Hall, Inc. All rights reserved.
15
16
34.3 Adding Forums • Generating forum from template – Form to get information on new forum • Name and file name • User name • Message title and text
– Script to act on form input • Confirm valid input • SetAttribute – filename – timestamp • CreateElement • AppendChild • Save
2004 Prentice Hall, Inc. All rights reserved.
1
<% @LANGUAGE = "VBScript" %>
2
<% Option Explicit %>
3 4
Check to see if a value was entered in each of the form fields. addForum.asp Test to see if the form was submitted by testing the form’s (1 of 7) submit field for a value.
<% ' Fig. 34.6 : addForum.asp %>
5 6
Outline
<%
7
Dim xmlFile, xmlRoot, xmlNode
8
Dim strTitle, strError, strPath
9 10
If Request( "submit" ) <> Empty Then
11 12
If Request( "name" ) <> Empty And _
13
Request( "filename" ) <> Empty And _
14
Request( "user" ) <> Empty And _
15
Request( "title" ) <> Empty And _
16
Request( "text" ) <> Empty Then
17 18
' Create a new XML file
19
strPath = Server.MapPath( Request( "filename" ) )
20 21
Set xmlFile = Server.CreateObject( "Microsoft.XMLDOM" )
22
xmlFile.Async = False
23
2004 Prentice Hall, Inc. All rights reserved.
17
24 25 26
If xmlFile.Load( strPath ) Then Call Server.Transfer( "invalid.html" ) End If
Outline
27 28
' set up the file
29
Call xmlFile.Load(
addForum.asp Method Load loads the template XML document. (2 of 7) Server.MapPath( "template.xml" ) )
30 31
' get the root element
32
Set xmlRoot = xmlFile.DocumentElement
33 34
' set the filename
35
Call xmlRoot.SetAttribute( "filename", _
36
Request( "filename" ) )
37 38
' create Name node
39
Set xmlNode = xmlFile.CreateElement( "name" )
40
xmlNode.Text = Request( "name" )
41
Call
42
Method setAttribute creates an attribute node named filename that has the value contained in xmlRoot.AppendChild( xmlNode ) form field filename.
43
' create first message
44
Set xmlNode = xmlFile.CreateElement( "message" )
45
Call xmlNode.SetAttribute( "timestamp", Now & " EST" )
46
Call xmlRoot.AppendChild( xmlNode )
47 48
Set xmlRoot = xmlNode
Method AppendChild appends the newly created element name node to the root element. 2004 Prentice Hall, Inc. All rights reserved.
18
49 50
' create user node
51
Set xmlNode = xmlFile.CreateElement( "user" )
52
xmlNode.Text = Request( "user" )
53
Call xmlRoot.AppendChild( xmlNode )
Outline addForum.asp (3 of 7)
54 55
' create title node
56
Set xmlNode = xmlFile.CreateElement( "title" )
57
xmlNode.Text = Request( "title" )
58
Call xmlRoot.AppendChild( xmlNode )
59 60
' create text node
61
Set xmlNode = xmlFile.CreateElement( "text" )
62
xmlNode.Text = Request( "text" )
63
Call xmlRoot.AppendChild( xmlNode )
Calling method Save saves the XML document to disk.
64 65
Call xmlFile.Save( strPath ) ' save the file
66 67
' load XML file
68
strPath = Server.MapPath( "forums.xml" )
69 70
Set xmlFile = Server.CreateObject( "Microsoft.XMLDOM" )
71
xmlFile.Async = False
Open XML document forums.xml.
72
2004 Prentice Hall, Inc. All rights reserved.
19
73
If Not xmlFile.Load( strPath ) Then
74 75
Outline
Call Server.Transfer( "invalid.html" ) End If
76 77
' get the root node
78
Set xmlRoot = xmlFile.DocumentElement
addForum.asp (4 of 7)
79 80
' create nodes
81
Set xmlNode = xmlFile.CreateElement( "forum" )
82
Call xmlNode.SetAttribute( "filename", _
83
Request( "filename" ) )
84
xmlNode.Text = Request( "name" )
85
Call xmlRoot.AppendChild( xmlNode )
Modify forums.xml.
86 87
Call xmlFile.Save( strPath ) ' save the file
88 89
' finished processing
90
Call Server.Transfer( "default.asp" )
91
Else
92 93
strError = "ERROR: Invalid input." End If
94 95
Save forums.xml with its new contents to disk.
End If
96 %> 97
2004 Prentice Hall, Inc. All rights reserved.
20
98
Outline
101 102 103 104
Add a Forum
105
addForum.asp (5 of 7)
This XHTML form allows a user to input the name, filename, a user name, a message title and the message text to create a new forum.
106 107
108 109
150 151 152 153
Outline
delete all values in the form
fields.
154 155 156 157
2004 Prentice Hall, Inc. All rights reserved.
23
24
34.3 Adding Forums Fig. 34.6
Page to add a forum.
2004 Prentice Hall, Inc. All rights reserved.
25
34.5 Forum XML Documents • Sample forum – XML modified with several forums added – XSLT used to transform XML – Final XHTML page served to Internet Explorer
2004 Prentice Hall, Inc. All rights reserved.
1
2 3
4
name of the forum.
Outline forumASP.xml (1 of 2)
7 8 9 10
Each message
element and its children contain the information for a post.
ASP Forum
11 12
<message timestamp = "4/28/2001 2:50:34 PM EST">
13
<user>D. Bug
14
I Love ASP!
15
Everyone should use ASP.
16
17
2004 Prentice Hall, Inc. All rights reserved.
26
18
<message timestamp = "5/8/2001 11:09:54 AM EST">
19
<user>Ms. Quito
20
ASP and XML
21
What a powerful combination. Try it!
22
23 24
forumASP.xml (2 of 2)
<message timestamp = "5/15/2001 4:39:50 PM EST">
25
<user>Sarge Ant
26
ASP
27
This <em>army ant uses ASP in boot camp.
28
Outline
29 30
2004 Prentice Hall, Inc. All rights reserved.
27
1 2 3 4 5 6 7 8 9 10 11 12
<xsl:output method = "html" omit-xml-declaration = "no" doctype-system = doctype-public =
<xsl:template match = "/">
15 16 17 18
Select the template that matches the XML document root (/). "-//W3C//DTD XHTML 1.0 Strict//EN" /> The asterisk selects element nodes. The attribute xmlns creates a namespace
"http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd"
13 14
Outline
Attribute version specifies the XSLT version to XSLT which thisXML style sheet conforms. root element. Attribute omit-xmlformatting.xsl The xsl:output element specifies how the result declaration is assigned no, (1 of 4) <xsl:stylesheet version = "1.0" tree is output. which results in an XML Attribute method is assigned html, which specifies that xmlns:xsl = "http://www.w3.org/1999/XSL/Transform"> declaration in the an result tree. document is being output. XHTML
prefix xsl.
<xsl:apply-templates select = "*" />
19 20
21 22
<xsl:template match = "forum">
23
2004 Prentice Hall, Inc. All rights reserved.
28
24
25
<xsl:value-of select = "name"/>
26
27 28
href = "style.css" />
Link to the CSS style sheet style.css. formatting.xsl (2 of 4)
29 30
Outline
31 32
33
cellpadding = "2">
34
35
36 37
<xsl:value-of select = "name" />
38
39
Get value of name element.
40 41
42
cellpadding = "2">
43
<xsl:apply-templates
44 45 46
select = "message" />
Apply message template.
2004 Prentice Hall, Inc. All rights reserved.
29
47 48
56 57
Begin template message.
58 59
60 61
<xsl:template match = "message">
62 63 64
65 66 67
<xsl:value-of select = "title" />
68 69 70
Get value of user element.
71
by
72
<em><xsl:value-of select = "user" />
2004 Prentice Hall, Inc. All rights reserved.
30
73
at
74
<span class = "date">
75
<xsl:value-of select = "@timestamp" />
76 77 78
Outline
formatting.xsl Get value of attribute timestamp . (4 of 4)
79 80 81
82 83 84
<xsl:value-of select = "text" />
85
Get value of text element.
86 87
88 89
2004 Prentice Hall, Inc. All rights reserved.
31
1 2
Outline
"http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
3 4
5
6 7
(1 of 3)
8 9
10
ASP Forum
11
title.
12
13 14 15 16 17
Message title.
20 21 22 23 24
32
64 65
70 71
72
34
Link to add a new post.
73
2004 Prentice Hall, Inc. All rights reserved.
35
34.5 Forum XML Documents Fig. 34.9
Output of the transformation of the forum XML document.
2004 Prentice Hall, Inc. All rights reserved.
36
34.6 Posting Messages • Posting a message – Procedure similar to creating new forum
2004 Prentice Hall, Inc. All rights reserved.
1
<% @LANGUAGE = "VBScript" %>
Outline
2 3 4
<% ' Fig. 34.10 : addPost.asp ' ASP document for posting a message
5 6 7
Option
Check to see if a value was entered in each of the form fields. ExplicitTest to see if the form was submitted by testing the form’s submit field for a value.
8
Dim xmlFile, xmlRoot, xmlNode
9
Dim strTitle, strError, strPath
addPost.asp (1 of 5)
10 11
If Request( "submit" ) <> Empty Then
12 13
If Request( "file" ) <> Empty And _
Method Load loads the forum XML document.
14
Request( "userName" ) <> Empty And _
15
Request( "messageTitle" ) <> Empty And _
16
Request( "messageText" ) <> Empty Then
17 18
strPath = Server.MapPath( Request( "file" ) )
19 20
Set xmlFile = Server.CreateObject( "Microsoft.XMLDOM" )
21
xmlFile.Async = False
22 23 24 25
If Not xmlFile.Load( strPath ) Then Call Server.Transfer( "invalid.html" ) End If
2004 Prentice Hall, Inc. All rights reserved.
37
26 27
' get the root node
28
Set xmlRoot = xmlFile.DocumentElement
Outline
29 30
' create first message
31
Set xmlNode = xmlFile.CreateElement( "message" )
32
Call xmlNode.SetAttribute( "timestamp", Now & " EST" )
33
Call xmlRoot.AppendChild( xmlNode )
34 35
Set xmlRoot = xmlNode
addPost.asp Create a message (2 ofnode. 5)
Create a timeStamp attribute for the message node.
36 37
' create user node
38
Call CreateElementNode( "user", "userName", xmlNode )
39 40
' create title node
41
Call CreateElementNode( "title", "messageTitle", xmlNode )
42 43
' create text node
44
Call CreateElementNode( "text", "messageText", xmlNode )
45 46
Call xmlFile.Save( strPath ) ' save the file
47 48
' finished processing
49
Call Server.Transfer( Request( "file" ) )
Create the children of the message node: user, title and text.
2004 Prentice Hall, Inc. All rights reserved.
38
50
Else
51 52
strError = "ERROR: Invalid input." End If
Outline
53 54
addPost.asp (3 of 5)
End If
55 56
' procedure that creates an element node
57
Sub CreateElementNode( elementName, formElement, node )
58
Set xmlNode = xmlFile.CreateElement( elementName )
59
xmlNode.Text = Request( formElement )
60
Call xmlRoot.AppendChild( node )
61
End Sub
62 %> 63 64 66 67 68 69
Post a Message
70
71 72
href = "style.css" />
73
2004 Prentice Hall, Inc. All rights reserved.
39
74 75
Outline
76 77 78
Outline addPost.asp (5 of 5)
104 105
108
109 110
2004 Prentice Hall, Inc. All rights reserved.
41
42
34.6 Posting Messages Fig. 34.10
Adding a message to a forum.
2004 Prentice Hall, Inc. All rights reserved.
43
34.6 Posting Messages Fig. 34.11
New forum on the message board.
2004 Prentice Hall, Inc. All rights reserved.
44
34.6 Posting Messages Fig. 34.12
Initial content of the newly added forum.
2004 Prentice Hall, Inc. All rights reserved.
45
34.6 Posting Messages Fig. 34.13 Contents of the Internet and World Wide Web: Third Edition forum.
2004 Prentice Hall, Inc. All rights reserved.
46
34.7 Other Documents • Other documents required by forum – Error page – CSS for formatting • XHTML • Forums
2004 Prentice Hall, Inc. All rights reserved.
1
2
"http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
3 4
-->
6 7
Link that references CSS style sheet site.css.
10
Deitel Book Organization
11
12 13
invalid.html (1 of 1)
8 9
Outline
href = "site.css" />
14 15 16
17 18 19
20 21
2004 Prentice Hall, Inc. All rights reserved.
47
1
/* Fig. 34.15 : site.css
2
/* Stylesheet for XHTML documents */
*/
Outline
3 4
body
5
{
6
background: white;
7
color: black;
8
font-family: Arial, sans-serif;
9
font-size: 10pt;
Define styles for the body element.
site.css (1 of 3)
10 } 11 12 a 13 {
Define styles for the anchor element.
14
background: transparent;
15
color: blue;
16
text-decoration: none;
17 } 18 19 a:hover 20 { 21
Define styles for the table element.
text-decoration: underline;
22 } 23
2004 Prentice Hall, Inc. All rights reserved.
48
24 table 25 { 26
border-width: 1px;
27
border-style: solid;
28 } 29
Outline site.css (2 of 3)
30 .forumTitle 31 { 32
background: lime;
33
color: black;
34
font-size: 12pt;
35
font-weight: bold;
36
text-align: center;
37 } 38 39 .msgTitle 40 { 41
background: silver;
42
color: black;
43
font-size: 10pt;
44
font-weight: bold;
45 } 46
2004 Prentice Hall, Inc. All rights reserved.
49
47 .msgInfo 48 { 49
background: silver;
50
color: black;
51
font-size: 10pt;
52 } 53
Outline site.css (3 of 3)
54 .msgPost 55 { 56
background: silver;
57
color: black;
58
font-size: 8pt;
59 } 60 61 .msgText 62 { 63
font-size: 10pt;
64
padding-left: 10px;
65 } 66 67 .date 68 { 69
font-size: 8pt;
70 }
2004 Prentice Hall, Inc. All rights reserved.
50
1
/* Fig. 34.16 : style.css */
2
/* Stylesheet for forums
Outline
*/
3 4
h1
5
{
Define styles for the h1 element.
6
color: #330099;
7
letter-spacing: 2px;
8
font-family: Verdana, Geneva, Arial, Helvetica, sans-serif;
9
style.css (1 of 5)
background-color: transparent;
10 } 11 12 h2 13 {
Define styles for the h2 element.
14
color: #6633FF;
15
font-family: Verdana, Geneva, Arial, Helvetica, sans-serif;
16
font-size: small;
17
background-color: transparent;
18 } 19 20 p 21 {
Define styles for the p element.
22
font-family: Verdana, Geneva, Arial, Helvetica, sans-serif;
23
color: #336666;
24
letter-spacing: 1px;
25
font-size: larger;
2004 Prentice Hall, Inc. All rights reserved.
51
26 27
font-weight: bold;
Outline
background-color: transparent;
28 } 29 30 body 31 {
Define styles for the body element.
32
background-image: url(bug2.gif);
33
background-repeat: no-repeat;
34
margin-top: 5%;
35
background-position: 25%;
36
margin-left: 10%;
style.css (2 of 5)
37 } 38 39 li 40 {
Define styles for the li element.
41
font-family: "Courier New", Courier, monospace;
42
font-weight: bolder;
43
list-style-type: circle;
44
color: #3333FF;
45
background-color: transparent;
46 } 47
2004 Prentice Hall, Inc. All rights reserved.
52
48 input 49 { background-color: transparent;
51
color: #336666;
52
font-family: Verdana, Geneva, Arial, Helvetica, sans-serif;
53 } 54 55 textarea 56 { 57
Outline
Define styles for the input element.
50
style.css (3 of 5)
Define styles for the textarea element.
background-color: transparent;
58
color: #336666;
59
font-family: Verdana, Geneva, Arial, Helvetica, sans-serif;
60 } 61 62 .forumTitle 63 { 64 65
color: #FFFFCC; font-size: 14pt;
66
font-family: Verdana, Geneva, Arial, Helvetica, sans-serif;
67
text-align: center;
68
background-color: #6666CC;
69 } 70
2004 Prentice Hall, Inc. All rights reserved.
53
71 .msgTitle 72 { 73
background: #FFFFCC;
74
color: black;
75
font-size: 10pt;
76
font-weight: bold;
Outline style.css (4 of 5)
77 } 78 79 .msgInfo 80 { 81
background: #FFFFCC;
82
color: black;
83
font-size: 10pt;
84 } 85 86 .msgPost 87 { 88
background: silver;
89
color: black;
90
font-size: 8pt;
91 } 92
2004 Prentice Hall, Inc. All rights reserved.
54
93 .msgText 94 { 95
font-size: 10pt;
96
padding-left: 10px;
97 } 98
Outline style.css (5 of 5)
99 .date 100 { 101
font-size: 8pt;
102 }
2004 Prentice Hall, Inc. All rights reserved.
55
Introduction Setup and Message Forum Documents Forum Navigation Adding Forums Forum XML Documents Posting Messages Other Documents Web Resources
2004 Prentice Hall, Inc. All rights reserved.
1
2
Objectives • In this tutorial, you will learn: – To create a Web-based message forum using Active Server Pages. – To use XML with Active Server Pages. – To be able to add new forums. – To be able to post messages to the message forum. – To use Microsoft’s DOM to manipulate an XML document. – To use XSLT to transform XML documents.
2004 Prentice Hall, Inc. All rights reserved.
3
34.1 Introduction • Message forums – – – –
Popular internet feature Discuss topics Exchange information Several major sites provide this service • messages.yahoo.com/index.html • web.eesite.com/forums • groups.google.com
2004 Prentice Hall, Inc. All rights reserved.
4
34.2 Setup and Message Forum Documents • Prerequisites – – – –
Microsoft Internet Information Services 6 (IIS) Internet Explorer 6 (for XML and XSLT processing) MSXML 3.0 or higher Write permissions on forum folder
2004 Prentice Hall, Inc. All rights reserved.
5
34.2 Setup and Message Forum Documents File name forums.xml default.asp template.xml addForum.asp forumASP.xml formatting.xsl addPost.asp invalid.html site.css style.css
Fig. 34.1
Description XML document listing all available forums and their filenames. Main page, providing navigational links to the forums. Template for a message forum XML document. Adds a forum. Sample message forum. Document for transforming message forums into XHTML. Adds a message to a forum. Used to display an error message. Style sheet for formatting XHTML documents. Style sheet for formatting the message forum site.
Message forum documents.
2004 Prentice Hall, Inc. All rights reserved.
6
34.3 Forum Navigation Fig. 34.2
Key interactions between message forum documents.
default.asp
forums.xml addForum.asp
forumASP.xml formatting.xsl addPost.asp
2004 Prentice Hall, Inc. All rights reserved.
7
34.2 Setup and Message Forum Documents • Forum listing – XML – filename attribute
2004 Prentice Hall, Inc. All rights reserved.
1
Outline
2 3
4
forums.xml (1 of 1)
5 6
7 8
9 10
Name of forum.
XML document that contains the information for forum ASP.
2004 Prentice Hall, Inc. All rights reserved.
8
9
34.2 Setup and Message Forum Documents • Presenting forum listing – Convert to XHTML – CSS for formatting – ASP facilitates the conversion • DOMDocument
• Async property • DocumentElement • ChildNodes
• For Each…Next control structure
2004 Prentice Hall, Inc. All rights reserved.
1
<% @LANGUAGE = "VBScript" %>
Outline
2 3
<% ' Fig. 34.4 : default.asp
4
' Forum home page
5
Option Explicit
6
default.asp (1 of 3)
%>
7 8 9
Link to CSS style sheet style.css.
"http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
10 11 12 13
14
15
16 17
href = "style.css" />
18 19
20
Deitel Message Forums
21
<strong>Available Forums
22
43 44
"><% =strTitle %> element node’s child nodes.
2004 Prentice Hall, Inc. All rights reserved.
10
23 <% 24 Dim xmlFile, xmlNodes, xmlItem Instantiate an XML DOM object. 25 Dim strPath, strTitle, strFileName Setting Async to Load False causes the object referenced by xmlFile Method parses the XML document forums.xml. 26
Outline
27
strPath =
28
to behave synchronously. default.asp Server.MapPath( If the"forums.xml" parsing fails,) the browser is redirected to invalid.html . (2 of 3)
29
Set xmlFile = Server.CreateObject( "Microsoft.XMLDOM" )
30
xmlFile.Async = False
31 32 33 34
If Not xmlFile.Load( strPath ) Then Call Server.Transfer( "invalid.html" ) End If
35 36
Set xmlNodes = xmlFile.DocumentElement.ChildNodes
37 38 39 40 41 %> 42
For Each xmlItem In xmlNodes strFileName = xmlItem.getAttribute( "filename" ) strTitle Property= DocumentElement xmlItem.text
45 <% 46 Next 47 %> 48
gets the root element’s child nodes.
Method getAttribute gets a forum’s filename. The anchor element creates a link to the available forums. 2004 Prentice Hall, Inc. All rights reserved.
11
49 50
Outline
<strong>Forum Management
51 52
- Add a Forum
- Delete a Forum
53
54
55
56 57
default.asp (3 of 3)
58 59
This anchor element links to the ASP document addForum.asp that allows the user to create a new forum.
2004 Prentice Hall, Inc. All rights reserved.
12
13
34.3 Forum Navigation Fig. 34.4
Message forums main page.
2004 Prentice Hall, Inc. All rights reserved.
14
34.3 Adding Forums • Template forum – Bare minimum elements of forum – stylesheet tag for formatting – forum tag
2004 Prentice Hall, Inc. All rights reserved.
1
Outline
2 3
4
template.xml
5 6
7 8
9
The stylesheet processing instruction references formatting.xsl.
2004 Prentice Hall, Inc. All rights reserved.
15
16
34.3 Adding Forums • Generating forum from template – Form to get information on new forum • Name and file name • User name • Message title and text
– Script to act on form input • Confirm valid input • SetAttribute – filename – timestamp • CreateElement • AppendChild • Save
2004 Prentice Hall, Inc. All rights reserved.
1
<% @LANGUAGE = "VBScript" %>
2
<% Option Explicit %>
3 4
Check to see if a value was entered in each of the form fields. addForum.asp Test to see if the form was submitted by testing the form’s (1 of 7) submit field for a value.
<% ' Fig. 34.6 : addForum.asp %>
5 6
Outline
<%
7
Dim xmlFile, xmlRoot, xmlNode
8
Dim strTitle, strError, strPath
9 10
If Request( "submit" ) <> Empty Then
11 12
If Request( "name" ) <> Empty And _
13
Request( "filename" ) <> Empty And _
14
Request( "user" ) <> Empty And _
15
Request( "title" ) <> Empty And _
16
Request( "text" ) <> Empty Then
17 18
' Create a new XML file
19
strPath = Server.MapPath( Request( "filename" ) )
20 21
Set xmlFile = Server.CreateObject( "Microsoft.XMLDOM" )
22
xmlFile.Async = False
23
2004 Prentice Hall, Inc. All rights reserved.
17
24 25 26
If xmlFile.Load( strPath ) Then Call Server.Transfer( "invalid.html" ) End If
Outline
27 28
' set up the file
29
Call xmlFile.Load(
addForum.asp Method Load loads the template XML document. (2 of 7) Server.MapPath( "template.xml" ) )
30 31
' get the root element
32
Set xmlRoot = xmlFile.DocumentElement
33 34
' set the filename
35
Call xmlRoot.SetAttribute( "filename", _
36
Request( "filename" ) )
37 38
' create Name node
39
Set xmlNode = xmlFile.CreateElement( "name" )
40
xmlNode.Text = Request( "name" )
41
Call
42
Method setAttribute creates an attribute node named filename that has the value contained in xmlRoot.AppendChild( xmlNode ) form field filename.
43
' create first message
44
Set xmlNode = xmlFile.CreateElement( "message" )
45
Call xmlNode.SetAttribute( "timestamp", Now & " EST" )
46
Call xmlRoot.AppendChild( xmlNode )
47 48
Set xmlRoot = xmlNode
Method AppendChild appends the newly created element name node to the root element. 2004 Prentice Hall, Inc. All rights reserved.
18
49 50
' create user node
51
Set xmlNode = xmlFile.CreateElement( "user" )
52
xmlNode.Text = Request( "user" )
53
Call xmlRoot.AppendChild( xmlNode )
Outline addForum.asp (3 of 7)
54 55
' create title node
56
Set xmlNode = xmlFile.CreateElement( "title" )
57
xmlNode.Text = Request( "title" )
58
Call xmlRoot.AppendChild( xmlNode )
59 60
' create text node
61
Set xmlNode = xmlFile.CreateElement( "text" )
62
xmlNode.Text = Request( "text" )
63
Call xmlRoot.AppendChild( xmlNode )
Calling method Save saves the XML document to disk.
64 65
Call xmlFile.Save( strPath ) ' save the file
66 67
' load XML file
68
strPath = Server.MapPath( "forums.xml" )
69 70
Set xmlFile = Server.CreateObject( "Microsoft.XMLDOM" )
71
xmlFile.Async = False
Open XML document forums.xml.
72
2004 Prentice Hall, Inc. All rights reserved.
19
73
If Not xmlFile.Load( strPath ) Then
74 75
Outline
Call Server.Transfer( "invalid.html" ) End If
76 77
' get the root node
78
Set xmlRoot = xmlFile.DocumentElement
addForum.asp (4 of 7)
79 80
' create nodes
81
Set xmlNode = xmlFile.CreateElement( "forum" )
82
Call xmlNode.SetAttribute( "filename", _
83
Request( "filename" ) )
84
xmlNode.Text = Request( "name" )
85
Call xmlRoot.AppendChild( xmlNode )
Modify forums.xml.
86 87
Call xmlFile.Save( strPath ) ' save the file
88 89
' finished processing
90
Call Server.Transfer( "default.asp" )
91
Else
92 93
strError = "ERROR: Invalid input." End If
94 95
Save forums.xml with its new contents to disk.
End If
96 %> 97
2004 Prentice Hall, Inc. All rights reserved.
20
98
Outline
101 102 103 104
105
addForum.asp (5 of 7)
This XHTML form allows a user to input the name, filename, a user name, a message title and the message text to create a new forum.
106 107
108 109
Create a Forum
110<% =strError %>
111 112150 151 152 153
addForum.asp The Submit button submits the form and the (7 of 7) values input in the form fields.
ThetoClear will Return Main button Page
Outline
delete all values in the form
fields.
154 155 156 157
2004 Prentice Hall, Inc. All rights reserved.
23
24
34.3 Adding Forums Fig. 34.6
Page to add a forum.
2004 Prentice Hall, Inc. All rights reserved.
25
34.5 Forum XML Documents • Sample forum – XML modified with several forums added – XSLT used to transform XML – Final XHTML page served to Internet Explorer
2004 Prentice Hall, Inc. All rights reserved.
1
2 3
4
name of the forum.
Outline forumASP.xml (1 of 2)
7 8 9 10
element and its children contain the information for a post.
11 12
<message timestamp = "4/28/2001 2:50:34 PM EST">
13
<user>D. Bug
14
15
16
17
2004 Prentice Hall, Inc. All rights reserved.
26
18
<message timestamp = "5/8/2001 11:09:54 AM EST">
19
<user>Ms. Quito
20
21
22
23 24
forumASP.xml (2 of 2)
<message timestamp = "5/15/2001 4:39:50 PM EST">
25
<user>Sarge Ant
26
27
28
Outline
29 30
2004 Prentice Hall, Inc. All rights reserved.
27
1 2 3 4 5 6 7 8 9 10 11 12
<xsl:output method = "html" omit-xml-declaration = "no" doctype-system = doctype-public =
<xsl:template match = "/">
15 16 17 18
Select the template that matches the XML document root (/). "-//W3C//DTD XHTML 1.0 Strict//EN" /> The asterisk selects element nodes. The attribute xmlns creates a namespace
"http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd"
13 14
Outline
Attribute version specifies the XSLT version to XSLT which thisXML style sheet conforms. root element. Attribute omit-xmlformatting.xsl The xsl:output element specifies how the result declaration is assigned no, (1 of 4) <xsl:stylesheet version = "1.0" tree is output. which results in an XML Attribute method is assigned html, which specifies that xmlns:xsl = "http://www.w3.org/1999/XSL/Transform"> declaration in the an result tree. document is being output. XHTML
prefix xsl.
<xsl:apply-templates select = "*" />
19 20
21 22
<xsl:template match = "forum">
23
2004 Prentice Hall, Inc. All rights reserved.
28
24
25
26
27 28
href = "style.css" />
Link to the CSS style sheet style.css. formatting.xsl (2 of 4)
29 30
Outline
31 32
33
cellpadding = "2">
34
35
36 37
<xsl:value-of select = "name" />
38
39
Get value of name element.
40 41
42
cellpadding = "2">
43
<xsl:apply-templates
44 45 46
select = "message" />
Apply message template.
2004 Prentice Hall, Inc. All rights reserved.
29
47 48
49
<xsl:attribute
50
name = "href">addPost.asp?file=<xsl:value-of
51
select = "@filename" />
52
53
Post a Message
54 55
Outline
formatting.xsl (3 of 4)
Get the value of attribute filename.
Return to Main Page
56 57
Begin template message.
58 59
60 61
<xsl:template match = "message">
62 63 64
65 66 67
<xsl:value-of select = "title" />
68 69 70
Get value of user element.
71
by
72
<em><xsl:value-of select = "user" />
2004 Prentice Hall, Inc. All rights reserved.
30
73
at
74
<span class = "date">
75
<xsl:value-of select = "@timestamp" />
76 77 78
Outline
formatting.xsl Get value of attribute timestamp . (4 of 4)
79 80 81
82 83 84
<xsl:value-of select = "text" />
85
Get value of text element.
86 87
88 89
2004 Prentice Hall, Inc. All rights reserved.
31
1 2
Outline
"http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
3 4
5
6 7
(1 of 3)
8 9
10
11
title.
12
13 14 15 16 17
| ASP Forum |
Message title.
20 21 22 23 24
32
| I Love ASP! | ||
27 by 28 <em>D. Bug 29 at 30 <span class = "date">4/28/2001 2:50:34 PM EST | ||
40 by 41 <em>Ms. Quito 42 at 43 | ||
47 48 Message text. Message author. <span class = "date">5/8/2001 11:09:54 AM EST | ASP and XML | Everyone should use ASP. |
| ASP | ||
54 by 55 <em>Sarge Ant 56 at 57 (3 of 3) <span class = "date">5/15/2001 4:39:50 PM EST | ||
61 This army ant uses ASP in boot camp. |
64 65
66
Post a Message
67
68
Return to Main Page
69
70 71
72
34
Link to add a new post.
73
2004 Prentice Hall, Inc. All rights reserved.
35
34.5 Forum XML Documents Fig. 34.9
Output of the transformation of the forum XML document.
2004 Prentice Hall, Inc. All rights reserved.
36
34.6 Posting Messages • Posting a message – Procedure similar to creating new forum
2004 Prentice Hall, Inc. All rights reserved.
1
<% @LANGUAGE = "VBScript" %>
Outline
2 3 4
<% ' Fig. 34.10 : addPost.asp ' ASP document for posting a message
5 6 7
Option
Check to see if a value was entered in each of the form fields. ExplicitTest to see if the form was submitted by testing the form’s submit field for a value.
8
Dim xmlFile, xmlRoot, xmlNode
9
Dim strTitle, strError, strPath
addPost.asp (1 of 5)
10 11
If Request( "submit" ) <> Empty Then
12 13
If Request( "file" ) <> Empty And _
Method Load loads the forum XML document.
14
Request( "userName" ) <> Empty And _
15
Request( "messageTitle" ) <> Empty And _
16
Request( "messageText" ) <> Empty Then
17 18
strPath = Server.MapPath( Request( "file" ) )
19 20
Set xmlFile = Server.CreateObject( "Microsoft.XMLDOM" )
21
xmlFile.Async = False
22 23 24 25
If Not xmlFile.Load( strPath ) Then Call Server.Transfer( "invalid.html" ) End If
2004 Prentice Hall, Inc. All rights reserved.
37
26 27
' get the root node
28
Set xmlRoot = xmlFile.DocumentElement
Outline
29 30
' create first message
31
Set xmlNode = xmlFile.CreateElement( "message" )
32
Call xmlNode.SetAttribute( "timestamp", Now & " EST" )
33
Call xmlRoot.AppendChild( xmlNode )
34 35
Set xmlRoot = xmlNode
addPost.asp Create a message (2 ofnode. 5)
Create a timeStamp attribute for the message node.
36 37
' create user node
38
Call CreateElementNode( "user", "userName", xmlNode )
39 40
' create title node
41
Call CreateElementNode( "title", "messageTitle", xmlNode )
42 43
' create text node
44
Call CreateElementNode( "text", "messageText", xmlNode )
45 46
Call xmlFile.Save( strPath ) ' save the file
47 48
' finished processing
49
Call Server.Transfer( Request( "file" ) )
Create the children of the message node: user, title and text.
2004 Prentice Hall, Inc. All rights reserved.
38
50
Else
51 52
strError = "ERROR: Invalid input." End If
Outline
53 54
addPost.asp (3 of 5)
End If
55 56
' procedure that creates an element node
57
Sub CreateElementNode( elementName, formElement, node )
58
Set xmlNode = xmlFile.CreateElement( elementName )
59
xmlNode.Text = Request( formElement )
60
Call xmlRoot.AppendChild( node )
61
End Sub
62 %> 63 64 66 67 68 69
70
71 72
href = "style.css" />
73
2004 Prentice Hall, Inc. All rights reserved.
39
74 75
Outline
<% =strError %>
76 77 78
Outline addPost.asp (5 of 5)
104 105
106
">Return to Forum
107
108
109 110
2004 Prentice Hall, Inc. All rights reserved.
41
42
34.6 Posting Messages Fig. 34.10
Adding a message to a forum.
2004 Prentice Hall, Inc. All rights reserved.
43
34.6 Posting Messages Fig. 34.11
New forum on the message board.
2004 Prentice Hall, Inc. All rights reserved.
44
34.6 Posting Messages Fig. 34.12
Initial content of the newly added forum.
2004 Prentice Hall, Inc. All rights reserved.
45
34.6 Posting Messages Fig. 34.13 Contents of the Internet and World Wide Web: Third Edition forum.
2004 Prentice Hall, Inc. All rights reserved.
46
34.7 Other Documents • Other documents required by forum – Error page – CSS for formatting • XHTML • Forums
2004 Prentice Hall, Inc. All rights reserved.
1
2
"http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
3 4
-->
6 7
Link that references CSS style sheet site.css.
10
11
12 13
invalid.html (1 of 1)
8 9
Outline
href = "site.css" />
14 15 16
Invalid Request.
17 18 19
20 21
2004 Prentice Hall, Inc. All rights reserved.
47
1
/* Fig. 34.15 : site.css
2
/* Stylesheet for XHTML documents */
*/
Outline
3 4
body
5
{
6
background: white;
7
color: black;
8
font-family: Arial, sans-serif;
9
font-size: 10pt;
Define styles for the body element.
site.css (1 of 3)
10 } 11 12 a 13 {
Define styles for the anchor element.
14
background: transparent;
15
color: blue;
16
text-decoration: none;
17 } 18 19 a:hover 20 { 21
Define styles for the table element.
text-decoration: underline;
22 } 23
2004 Prentice Hall, Inc. All rights reserved.
48
24 table 25 { 26
border-width: 1px;
27
border-style: solid;
28 } 29
Outline site.css (2 of 3)
30 .forumTitle 31 { 32
background: lime;
33
color: black;
34
font-size: 12pt;
35
font-weight: bold;
36
text-align: center;
37 } 38 39 .msgTitle 40 { 41
background: silver;
42
color: black;
43
font-size: 10pt;
44
font-weight: bold;
45 } 46
2004 Prentice Hall, Inc. All rights reserved.
49
47 .msgInfo 48 { 49
background: silver;
50
color: black;
51
font-size: 10pt;
52 } 53
Outline site.css (3 of 3)
54 .msgPost 55 { 56
background: silver;
57
color: black;
58
font-size: 8pt;
59 } 60 61 .msgText 62 { 63
font-size: 10pt;
64
padding-left: 10px;
65 } 66 67 .date 68 { 69
font-size: 8pt;
70 }
2004 Prentice Hall, Inc. All rights reserved.
50
1
/* Fig. 34.16 : style.css */
2
/* Stylesheet for forums
Outline
*/
3 4
h1
5
{
Define styles for the h1 element.
6
color: #330099;
7
letter-spacing: 2px;
8
font-family: Verdana, Geneva, Arial, Helvetica, sans-serif;
9
style.css (1 of 5)
background-color: transparent;
10 } 11 12 h2 13 {
Define styles for the h2 element.
14
color: #6633FF;
15
font-family: Verdana, Geneva, Arial, Helvetica, sans-serif;
16
font-size: small;
17
background-color: transparent;
18 } 19 20 p 21 {
Define styles for the p element.
22
font-family: Verdana, Geneva, Arial, Helvetica, sans-serif;
23
color: #336666;
24
letter-spacing: 1px;
25
font-size: larger;
2004 Prentice Hall, Inc. All rights reserved.
51
26 27
font-weight: bold;
Outline
background-color: transparent;
28 } 29 30 body 31 {
Define styles for the body element.
32
background-image: url(bug2.gif);
33
background-repeat: no-repeat;
34
margin-top: 5%;
35
background-position: 25%;
36
margin-left: 10%;
style.css (2 of 5)
37 } 38 39 li 40 {
Define styles for the li element.
41
font-family: "Courier New", Courier, monospace;
42
font-weight: bolder;
43
list-style-type: circle;
44
color: #3333FF;
45
background-color: transparent;
46 } 47
2004 Prentice Hall, Inc. All rights reserved.
52
48 input 49 { background-color: transparent;
51
color: #336666;
52
font-family: Verdana, Geneva, Arial, Helvetica, sans-serif;
53 } 54 55 textarea 56 { 57
Outline
Define styles for the input element.
50
style.css (3 of 5)
Define styles for the textarea element.
background-color: transparent;
58
color: #336666;
59
font-family: Verdana, Geneva, Arial, Helvetica, sans-serif;
60 } 61 62 .forumTitle 63 { 64 65
color: #FFFFCC; font-size: 14pt;
66
font-family: Verdana, Geneva, Arial, Helvetica, sans-serif;
67
text-align: center;
68
background-color: #6666CC;
69 } 70
2004 Prentice Hall, Inc. All rights reserved.
53
71 .msgTitle 72 { 73
background: #FFFFCC;
74
color: black;
75
font-size: 10pt;
76
font-weight: bold;
Outline style.css (4 of 5)
77 } 78 79 .msgInfo 80 { 81
background: #FFFFCC;
82
color: black;
83
font-size: 10pt;
84 } 85 86 .msgPost 87 { 88
background: silver;
89
color: black;
90
font-size: 8pt;
91 } 92
2004 Prentice Hall, Inc. All rights reserved.
54
93 .msgText 94 { 95
font-size: 10pt;
96
padding-left: 10px;
97 } 98
Outline style.css (5 of 5)
99 .date 100 { 101
font-size: 8pt;
102 }
2004 Prentice Hall, Inc. All rights reserved.
55
Related Documents
Case Study Asp And Xml
November 2019 0
Uso De Xml En Asp
April 2020 2
Case Study
April 2020 41
Case Study
May 2020 38
Case Study
June 2020 28