XPathDocument

[Joe Pannone]

I need a way to allow a variable to equal an xml document. When using
xpathdocument the parameter is asking for a filename. Since I plan on doing
a lot of search in the xml document I would like to supply a variable instead
of the xml doc.

This is the code I use:
dim docNav As XPathDocument
docNav = New XPathDocument(" c:\adsp_dispatc h.xml")

I would like to use something like:
dim docNav As XPathDocument
dim curXMLDoc = [a SQL statenent that gets the XML message/document from my
SQL server]
docNav = New XPathDocument(c urXMLDoc)

I found the following code, but I cannot get it to work:

Dim mySelectQuery As String = "select msg as val from tblMessage
where id=1011 FOR XML AUTO, XMLDATA, " & _
"ELEMENTS, BINARY BASE64"

Dim myConnectString As String =
"server=xxxx;ui d=sa;password=x xx;database=xxx x"
Dim sqlConn As SqlConnection = New SqlConnection(m yConnectString)
sqlConn.Open()
Dim sqlComm As SqlCommand = New SqlCommand(mySe lectQuery, sqlConn)
sqlComm.Command Timeout = 15
Dim reader As XmlTextReader = CType(sqlComm.E xecuteXmlReader (),
XmlTextReader)

' Instantiate an XPathDocument using the XmlTextReader.
' Dim doc As XPathDocument = New XPathDocument(r eader,
XmlSpace.Preser ve)

docNav = New XPathDocument(r eader, XmlSpace.Preser ve)
Please help...