How to create a multi-level XML file

VBScript:
CreateObject("Msxml2.DOMDocument"), How can I get the result like:

<?xml version="1.0"?>
<HOWTOS>
    <TOPIC>
          <Language>
               <TITLE>Java</TITLE>
          </Language>
    </TOPIC>

</HOWTOS>