[XSL-LIST Mailing List Archive Home] [By Thread] [By Date] [Recent Entries] [Reply To This Message] Re: Open Source - Excel to XML Converter
Sorry, I missed the subject line. We can fix that ;-) Visual basic class to write to a text file, name this clXFile: <code><![*CDATA*[ Private fno As Integer Private eno As Long Function xOpen(fs As String) fno = FreeFile(0) Open fs For Output As #fno eno = Err.Number xOpen = eno End Function Property Let xRec(val As String) Print #fno, val End Property Property Get ErrorNo() As Long ErrorNo = eno End Property Sub xClose() Close fno fno = 0 End Sub ]]></code> Usage: <code><![*CDATA*[ ... Dim er As Long Dim ux As New clXFile er = ux.xOpenOut(fname) er = ux.xOpenOut(fname) If (er = 0) Then ux.xRec() = "<root>" ux.xRec() = "<row>...</row>" .... Call ux.xClose End If ]]></code> Bryce K. Nielsen wrote: Not very OpenSource, like the OP requested ;-)
|
PURCHASE STYLUS STUDIO ONLINE TODAY!Purchasing Stylus Studio from our online shop is Easy, Secure and Value Priced! Download The World's Best XML IDE!Accelerate XML development with our award-winning XML IDE - Download a free trial today! Subscribe in XML format
|