Copyright ® (1997-2003) EDMGROUP Pty Ltd - XML Database - XSTORAGE Reference

xdocument_root

[This is preliminary documentation and subject to change.]

Returns reference of the XDocument rooot
Status:

Ready

Visual Basic Syntax

Private Declare Function xdocument_root
Lib "xmllab_dll.dll"

(ByVal DocObject As Long)
As Long

 

Example

The following Microsoft® Visual Basic® example shows how to obtain XDocument root reference

Private Sub loaded_documents_Click()
Dim XMLFILENAME As String
Dim DocObject, XML_ROOT As Long
Dim Index As Integer

DocObject = loaded_documents.List(loaded_documents.ListIndex)
' convert to integer
XMLFILENAME = File1.Path & "\" & "xml_laboratory.xml"
XML_ROOT = xdocument_root (DocObject)
If XML_ROOT <> 2 Then
loaded_filename.Caption = "Saveto: " & XMLFILENAME
Call xdocument_node_2_file(XML_ROOT, XMLFILENAME)
WebBrowser.Navigate2 ("file://" & XMLFILENAME)
Else
loaded_filename.Caption = "Failed to obtain Document Root" & XMLFILENAME
End If

End Sub
[C/C++]

C/C++ Syntax

   

Under development

C/C++ Return Values

C Sample

Under development

 

Remarks

 

See Also

 

  Contact Us   |   |  

 © 1997-2003 EDMGROUP (Australia) Pty Ltd. All rights reserved.