XML in Access 2003: IXMLDOMNode - Invalid Character in Content Mod

[SHC]

Hi all,
I ran the attached volcanoes.xml (with geology.dtd) in the Module of Access
2003.
I got the following error:
Microsoft Office Access
You have error Invalid Character in
content model.
|OK|

Please help and advise me what is wrong in my source code and how to correct
the problem.
Thanks in advance,
SHC

////---volcanoes.xml---////
<?xml version="1.0" ?>
<!DOCTYPE geology SYSTEM "geology.dtd">
<!-- Volcano data -->
<geology>
<volcano name="Erebus">
<location>Ross Island, Antarctica</location>
<height value="3794" unit="m"/>
<type>stratovolcano</type>
<eruption>constant activity</eruption>
<magma>basanite to trachyte</magma>
</volcano>
<volcano name="Hekla">
<location>Iceland</location>
<type>stratovolcano</type>
<height value="1491" unit="m"/>
<eruption>1970</eruption>
<eruption>1980</eruption>
<eruption>1991</eruption>
<magma>calcalkaline</magma>
<comment>The type is actually intermediate between crater row
and stratovolcano types</comment>
</volcano>
<volcano name="Mauna Loa">
<location>Hawaii</location>
<type>shield</type>
<height value="13677" unit="ft"/>
<eruption>1984</eruption>
<magma>basaltic</magma>
</volcano>
</geology>

