-------------------------------------

if instr(1,Request.Form.Key(i),"btn_")=0 then
    '创建field 和 value 元素，以及　id 属性
    Set fieldName = xmlDoc.createElement("field")
    Set fieldValue = xmlDoc.createElement("value")
    Set attID = xmlDoc.createAttribute("id")
    '把当前表单域的名称设置为id属性的值
    attID.Text = Request.Form.Key(i)

    '把当前表单域的值设置为value元素的值
    fieldValue.Text = Request.Form(i)
    '将field元素作为根元素的子元素进行添加
    rootEl.appendChild fieldName
    '将value元素作为field元素的子元素进行添加
    fieldName.appendChild fieldValue
end if

---------------------目前生成这样的XML文档
<?xml version="1.0" ?>
- <customer>
- <field>
  <value>aaa</value>
  </field>
- <field>
  <value>bbb</value>
  </field>
  </customer>
----------------------
--------------------想改如下面的问大师怎样改？
<?xml version="1.0" ?>
- <customer>
<bnn>
  <field>aaa</field>
  <cc>bbb</cc>
</bnn>
  </customer>
----------------------