' Comments: Read all the contents of an XML file or text string using VBA and VB6. Private Const mcstrXMLFile As String = "C:\Total Visual SourceBook 2013\Samples\white-house.xml" ' Then run either of the procedures by putting the cursor in the procedure and pressing: ' F5 to run it, or ' F8 to step through it line-by-line (see the Debug menu for more options) ' View the results in the immediate window ' ' To use this example, create a new module and paste this code into it. ' Example of using the CXMLFileRead class to read XML files in VBA and VB6. Get the node value by calling it explicitly or searching for it. Get the number of siblings for the current node. Get the number of child items in the current node. Optionally resets the current node to the new node if it was found. Get the name and value of the next sibling node. Optionally reset the current node to the new node if it was found. Get the name and value of the next child node. Use the GetChildNodeCount procedure to get the number of child nodes for the current node. Optionally reset the current node to the new node if it wasįound. Get the name and value of the specified child node by index. Get all the child nodes, then the sibling nodes, and then back to the parent level. Get the number of nodes in the current node. Open the named text file and return its contents as a string. Load the XML file as a string rather than loading it from a physical file on disk. Load the XML file from a physical file on disk. Get the FirstChild of the XML file which should show the version info.
Declarations and private variables for the CXMLFileRead class.
0 kommentar(er)
