要求传入工号 返回员工姓名

'全局数据 考虑这样只要load一次

set Doc = CreateObject("Microsoft.XMLDOM")

Doc.async = false

Doc.load(Server.MapPath("user_cnname.xml"))

function cnname_var (varusername)

dim node,i,nodecount,root

set nodeLis= Doc.getElementsByTagName("user")

nodeCount = nodeLis.length

For i=0 to nodeCount - 1

if nodeLis.item(i).childnodes.item(0).text = varusername then

'这里有一点疑惑 为什么是item(2)

cnname_var = nodeLis.item(i).childnodes.item(2).text

exit function

end if

next

cnname_var = varusername

end function

xml文件如下：

<?xml version="1.0" encoding="gb2312"?>

<user_cnname>

<user>

<username>A140</username>

<cnname>赵建川</cnname>

</user>

<user>

<username>A141</username>

<cnname>赵建川</cnname>

</user>

</user_cnname>

但用这种方式还没有直接从数据库时查询来得快,所以也就没有采用这种方式，

用javascript + 数据岛也可以实现查询，但是没有小涉及到事情 在asp代码中不好调用