asp中vbscript访问xml文件技巧

要求传入工号 返回员工姓名C35中国设计秀
'全局数据 考虑这样只要load一次C35中国设计秀
set Doc = CreateObject("Microsoft.xmlDOM")C35中国设计秀
Doc.async = falseC35中国设计秀
Doc.load(Server.MapPath("user_cnname.xml"))C35中国设计秀

function cnname_var (varusername)C35中国设计秀
dim node,i,nodecount,rootC35中国设计秀
set nodeLis= Doc.getElementsByTagName("user")C35中国设计秀
nodeCount = nodeLis.lengthC35中国设计秀
For i=0 to nodeCount - 1C35中国设计秀
  if  nodeLis.item(i).childnodes.item(0).text = varusername thenC35中国设计秀
'这里有一点疑惑 为什么是item(2)C35中国设计秀
    cnname_var = nodeLis.item(i).childnodes.item(2).textC35中国设计秀
    exit functionC35中国设计秀
  end ifC35中国设计秀
nextC35中国设计秀
cnname_var = varusernameC35中国设计秀
end functionC35中国设计秀

xml文件如下：C35中国设计秀

<?xml version="1.0" encoding="gb2312"?>C35中国设计秀

<user_cnname>     C35中国设计秀
    <user>C35中国设计秀
      <username>A140</username>C35中国设计秀
  　　<cnname>赵建川</cnname>C35中国设计秀
    </user>C35中国设计秀
    <user>C35中国设计秀
      <username>A141</username>C35中国设计秀
  　　<cnname>赵建川</cnname>C35中国设计秀
    </user>C35中国设计秀
</user_cnname>C35中国设计秀

但用这种方式还没有直接从数据库时查询来得快,所以也就没有采用这种方式，C35中国设计秀
用javascript + 数据岛也可以实现查询，但是没有小涉及到事情 在asp代码中不好调用C35中国设计秀