XML / XSL

One way to do this is to learn Xsl Transformations (W3C Tutorial[^]), transform Xml to Html using System.Xml.Xsl.XslTransform object and display it using WebBrowser COM object. (See Hosting a webpage inside a Windows Form[^] and Using the WebBrowser control in .NET[^]) Tomáš Petříček  :baaaa!: EeekSoft Tools www.eeeksoft.net

I have seen this done using xsl:param directly under the xsl:stylesheet declaration to pass in parameters, but I have only seen this work with command-line processors like Saxon, Xalan. Unfortunately, MSXML does not support top-level parameters. The workaround would be to append the data you want to pass through a parameter in the XML to be transformed and read it into a top-level variable.

Oops... sorry, I mis-read your post and thought you were looking for XSL resources.

Console application: Option Strict Off Imports System.IO Imports System.Xml Module Module1 Sub Main() Try Dim iStartPositions As Integer() = {0, 4, 5, 14} Dim sFixedWidthText As String = GetFileContents("C:\FixedWidthText.txt") Dim sw As New StringWriter Dim writer As New XmlTextWriter(sw) writer.WriteStartElement("Rows") Dim sRows As String() = sFixedWidthText.Split(vbCrLf) Dim iRow, iColumn As Integer Dim sRowText As String Dim al As ArrayList For iRow = 0 To sRows.Length - 1 writer.WriteStartElement("Row") sRowText = sRows(iRow) al = GetDelimitedTextArray(sRowText, iStartPositions) For iColumn = 0 To al.Count - 1 writer.WriteStartElement("Column" & iColumn) writer.WriteString(al(iColumn)) writer.WriteEndElement() Next writer.WriteEndElement() Next writer.WriteEndElement() SaveTextToFile(sw.ToString, "C:\FixedWidthText.xml") Console.WriteLine("File saved") Console.ReadLine() Catch ex As Exception Console.WriteLine(ex.ToString) Console.ReadLine() End Try End Sub Public Function GetDelimitedTextArray(ByVal sRowText As String, ByVal iStartPositions As Integer()) As ArrayList Dim al As New ArrayList Dim i As Integer Dim sColumnText As String For i = 0 To iStartPositions.Length - 1 If i = iStartPositions.Length - 1 Then sColumnText = sRowText.Substring(iStartPositions(i)) Else sColumnText = sRowText.Substring(iStartPositions(i), iStartPositions(i + 1) - iStartPositions(i)) End If al.Add(sColumnText) Next Return al End Function Public Function GetFileContents(ByVal FullPath As String) As String Dim sContents As String Dim oReader As New StreamReader(FullPath) sContents = oReader.ReadToEnd() oReader.Close() Return sContents End Function Public Sub SaveTextToFile(ByVal sData As String, ByVal FullPath As String) Dim oWriter As StreamWriter oWriter = New StreamWriter(FullPath) oWriter.Write(sData) oWriter.Close() End Sub End Module

I ran into this same "issue", and I ended up just storing the Date as a string in the XML and then converting it back into a Date/Time when I read the data back in ... There's probably a more "direct" approach to take, but this works just fine. D.

it's not the debug mode. i was trying to perform .Release() on the XML IXMLDOMDocument2Ptr object at different places in the code - in order to search for the place that keeps the resources unreleased after that method call. i found that the method released the resources, until i used a function call, to my own function which one of its parameters is from type IXMLDOMNodePtr. i could see that a new reference to the object was added, but i wasn't able to release the resources after this function all, even by using "= NULL" on the object in this function plus the original one that was sent. am i not releasing the object as i should? can't i send a smart pointer as a parameter to my own function and get rid of the object afterwards (not the object - it's cought resources - the object itself becomes NULL)?

Thanks for the Reply, I ended up figuring it out this morning in 15min ;P (after working on it for 10hrs yesterday)... I ended up with this: //DataRow[DataColumn[@Name='DatabaseID' and @Value='1'] and DataColumn[@Name='ID' and @Value='26']]

thank you. I try it. Best Regards, yu-yu

Are you sure this is easier/more efficient that the method previously suggested, especially given that the current element node is already known and sotred in a local variable? ~Mike Stanbrook

Good point - the XML generated is bursting with type information, so there's no reason I can see for this not to work, but it doesn't. How pathetic. Christian I have drunk the cool-aid and found it wan and bitter. - Chris Maunder

i think you need XmlDocument.ImportNode "When the only tool you have is a hammer, a sore thumb you will have."

Just to confirm the characters: & < > " ' ControlChars.Quote is the equivalent for C's \" Jim