/////---geology.dtd---////
<!ELEMENT geology (volcano)+>
<!ELEMENT volcano (location, height, type, eruption+, magma, comment?>
<!ATTLIST volcano name CDATA #IMPLIED>
<!ELEMENT location (#PCDATA)>
<!ELEMENT height EMPTY>
<!ATTLIST height value CDATA #IMPLIED
unit CDATA #IMPLIED)
<!ELEMENT type (#PCDATA)>
<!ELEMENT eruption (#PCDATA)>
<!ELEMENT magma (#PCDATA)>
<!ELEMENT comment (#PCDATA)>

[SHC]

More attachment to add to this post. SHC

The source code in the Module of Access 2003 is:

Sub getGeologyNodeList()

' The following Microsoft® Visual Basic® example uses vocanoes.xml
' to create an IXMLDOMNodeList and display its XML.
' Supports iteration through the live collection, in addition to
' indexed access.
Dim xmlDoc As New MSXML2.DOMDocument50
Dim currNode As IXMLDOMNode

Set xmlDoc = New MSXML2.DOMDocument50

xmlDoc.async = False
xmlDoc.Load ("C:\MSXML-msdn\volcanoes.xml")

If (xmlDoc.parseError.errorCode <> 0) Then
Dim myErr
Set myErr = xmlDoc.parseError
MsgBox ("You have error " & myErr.reason)
Else
Set objNodeList = xmlDoc.getElementsByTagName("volcano")
Dim strResult As String
strResult = "The node list has " & objNodeList.length & _
" items." & vbCrLf
MsgBox ("strResult-how many?: " & strResult)
Dim x As Long
x = 1
For x = 1 To objNodeList.length
strResult = strResult & CStr(x) & ": " & objNodeList.Item(x - 1).XML &
vbCrLf
Next
MsgBox ("strResult-details: " & strResult)
End If
End Sub

"SHC" wrote:

Hi all,
I ran the attached volcanoes.xml (with geology.dtd) in the Module of Access
2003.
I got the following error:
Microsoft Office Access
You have error Invalid Character in
content model.
|OK|

Please help and advise me what is wrong in my source code and how to correct
the problem.
Thanks in advance,
SHC

////---volcanoes.xml---////
<?xml version="1.0" ?>
<!DOCTYPE geology SYSTEM "geology.dtd">
<!-- Volcano data -->
<geology>
<volcano name="Erebus">
<location>Ross Island, Antarctica</location>
<height value="3794" unit="m"/>
<type>stratovolcano</type>
<eruption>constant activity</eruption>
<magma>basanite to trachyte</magma>
</volcano>
<volcano name="Hekla">
<location>Iceland</location>
<type>stratovolcano</type>
<height value="1491" unit="m"/>
<eruption>1970</eruption>
<eruption>1980</eruption>
<eruption>1991</eruption>
<magma>calcalkaline</magma>
<comment>The type is actually intermediate between crater row
and stratovolcano types</comment>
</volcano>
<volcano name="Mauna Loa">
<location>Hawaii</location>
<type>shield</type>
<height value="13677" unit="ft"/>
<eruption>1984</eruption>
<magma>basaltic</magma>
</volcano>
</geology>

/////---geology.dtd---////
<!ELEMENT geology (volcano)+>
<!ELEMENT volcano (location, height, type, eruption+, magma, comment?>
<!ATTLIST volcano name CDATA #IMPLIED>
<!ELEMENT location (#PCDATA)>
<!ELEMENT height EMPTY>
<!ATTLIST height value CDATA #IMPLIED
unit CDATA #IMPLIED)
<!ELEMENT type (#PCDATA)>
<!ELEMENT eruption (#PCDATA)>
<!ELEMENT magma (#PCDATA)>
<!ELEMENT comment (#PCDATA)>

[Chris Lovett]

The following element declaration in the DTD has some incomplete syntax:

<!ELEMENT volcano (location, height, type, eruption+, magma, comment?>

In particular, there is a missing close paren after the question mark. This
should be:

<!ELEMENT volcano (location, height, type, eruption+, magma, comment?)>

There is also a problem with the ATTLIST:

<!ATTLIST height value CDATA #IMPLIED unit CDATA #IMPLIED)

The close paren should be a close angle bracket:

<!ATTLIST height value CDATA #IMPLIED unit CDATA #IMPLIED>

Then this will allow the DTD to load but you will now get some validation
errors because the XML does not fully comply with this DTD. In particular:

Warning: The element 'volcano' has invalid child element 'type'. Expected
'height'.

Hint: you can find and fix errors like this easily using Visual Studio 2005
Beta 2 Express editions (VBExpress or C# express, or Web Express) which you
can download from http://msdn.microsoft.com/vstudio/.

"SHC" <SH*@discussions.microsoft.com> wrote in message
news:70**********************************@microsof t.com...

Hi all,
I ran the attached volcanoes.xml (with geology.dtd) in the Module of
Access
2003.
I got the following error:
Microsoft Office Access
You have error Invalid Character in
content model.
|OK|

Please help and advise me what is wrong in my source code and how to
correct
the problem.
Thanks in advance,
SHC

////---volcanoes.xml---////
<?xml version="1.0" ?>
<!DOCTYPE geology SYSTEM "geology.dtd">
<!-- Volcano data -->
<geology>
<volcano name="Erebus">
<location>Ross Island, Antarctica</location>
<height value="3794" unit="m"/>
<type>stratovolcano</type>
<eruption>constant activity</eruption>
<magma>basanite to trachyte</magma>
</volcano>
<volcano name="Hekla">
<location>Iceland</location>
<type>stratovolcano</type>
<height value="1491" unit="m"/>
<eruption>1970</eruption>
<eruption>1980</eruption>
<eruption>1991</eruption>
<magma>calcalkaline</magma>
<comment>The type is actually intermediate between crater row
and stratovolcano types</comment>
</volcano>
<volcano name="Mauna Loa">
<location>Hawaii</location>
<type>shield</type>
<height value="13677" unit="ft"/>
<eruption>1984</eruption>
<magma>basaltic</magma>
</volcano>
</geology>

/////---geology.dtd---////
<!ELEMENT geology (volcano)+>
<!ELEMENT volcano (location, height, type, eruption+, magma, comment?>
<!ATTLIST volcano name CDATA #IMPLIED>
<!ELEMENT location (#PCDATA)>
<!ELEMENT height EMPTY>
<!ATTLIST height value CDATA #IMPLIED
unit CDATA #IMPLIED)
<!ELEMENT type (#PCDATA)>
<!ELEMENT eruption (#PCDATA)>
<!ELEMENT magma (#PCDATA)>
<!ELEMENT comment (#PCDATA)>