Any ideas on this. I am trying to loop through an xml document to remove
attributes, but Im having so much trouble, any help is appreciated
//THIS IS THE EXCEPTION ( SEE CODE LINE WHERE FAILURE OCCURS
'//Unexpected XML declaration. The XML declaration must be the first node in
the document, and no white space characters are allowed to appear before it.
Line 13, position 11.
//THE XHTML TEXT WHICH IS BEING LOOOKED AT
<table cellspacing="0" rules="all" border="1" id="dgArticles "
style="font-family:Arial;fo nt-size:8pt;width: 762px;border-collapse:collap se;">
<tr style="color:Wh ite;background-color:Blue;">
<td> </td><td style="width:0. 75cm;">ID</td><td
style="width:7c m;">Title</td><td style="width:13 cm;">Summary</td><td
style="width:1c m;">Published </td>
</tr><tr valign="Top">
<td><a href='Articles/Art226/Art226.html'
target=_blank>O pen</a></td><td>226</td><td>SQL Server 2005
Permissions</td><td>See this article for a handy reference to the complete
list of permissons on SQL Server 2005 </td><td>28/12/2006</td>
</tr><tr valign="Top">
<td><a href='Articles/Art223/Art223.html'
target=_blank>O pen</a></td><td>223</td><td>SQL Schemas In SQL
2005</td><td>Want to know a little more about schemas in SQL Server 2005,
take a look at this quick overview. </td><td>25/12/2006</td>
</tr><tr valign="Top">
<td><a href='Articles/Art224/Art224.html'
target=_blank>O pen</a></td><td>224</td><td>SQL Server 2005 - Must_Change
option</td><td>When de-checking Enforce Password Policy, SQL Security
responds with an error and refers to Must_Change being in force. This
article shows you how to reverse this. </td><td>27/12/2006</td>
</tr><tr valign="Top">
<td><a href='Articles/Art220/Art220.html'
target=_blank>O pen</a></td><td>220</td><td>Installi ng Adventureworks
Sample</td><td>If you dont install the samples for Adventureworks first
time, getting them on can be a little tricky. This article explains.
</td><td>23/12/2006</td>
</tr>
</table>
'// THE CODE WHICH PROCESSES THE xhtml
Private Sub useXmlDocButton _Click(ByVal sender As System.Object, ByVal e As
System.EventArg s) Handles useXmlDocButton .Click
GC.Collect()
'Clear message
Me.messageTextB ox.Text = String.Empty
Dim xmlString As String
'//Some pre-processing here
xmlString = Me.sourcetextBo x.Text.ToLower
'//Remove nbsp
xmlString = Regex.Replace(x mlString, " ", "")
'//Remove any explorer codes
xmlString = Regex.Replace(x mlString, "&[a-zA-Z0-9]*;", "")
'//Remove any unquoted attributes which appear at the end of a tag
xmlString = Regex.Replace(x mlString, " [A-Za-z0-9]*=[A-Za-z0-9_]*>", ">")
'//Remove any unquoted attributes which before end of tag
xmlString = Regex.Replace(x mlString, " [A-Za-z0-9]*=[A-Za-z0-9_]* ", "")
'Finally prepend the cml declaration needed
xmlString = "<?xml version='1.0' encoding='utf-8'?" & xmlString
Me.sourcetextBo x.Text = xmlString
'Get the xml into a stream
Dim stream As New System.IO.Memor yStream
stream.Write((N ew System.Text.UTF 8Encoding).GetB ytes(xmlString) , 0,
xmlString.Lengt h)
stream.Position = 0
Dim xDoc As New System.Xml.XmlD ocument
xDoc.Load(strea m)
stream.Position = 0
Dim xreader As New System.Xml.XmlT extReader(strea m)
Dim xNode As System.Xml.XmlN ode
stream.Position = 0
While xreader.Read()
If xreader.NodeTyp e = Xml.XmlNodeType .Element Then
xNode = xDoc.ReadNode(x reader) '//************* THIS IS WHERE IT FAILS //
xNode.Attribute s.RemoveAll()
End If
End While
Dim sr As New System.IO.Strea mReader(stream)
stream.Position = 0
targetTextBox.T ext = sr.ReadToEnd
sr.Close()
sr.Dispose()
xreader.Close()
stream.Close()
stream.Dispose( )
